ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вопрос по передаче значений переменных между Sub-подпрограммами ?
5 сообщений из 5, страница 1 из 1
Вопрос по передаче значений переменных между Sub-подпрограммами ?
    #39788833
Yuri KR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Yuri KR
Гость
Добрый день!
Подскажите по вопросу передачи значений переменных из одной подпрограммы в другую.

Открываю Excel книгу и присваиваю переменной FN_PRG имя открытой книги оператором FN_PRG = Application.ActiveWorkbook.Name
Отладчик показывает, что имя присвоено и все ОК.

Далее пытаюсь использовать переменную FN_PRG в основном модуле, но она уже видится как пустая строка" " - Empty
Пробовал разные варианты - определял переменную в основном модуле или в процедуре открытия...
Результат везде отрицательный.
Подпрограммы определены как Public и по идее видимость переменной обеспечена...

Подскажите в чем может быть дело?
Как передавать значения переменных из модуля в модуль?
Спасибо!

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Public Sub WorkBook_Open()
  Dim FN_PRG As String
  FN_PRG = Application.ActiveWorkbook.Name
  Debug.Print "ИМЯ КНИГИ при открытии- "; FN_PRG
  UserForm1.Show
End Sub

Public Sub ConnectExcel()
   Debug.Print "FN_PRG в подпрограмме Connect- "; FN_PRG
End Sub

Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
20.03.2019, 10:10
| Ответить | Цитировать | Написать  
Вопрос по передаче значений переменных между Sub-подпрограммами ?
    #39788852
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Изучаем темы учебника
1) области видимости переменных (локальная переменная одной процедуры в другой не видна)
2) параметры процедур (нужно просто передать значение переменной FN_PRG в процедуру ConnectExcel через параметры)
3) https://www.sql.ru/faq/faq_topic.aspx?fid=2539
...
Рейтинг: 0 / 0
20.03.2019, 10:31
| Ответить | Цитировать | Написать  
Вопрос по передаче значений переменных между Sub-подпрограммами ?
    #39788964
Yuri KR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Yuri KR
Гость
Shocker.Pro,

1) области видимости переменных (локальная переменная одной процедуры в другой не видна)
А почему они локальные, если подпрограммы объявлены вроде как Public и видимость по идее должна быть...

2) параметры процедур (нужно просто передать значение переменной FN_PRG в процедуру ConnectExcel через параметры)
с этим полностью согласен...
получается, что FN_PRG в двух подпрограммах просто разные FN_PRG, хоть и имя совпадает, так?

Ну и для контроля включил - Option Explicit
...
Рейтинг: 0 / 0
20.03.2019, 12:47
| Ответить | Цитировать | Написать  
Вопрос по передаче значений переменных между Sub-подпрограммами ?
    #39788977
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Yuri KRА почему они локальные, если подпрограммы объявлены вроде как PublicПодпрограммы Public, переменные - нетYuri KRвидимость по идее должна быть...зачем выдумывать какие-то идеи, если есть спецификация, синтаксис языка и т.п.?
Yuri KRв двух подпрограммах просто разные FN_PRG, хоть и имя совпадает, так?да, и именно это покажет Option Explicit
...
Рейтинг: 0 / 0
20.03.2019, 12:58
| Ответить | Цитировать | Написать  
Вопрос по передаче значений переменных между Sub-подпрограммами ?
    #39790443
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
Yuri KRКак передавать значения переменных из модуля в модуль?Здесь с примерами кодов расписывал как надо объявлять переменные: Что такое переменная и как правильно её объявить?
...
Рейтинг: 0 / 0
23.03.2019, 15:34
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вопрос по передаче значений переменных между Sub-подпрограммами ?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&fpage=11&tid=2172102]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 31ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 43ms
get tp. blocked users:
 2ms
others: 12ms
total:  131ms
созд. / загр.: 131ms
x
x
Закрыть


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