Data halen uit een ander tabblab

[Geo261]

Hallo,

Ik wil graag dat een combobox gevuld word met gegevens uit een ander blad.
In het script dat ik heb mis ik de verwijzing, kan iemand mij helpen?

Private Sub FollowLink30(ByVal intIndex As Integer)
    Select Case intIndex
    Case 0
        ComboBox18.ListFillRange = ("A6:A10") <<deze range staat op aan ander blad "Data"
            Case 1
        ComboBox18.ListFillRange = ("A38:A42")<<deze range staat op aan ander blad "Data"

    End Select
    
    End Sub

'Private Sub ComboBox18_Change()
'End Sub

 

[Cobbe]

Ik hoop dat dit u verderhelpt:

Private Sub FollowLink30(ByVal intIndex As Integer)
    Select Case intIndex
    Case 0
        ComboBox18.ListFillRange = [COLOR="red"]Sheets("Data").Range("A6:A10")[/COLOR] '<<deze range staat op aan ander blad "Data"
            Case 1
        ComboBox18.ListFillRange = [COLOR="red"]Sheets("Data").Range("A38:A42")[/COLOR] '<<deze range staat op aan ander blad "Data"

    End Select
    
    End Sub