UF Combobox update
12.12.2007 18:53:54
Raphael
Ich hoffe heute ist wieder ein glückstag für mich und ihr könnt mir weiterhelfen....
Ich habe in einer UserForm eine Combobox deren Inhalt ich aus dem Sheet Databse F30:F ziehe.
In Database G 27 ist eine VLOOKUP Formel drin, dieser Wert soll mir dann in der Testbox in der UF angezeigt werden.
Wie bekomme ich es hin, das Excel mir Database F27 gleich nach Auswahl der Combobox aktualisiert und mit dann gleich den Wert aus Databse G27 in der Textbox anzeigt?
hier ist meine Version! kann mir jemand helfen?
Private Sub ComboBox1_Change()
ComboBox1.Value = Format(ComboBox1, "MMMM-YYYY")
UserForm1.ComboBox1.RowSource = _
Sheets("Database").Name & "!" & _
Sheets("Database").Range("F30:F" & _
ActiveSheet.Rows.Count).Address
End Sub
Private Sub UserForm_initialize()
ComboBox1.Value = Sheets("Database").Range("F27")
TextBox3.Value = Sheets("Database").Range("G27")
End Sub
Danke
MFG
raphael