VBA: Hvordan laver jeg loop til at tilføje celleindhold til comboboks?
Hej eksperter.Jeg er ved at lave et regneark, hvor der ud fra nogle parametre skal udvælges bestemte celler i en kolonne, hvis indhold skal tilføjes en cbo.
Jeg har lavet følgende, hvilket virker efter hensigten på en enkelt række - men jeg skal bruge et loop, så den løber alle rækkerne igennem og stopper, hvis en celle i kolonne "A" er tom. Håber, I kan hjælpe....
Private Sub UserForm_Initialize()
ActiveWorkbook.Sheets("Testark").Activate
Range("C2").Select
If IsEmpty(ActiveCell) = True Then
Range("B2").Select
If IsEmpty(ActiveCell) = False Then
Range("A2").Select
cboTEST.AddItem ActiveCell
ActiveCell.Offset(1, 2).Select
End If
End If
End Sub
