Mam mały problem. Próbuję napisać taki mały formularz do prowadzenia bazy danych o filmach w excelu za pomoca vba. Na 1 arkuszu mam liste filmów na 2 reżyserów a na 3 gatunki. O ile wypełnienie comboboxa z rokiem nie było problemem to teraz mam problem z wypelnieinem listy przy reżyserze i gatunku. Mianowicie pole gatunek uzupełnia misie tylko wtedy kiedy jestem na arkuszu z Gatunkami analogicznie reżyserzy. Nie mogę tego obejść aby pola były wypelnione podczas gdy aktywny jest arkusz z filmami.
Próbowałęm już wieloma sposoboami ale zazwyczaj wszystko kończy sie na runtime error 1004 method range of object _worksheet failed

Jesli dobrze zrozumiaem idę vba to przez odwołanie Arkusz3.Range("A1") powiniem sie odwołac do komórki A1 w arkusz3 z dowlnego miejsca, jednak tak się niestety nie dzieje.
Uzywam excela 2007

Private Sub UserForm_Initialize()
    Dim r()
    Dim y, i As Integer
    Dim d As Variant
    Dim g As Range
    
    y = Year(Date) - 1920
    ReDim r(y)
    For i = 0 To y
        r(i) = 1920 + i
    Next i
    UserForm1.ComboBox_year.List = r
    
    With Arkusz3
        For Each g In Range("A2", Selection.End(xlDown))
            UserForm1.ComboBox_gatunek.AddItem (g.Value)
        Next g
    End With
    
    
    'g = Arkusz3.Range("A2", Selection.End(xlDown))
    'With Me.ComboBox_gatunek
    '    .List = g
    'End With
    
    With Arkusz4
        d = Range("A2:B2", Selection.End(xlDown))
        With UserForm1.ComboBox_director
            .List = d
        End With
    End With
    
End Sub