wie Teile ich eine Listbox in 13 gleich grosse Spalten auf?
(Bei mir sind sie unterschiedlch gross!! "ColumnCount = 13"
mfg
Alex
Private Sub UserForm_Initialize()
ListBox1.TextAlign = fmTextAlignCenter 'alternativ: ListBox1.TextAlign = 2
End Sub
Sub Beispiel()
Dim Testfeld() As Integer
Dim i%
i = 10
ReDim Preserve Testfeld(11, i)
End Sub