Combobox - Userform
21.07.2003 12:21:40
EL
wie kann ComboBox eine datei in anderen Workbooks aus listen?
Private Sub UserForm_Initialize()
'ComboBox1.RowSource = "c2: c2000"
Dim PR As String
Dim TR As String
PR = Range("B3").Value
TR = Range("B4").Value
ComboBox1.RowSource = Workbooks("Produkt" & PR & ".xls").Sheets(TR).Range(Cells(3, 2), Cells(3, 2000))
End Sub
Laufzeit Fahler 1004
Anzeige