schon wieder ich......*hmfp* Ich fülle eine Combobox mit Zahlen, die aus einer Tabelle genommen wird (Kolonne A)
Columns("A:A").Select
Selection.Find(What:=Me.cbonuméromodification.Value, After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Activate
In ein Modul füge ich folgendes ein:
Public Sub Remplirliste(ByRef frm As UserForm, sh As String, rge As String, cbo As String)
Worksheets(sh).Activate
frm.Controls(cbo).RowSource = Worksheets(sh).Range(rge).Address
End Sub
Das Problem ist, wenn ich die 1 anklicke wird die Nummer 10 angezeigt. Kann mir jemand vielleicht einen Tipp geben?
Mit Wörtern klappt das sehr gut, aber nicht bei Zahlen.
Danke
Karin