Значение из модуля в Книгу - Microsoft Office Excel

valerij · 05.05.2009, 23:45

Как из модуля передать значение переменной ЕЕЕ в макрос Книги?
Отсюда

Код:

Sub Прямоуг4_Щелкнуть()
EEE = 12
End Sub

Сюда

Код:

Private Sub Workbook_SheetChange(ByVal sh As Object, ByVal Target As Excel.Range)
MsgBox EEE

IgorGO · 06.05.2009, 01:06

в модуле так запиши:

Код:

Public EEE As Integer

Sub Прямоуг4_Щелкнуть()
  EEE = 12
End Sub

выполни процедуру Прямоуг4_Щелкнуть, затем увидишь на листе результат

valerij · 06.05.2009, 01:36

Цитата:

Сообщение от IgorGO

в модуле так запиши

Все ОК, не туда вставлял, .....

05.05.2009, 23:45	#1
valerij Старожил Регистрация: 12.05.2007 Сообщений: 2,339	Значение из модуля в Книгу Как из модуля передать значение переменной ЕЕЕ в макрос Книги? Отсюда Код: `Sub Прямоуг4_Щелкнуть() EEE = 12 End Sub` Сюда Код: `Private Sub Workbook_SheetChange(ByVal sh As Object, ByVal Target As Excel.Range) MsgBox EEE`

06.05.2009, 01:06	#2
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	в модуле так запиши: Код: `Public EEE As Integer Sub Прямоуг4_Щелкнуть() EEE = 12 End Sub` выполни процедуру Прямоуг4_Щелкнуть, затем увидишь на листе результат Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Создание модуля	Deight	Общие вопросы Delphi	20	31.12.2008 15:34
Создание модуля в Си	JET_FLASH	Общие вопросы C/C++	16	11.01.2008 17:12
Создание модуля голосования	AlekFirst	PHP	1	18.10.2007 11:54
Вызов Метода из др. модуля	Mickle	Общие вопросы Delphi	2	10.05.2007 23:41