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

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

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

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

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

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:15:31
    #32641542
Eval
Eval
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Иван 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:50
    #32641543
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Иван FXS... хочется мне - функцию вызывать, имя которой хранится в переменной тайпа стрынг
Предлагаю другие варианты:

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

А "DoCmd.RunCode" мой VBA (6.3) - не понимает ... :-(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.08.2004, 18:30:01
    #32641575
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Иван FXSА "DoCmd.RunCode" мой VBA (6.3) - не понимает ... :-(
Наверно, так и есть. Майкрософт, наверно, решил, что это лишнее, если есть Eval...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.08.2004, 19:31:11
    #32641676
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Создать макрос можно примерно так:
Код: 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, 20:03:11
    #32641696
madg
madg
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запамятовал: как создать/отредактиовать макрос из VBA? (-)
Так, ладно:макрос не макрос... дело десятое...

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

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

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

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

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

BuildHouse
DestroyHouse
BuildCar
DestroyCar

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

Build или Destroy
House или Car

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

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

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

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

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

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


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