ich möchte Daten aus einer Tabelle in einem Userform zur auswahl stellen eine muß gewählt werden sonnst kann kein OK betätigt werden wie baut man sowas auf.
Gruß Andy
Würde mich über eine antwort freuen
Sub AdminsLaden()
Dim Tabellen As Worksheet
Set Tabellen = ThisWorkbook.Worksheets("Tabellen")
AdminForm.AdminsComboBox.Clear
With Tabellen.[Admins]
For i = 1 To .Value
AdminForm.AdminsComboBox.AddItem (.Cells.Offset(i, 0))
Next i
End With
AdminForm.AdminsComboBox.Value = AdminForm.AdminsComboBox.List(0)
End Sub