Navigation

   Jeg prøver at lave en listbox med data fra ark 2.

i listboxen vil jeg gerne have ColumnHeads (overskrifter over min data) problemet er at hvis jeg bruger funktionen  

Private Sub UserForm_Activate()

With Me.ListBox1
.RowSource = Worksheets("ark2").Range("A2:e100").Address
.ColumnHeads = True
.ColumnCount = 4
End With
End Sub

Tages der stadig data fra ark1

hvis jeg bruger formlen
'*****
Set Arange = Ark1.Range("A2:e" _
& Ark1.Range("e" & Ark1.Rows.Count).End(xlUp).Row)

Me.ListBox1.ColumnHeads = True
Me.ListBox1.List = Arange.Value
'******

kan jeg ikke få den til at skrive noget i ColumnHeads (overskriften)

Håber der er en der kan forklare mig hvad forskellen på .List & .RowSource er og samtidig løse mit problem.

Jeg vil gerne undgå at bruge formlen ark2.activate 

Navigation

Listbox