2013-08-07 1 views
0

У меня есть userform, где хранятся более 50 точек данных. В основном записи пользователей и несколько из другой базы данных. Я хочу передать их, чтобы преуспеть. Есть ли лучший способ сделать это, чем писать ниже для каждой точки данных?Захват mutiple Данные из пользовательской формы в excel

Range("A1").Value = TextBox44.Value 
+1

Вы могли бы попробовать свойство ControlSource. http://msdn.microsoft.com/en-us/library/office/gg251763.aspx – Reafidy

ответ

0

Я бы с каждого заявления, как это:

Dim intRow As Integer 
intRow = 1 
For Each tbTextBox In Me.Controls 
    If TypeName(tbTextBox) = "TextBox" Then 
     Cells(intRow, 1) = tbTextBox.Value 
     intRow = intRow + 1 
    End If 
Next 

Это не тестируется, поэтому возможны некоторые незначительные ошибки

Смежные вопросы