ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запамятовал: как создать/отредактиовать макрос из VBA? (-)
21 сообщений из 21, страница 1 из 1
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641363
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
...
Рейтинг: 0 / 0
09.08.2004, 16:55:56
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641403
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Создать макрос1
Создать макрос2, вызывающий макрос1.
Меню сервис->макрос->преобразовать макрос->Макрос2
И посмотреть что он тама навертел:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Function Макрос2()
On Error GoTo Макрос2_Err

    DoCmd.RunMacro "Макрос1", , ""


Макрос2_Exit:
    Exit Function

Err:
    MsgBox Error$
    Resume Макрос2_Exit

End Function

Ну точно больной...
...
Рейтинг: 0 / 0
09.08.2004, 17:13:48
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641439
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
Как ЗАПУСКАТЬ (на выполнение) макрос из VBA - это я знаю ...
Мне надо СОЗДАТЬ его сначала (из VBA), а потом уж - запускать ...
...
Рейтинг: 0 / 0
09.08.2004, 17:26:59
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641452
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Иван а зачем нужен макрос - Вы что-то не умеете делать из VBA или речь идёт об autoexec ?
...
Рейтинг: 0 / 0
09.08.2004, 17:33:39
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641453
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Все... спать теперича не буду...
А зачем нужон макрос, создающий макрос?
...
Рейтинг: 0 / 0
09.08.2004, 17:35:16
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641454
NikP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikP
Участник
Иван FXSКак ЗАПУСКАТЬ (на выполнение) макрос из VBA - это я знаю ...
Мне надо СОЗДАТЬ его сначала (из VBA), а потом уж - запускать ...
послушай а зачем на VBA писать создание макроса, когда везде можно за место макрос1 поставить процедура обработки события и код VBA
...
Рейтинг: 0 / 0
09.08.2004, 17:35:35
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641470
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
... хочется мне - функцию вызывать, имя которой хранится в переменной тайпа стрынг ... вот и удумал - создавать макрос, который будет ея того ... вызывать.

Неужели - опять чепуху сморозил?
Типа:
- Нянь, а нянь, а земляника - красная?
- Да, Ванечка.
- Нянь, а нянь, а земляника - с точечками?
- Да, Ванечка.
- Нянь, а нянь, а земляника - летает?
- Нет, Ванечка. Это ты опять божьих коровок наелся...

;-)
...
Рейтинг: 0 / 0
09.08.2004, 17:42:34
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641485
NikP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikP
Участник
Иван FXS... хочется мне - функцию вызывать, имя которой хранится в переменной тайпа стрынг ... вот и удумал - создавать макрос, который будет ея того ... вызывать.

Неужели - опять чепуху сморозил?
Типа:
- Нянь, а нянь, а земляника - красная?
- Да, Ванечка.
- Нянь, а нянь, а земляника - с точечками?
- Да, Ванечка.
- Нянь, а нянь, а земляника - летает?
- Нет, Ванечка. Это ты опять божьих коровок наелся...

;-)
Открываешь в окне базы данных вкладку "Модули" пишешь создать. и начинаешь Function ...
...
Рейтинг: 0 / 0
09.08.2004, 17:54:23
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641526
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
Вау! Глубина взаимопонимания ... зашкаливает!

1. madg, мне нужон не "макрос, создающий макрос", а код VBA, создающий макрос ... андерстэнд зе дифференс?

2. NikP, спасибо за попытку помочь ... я знаю, что такое "окно базы данных", и что такое "вкладка Модули" - тоже знаю ... уже. ;-)
У даже меня есть
Код: plaintext
1.
2.
Function myFunction 
msgbox "Hello, world!"
end Function
а еще у меня есть
Код: plaintext
Public FuncName as String
- в котором хранится сложным образом туда попавшее значение "myFunction" ...
...
Рейтинг: 0 / 0
09.08.2004, 18:09:23
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641542
Eval
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eval
Гость
Иван FXSВау! Глубина взаимопонимания ... зашкаливает!

1. madg, мне нужон не "макрос, создающий макрос", а код VBA, создающий макрос ... андерстэнд зе дифференс?

2. NikP, спасибо за попытку помочь ... я знаю, что такое "окно базы данных", и что такое "вкладка Модули" - тоже знаю ... уже. ;-)
У даже меня есть
Код: plaintext
1.
2.
Function myFunction 
msgbox "Hello, world!"
end Function
а еще у меня есть
Код: plaintext
Public FuncName as String
- в котором хранится сложным образом туда попавшее значение "myFunction" ...

Иван, ты этого хотел?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Public Function MyFunction() As String
  MyFunction = "Результат"
End Function


