Frage über Range end + worksheets

Ich schreibe gerade ein Makro bei dem es oft notwendig ist ein Range durch Range("A1").end(xlDown) zu finden (oder jedenfalls durch irgend ein end(xl) methode.

Nun bin ich auf einige Probleme gestossen als ich diese end.methode mit worksheets oder userforms kombinieren wollte. Habe z.B. folgendes machen wollen

for each zelle in Worksheets("Verdichtung1").Range("A2", Range("B2").End(xlDown))

oder auch Userform1.combobox1.rowsource = Worksheets("Verdichtung1").Range("A2", Range("B2").End(xlDown))

Liegt das problem an dem Worksheetobjekt oder meiner Verwendung der end befehle? Irgendwelche Vorschläge?

Danke,
Daniel