ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Программное определение переменных в проекте.
10 сообщений из 10, страница 1 из 1
Программное определение переменных в проекте.
    #37271789
Oleg_Slip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oleg_Slip
Гость
Доброго дня всем. Возможно ли в проекте VBA Excel программно определить переменную? То есть я из одной книги открываю другую и мне нужно узнать есть ли в ней переменная с определенным именем, и если есть то присвоить ей значение.
...
Рейтинг: 0 / 0
20.05.2011, 16:00
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37272149
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Код: plaintext
If TypeName(<variable>) <> "Null" Then ...
...
Рейтинг: 0 / 0
20.05.2011, 18:54
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37278906
Oleg_Slip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oleg_Slip
Гость
AndreTM
Код: plaintext
If TypeName(<variable>) <> "Null" Then ...

мне нужно знать не тип переменной а есть ли она в коде проекта или нет.
...
Рейтинг: 0 / 0
25.05.2011, 16:49
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37279007
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Вы поняли, что вам отвечено?
Код: plaintext
1.
2.
3.
4.
If TypeName(MyNumericVariable) <> "Null" Then
    MyNumericVariable =  10 
Else
    MsgBox("Variable 'MyNumericVariable' is missing...")
End If
...
Рейтинг: 0 / 0
25.05.2011, 17:40
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37279038
ZVI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ZVI
Участник
Не понятно, зачем Вам именно так нужно, но можно - см. вложенный пример.
При загрузке WbCode.xls автоматически загрузится и WbWithMyVar.xls
запустится код Auto_Open в WbCode.xls, считается public-переменная MyVar из WbWithMyVar.xls
затем значение MyVar будет изменено из WbCode.xls.
...
Рейтинг: 0 / 0
25.05.2011, 17:56
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37279987
_slan_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_slan_
Участник
Oleg_SlipAndreTM
Код: plaintext
If TypeName(<variable>) <> "Null" Then ...

мне нужно знать не тип переменной а есть ли она в коде проекта или нет.

вам не кажется логичным утверждение: если у переменной есть тип, то есть сама переменная?
...
Рейтинг: 0 / 0
26.05.2011, 10:52
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37280153
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
_slan_вам не кажется логичным утверждение: если у переменной есть тип, то есть сама переменная?Слэн, лично я так подозреваю, что если переменной нет и установлена декларация Option Explicit - то код вообще не выполниться, т.к. VBA заорет о необъявленной переменной.
А если убрать декларацию - то тогда переменная будет вегда "Null", т.к. VBA сам назначит ей тип Variant со значением пусто...

Просто лично я понял так, что человеку необходимо узнать - объявлена переменная или нет. Догадываюсь, что не совсем верно понял, ибо странно то, что человек не знает, какие переменные объявлены в проекте...А понял я так по этим словам:
авторесть ли в ней переменная с определенным именем
и по этим
автормне нужно знать не тип переменной а есть ли она в коде проекта или нет
...
Рейтинг: 0 / 0
26.05.2011, 11:59
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37280767
_slan_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_slan_
Участник
The_Prist,

тогда шерстить сам проект на наличие такой строки..
...
Рейтинг: 0 / 0
26.05.2011, 15:25
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37281666
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
_slan_тогда шерстить сам проект на наличие такой строки..Вот-вот...
Поскольку ТС как-то неоднозначно указал задачу, то я и не стал думать о том, чтобы парсить код проекта

_slan_вам не кажется логичным утверждение: если у переменной есть тип, то есть сама переменная?Я подумал так: Вторая книга открывается, исполняется код в модулях вне процедур и в Open/Load/etc. При этом могут быть проинициализированы некие переменные. Вот мой код и проверяет, так ли это...
...
Рейтинг: 0 / 0
27.05.2011, 01:26
| Ответить | Цитировать | Написать  
Программное определение переменных в проекте.
    #37284936
Oleg_Slip
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oleg_Slip
Гость
Спасибо всем за участие. Извиняюсь что с опозданием отвечаю - два дня не подходил к компьютеру. Проблема самоуничтожилась ).
Задача которую я пытался решить была такова. Есть определенное количество книг. К ним присоединена одна библиотека .xla. Любая из этих книг вызывается из управляющей программы и ей передается набор пераметров посредством строки "имя_параметра1=значение1;...имя_параметраN=значениеN;". В библиотеке есть метод который должен проводить анализ этой строки и присваивать значения параметров переменным книги и запускать процедуру формирующую отчет.
Но, как я уже говорил раньше, решение найдено другим способом.
...
Рейтинг: 0 / 0
30.05.2011, 10:48
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Программное определение переменных в проекте.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=37271789&tid=2176828]:
 0ms
get settings:
 9ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 169ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 51ms
get tp. blocked users:
 1ms
others: 214ms
total:  481ms
созд. / загр.: 481ms
x
x
Закрыть


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