powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необязательный параметр в макросе
17 сообщений из 17, страница 1 из 1
Необязательный параметр в макросе
    #35351537
макрос
Код: plaintext
1.
2.
Sub MakeЕЕЕ(EEE as Object)


из приложения вызываю
Код: plaintext
1.
oExcel.run("MakeЕЕЕ", oObject)
работате


как позвать макрос без параметра?
Код: plaintext
1.
oExcel.run("MakeЕЕЕ")


возможно ли это?
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351585
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: 12345вышелзайчикпогулять
> макрос
>
> Sub MakeЕЕЕ(EEE as Object)

Sub MakeЕЕЕ(Optional EEE as Object)

> как позвать макрос без параметра?
>
> oExcel.run("MakeЕЕЕ")
>
>
> возможно ли это?

А вот это проверить нужно :)
Может и можно так.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351613
OLE error code 0x8002000f: Parameter not optional.
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351619
получаю эту ошибку

возможен ли вызов без передачи параметра

а в макросе уже
разрулить

if not .... is nosing then
...
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351678
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: 12345вышелзайчикпогулять
> получаю эту ошибку
>
> возможен ли вызов без передачи параметра
>
> а в макросе уже
> разрулить
>
> if not .... is nosing then
> ...

вообще в справке написанно:
This means that you cannot pass objects to macros by using the Run method.
что нельзя передавать объекты. Поэтому просто вызывай без параметров

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351738
Дружище

то-же самое

с as String

мне кажется, что наверное не там проблему смотрим

хорошо, нарисуй мне пример

макроса с ...
который можно позвать с параметром и без

или как это обойти?
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351774
блин, как-же все сложно
на пустом месте


еще раз

есть макрос

у него я пишу аргумент - один единственный

и хочу звать этот макрос

без аргумента или с оным

можно так делать

или строго
если я объявил аргумент, то с аргументом и нужно звать

2Игорь Горбонос
прошу ответ по-существу,
тип передаваемого аргумента (параметра) не влияет,
объект засылается прекрасно
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351806
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Sub d()

Call t("")
Call t


End Sub


Sub t(t As String)

End Sub

хочу сделать так

Call t - ошибка

как мне сделать так, чтобы передавать или не передавать

или как
это обходится???
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351817
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дружище!

Вот примерище:

В VB6 программе:

Код: plaintext
1.
2.
3.
4.
5.
6.
    Dim mobjExcel as new Excel.Application
    Dim objInputWorkBook As New Workbook
    
    Set objInputWorkBook = mobjExcel.Workbooks.Open(pstrInputFile, , xlReadOnly)

   mobjExcel.Run "MyMacro"
   mobjExcel.Run "MyMacro", "GoGoGoooo!"

В книге, в модуле:

Код: plaintext
1.
2.
3.
4.
Option Explicit

Public Sub MyMacro(Optional ByVal pstrMyOptionalPar As String = "")
    MsgBox "Igogo" & pstrMyOptionalPar
End Sub

Кстати, у тебя, Run со скобочками, без правой части и без Call. Это не похоже ни на VBA, ни на VB5/VB6....

Прошу прощения за интервенцию.
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351827
Chelovek Tapok
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Sub d()

Call t("")
Call t


End Sub


Sub t (Optional t As String)

End Sub

...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351980
ребята, спасибо большое

все получилось
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351986
авторКстати, у тебя, Run со скобочками, без правой части и без Call. Это не похоже ни на VBA, ни на VB5/VB6....


это лиса - фокспро
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35351997
блин
пол дня об моник бился - уже грохать
свои изменения хотел

проблема - долго ексель работает
в фоновом режиме - юзверы
снимают процессы

а я им в тулбар свой свечу сообщения
из екселя

вот и заслал в нужные макросы свое приложение,
спасибо
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35352090
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: 12345вышелзайчикпогулять
> блин
> пол дня об моник бился - уже грохать
> свои изменения хотел
>
> проблема - долго ексель работает
> в фоновом режиме - юзверы
> снимают процессы

Долго это сколько? У нас из лисы отчет готовился порядка 40 минут, в это
время бегает прогрессбар и они терпеливо ждут, провели работы по ускорению и
сократили время в два раза :)

> а я им в тулбар свой свечу сообщения
> из екселя
>
> вот и заслал в нужные макросы свое приложение,
> спасибо

Вот этого не делали, т.к. в целях безопастности, отключают использование
макросов в безопастности

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35352157
2Игорь Горбонос

я советов не просил,
я просил указать на решение проблемы
в передаче параметров,
что за Вас успешно сделали другие...

а Вы мне продолжаете советовать ерунду,
о чем я Вас не просил

так, что извините ....
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35352223
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: 12345вышелзайчикпогулять
> 2Игорь Горбонос
>
> я советов не просил,
> я просил указать на решение проблемы
> в передаче параметров,
> что за Вас успешно сделали другие...

:)
Найди 10 отличий:
Игорь ГорбоносSub MakeЕЕЕ(Optional EEE as Object)
VladConnPublic Sub MyMacro(Optional ByVal pstrMyOptionalPar As String
= "")
Квалификаторы доступа есть и в фоксе, можно было и справку почитать

>
> а Вы мне продолжаете советовать ерунду,
> о чем я Вас не просил

В последнем посте я ничего не советовал, а спрашивал, для расширения своего
кругозора. И говорил свои особенности эксплуатации программ.
>
> так, что извините ....

:)

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Необязательный параметр в макросе
    #35352275
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я прошу прощения, но на моей памяти Игорь Горбонос еще НИКОГДА не советовал ерунду! Включая этот топик.

Успехов
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необязательный параметр в макросе
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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