Sub TestFunction()
Dim s As String
  s = Eval("MyFunction()")
  
  
  Debug.Print s
End Sub
...
Рейтинг: 0 / 0
09.08.2004, 18:15:31
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641543
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Иван FXS... хочется мне - функцию вызывать, имя которой хранится в переменной тайпа стрынг
Предлагаю другие варианты:

1. Eval
2. DoCmd.RunCode
...
Рейтинг: 0 / 0
09.08.2004, 18:15:50
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641545
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Почти опоздал...
...
Рейтинг: 0 / 0
09.08.2004, 18:16:13
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641568
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
Да, Eval и Владимир Саныч, Eval() - это пять!

А "DoCmd.RunCode" мой VBA (6.3) - не понимает ... :-(
...
Рейтинг: 0 / 0
09.08.2004, 18:26:01
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641575
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Иван FXSА "DoCmd.RunCode" мой VBA (6.3) - не понимает ... :-(
Наверно, так и есть. Майкрософт, наверно, решил, что это лишнее, если есть Eval...
...
Рейтинг: 0 / 0
09.08.2004, 18:30:01
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641676
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
Создать макрос можно примерно так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Public Function CreateMacro(ByVal vstrNewMacroName As String) As Long
    Dim hScr        As Long
    Dim lngVersion  As Long
    Dim lngExtra    As Long
  
    WizHook.Key =  51488399 
    hScr = WizHook.OpenScript(vstrNewMacroName, "",  2 &, lngExtra, lngVersion)
  
    If hScr <>  0  Then
        CloseHscr hScr  ' 
    End If
    CreateMacro = hScr
End Function
Посмотрите:
http://am.rusimport.ru/MsAccess/f2.aspx?type=1&id=16618

Можно также подготовить текстовый файл и выполнить LoadFromText
...
Рейтинг: 0 / 0
09.08.2004, 19:31:11
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641696
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Так, ладно:макрос не макрос... дело десятое...

Так кто мне расскажет:
Зачем нужно создавать код, для создания кода, попути объясняя вновь созданному коду что он должен делать?

Можа я тупой?
Имя макроса(функции) известно\раз
Что должно делать известно\два

А, можно вызывать функцию через семь промежуточных переменных, затирая их за собой путем копирования базы на CD,и зачищая место на диске (будем искать где база лежала покластерно) методом удаления информации с грифом "Правительственный"...

Извините за оффтоп
...
Рейтинг: 0 / 0
09.08.2004, 20:03:11
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641737
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serge Gavrilov
Участник
авторЗачем нужно создавать код, для создания кода, попути объясняя вновь созданному коду что он должен делать?

Я не уверен, что правильно вас понимаю, но код для создания кода нужен, например, для различных виззардов...
...
Рейтинг: 0 / 0
09.08.2004, 20:47:05
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641738
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
madgЗачем нужно создавать код, для создания кода, попути объясняя вновь созданному коду что он должен делать?
Допустим, у меня есть 4 функции:

BuildHouse
DestroyHouse
BuildCar
DestroyCar

В зависимости от каких-то условий я решаю, что мне нужно:

Build или Destroy
House или Car

Вот я составил из кусочков название функции, которую мне надо запустить. А теперь ее надо запустить.
...
Рейтинг: 0 / 0
09.08.2004, 20:51:31
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641777
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Владимир Саныч
Вот я составил из кусочков название функции, которую мне надо запустить. А теперь ее надо запустить.

Ага, а теперь давайте сравним с темой топа...

Свелось все к тому что: как использовать переменные в Call...

Или я чего не понял?
...
Рейтинг: 0 / 0
09.08.2004, 22:18:28
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641780
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
madgАга, а теперь давайте сравним с темой топа...

Свелось все к тому что: как использовать переменные в Call...

Или я чего не понял?
Все правильно. Автор вопроса думал, что динамическое создание макроса с RunCode - это единственный (или лучший) способ решить задачу.
...
Рейтинг: 0 / 0
09.08.2004, 22:21:38
| Ответить | Цитировать | Написать  
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
    #32641792
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Вот почудил в базе немного...
в итоге:
Call стрингов не видит и не любит, зато очень любит матом ругаться... :)
DoCmd.RunCode просто отсутствует...
За что боролись, на то и напоролись...
А интересно стало...
...
Рейтинг: 0 / 0
09.08.2004, 22:52:05
| Ответить | Цитировать | Написать  
21 сообщений из 21, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1672613]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 52ms
get topic data:
 7ms
get first new msg:
 4ms
get forum data:
 2ms
get page messages:
 37ms
get tp. blocked users:
 1ms
others: 202ms
total:  326ms
созд. / загр.: 326ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]