Hallo ins Forum,
mir ist es dank dieses Forums trotz Anfängerstatus gelungen eine Ecxel-VBA zu erstellen.
Alles funktioniert super auf meinem Rechner. Nur: Die Arbeitsmappe muss auch von Usern verwendet werden, die auf MAC-Computern arbeiten. Leider gibt es hier Abweichungen. So funktioniert auf dem MAC etwa die "RowSource"-Funktion nicht (was ich auch erst durchs Forum erfahren habe! - THX)
Jetzt bin ich auf der Suche nach einer Lösung, wie ich den folgenden Private Sub userform_initialize() auch ohne "Rowsource" umsetzen kann.
Kurz zur Erklärung:
Die Daten der Tabelle "Tabelle3" sollen in ein Listfeld (ListBox1) einer Userform übernommen werden.
Dim lngZeileMax As Long
Dim intZ As Integer
Dim wksBlatt As Worksheet
Set wksBlatt = Tabelle3
lngZeileMax = wksBlatt.UsedRange.Rows.Count
'Definition welche Spalten in welcher Breite in das Listfeld aufzunhemen sind
With Me.ListBox1
.ColumnCount = 5
.ColumnHeads = True
.ColumnWidths = "80;165;60;20;20"
.RowSource = _
"=" & wksBlatt.Name & "!A2:E" & _
lngZeileMax
.ListIndex = -1
End With
Wie gesagt: Funktioniert super ... nur der MAC zeigt bei der Verwendung von Rowsource einen Laufzeitfehler an.
Vielen Dank für etwaige Hilfe im Voraus!
Jörg