Combinationsbox i VBA

Hej
Jeg er kørt lidt fast, og håber at nogle kan hjælpe mig videre - er rimelig ny i VBA kodning.

Jeg er ved at lave en oversigt med opgaver, og har lavet en formular med nogle rullelister (comboBox), hvor den henter valg mulighederne i nogle fordefinerede områder med navne.

Jeg har bla en combobox hvor jeg skal vælge en virksomhed (cboVIRK), når denne er valgt skal der vælges en afdeling (cboAFD), det går også fint så længe jeg har alle afdelinger i en lang liste, men nu er min udfordring at jeg gerne vil definere hvilke afdelinger der kan vælges når en given virksomhed er valgt.
Jeg har forsøgt mig med IF cboVIRK= "xxxx" THEN 'slå op i cboAFD_YYY', men det virker ikke.

Mine 'slå-op' funktioner har jeg lavet sådan:
With Me.cboVIRK
        .RowSource = "virksomhed"
        .ListIndex = 0
    End With

hvor VIRK og "virksomhed" skiftes ud med de andre navne på combobox og "hentested".