Private SubForm_Activate()
CBFahrzeugklasse.RowSource = "Steuerung!A6:A"&Sheet("Steureung").Range("A1048576").End(XIDirechtion.xlUp).Row
CBZweck.RowSource = "Steuerung!C6:C"&Sheet("Steuerung").Range("A1048576").End(XIDirection.xlUp).Row
End Sub
Unter Windows Läuft es, aber bei meinem Mac nicht(Fehlermeldung Lauffehler 380).
ich bitte um Hilfe.
Beste Grüße
Alex