2013-09-26 4 views
0

У меня есть ФОРМА и МОДУЛЬ в VBA. Когда выполняется макрос, отображается форма (frmQuestions), данные вводятся в текстовое поле (txtName) и раскрывающееся меню (lstChoose). Когда пользователь нажимает кнопку команды (cmdEnter), как я могу передавать данные в txtName и lstChoose в модуль?Передача данных из формы в модуль (VBA)

+2

Необходимо разработать код, а затем задайте конкретные вопросы. Этот [мой пост] (http://yoursumbuddy.com/a-flexible-vba-chooser-form/) может представлять интерес. В книге Professional Excel Development есть отличная глава. –

ответ

1

Чтобы передать данные из события на форме к функции, содержащейся в модуле сделать что-то вроде следующего:

по щелчку кода событий, содержащихся в frmQuestions форме:

Private Sub cmdEnter_Click() 
    Dim TempReturnVal as Boolean 

    TempReturnVal = funUpdateRecords(txtName.value, lstChoose.value) 
End Sub 

Функция в модуле:

Public Function funUpdateRecords(funName As String, funChoice As String) As Boolean 
    ' Do whatever it is that you want to 
    'funName contains the value of txtName 
    'funChoice contains the value of lstChoose 

    'Return True if successful or False if not. 
    funUpdateRecords = True 
End Function 
Смежные вопросы