Hallo Holger,
ahh, da liegt der Hund begraben. Zumindest ein Hund....
Es funktioniert entweder:
Range(Cells(1,1), Cells(letzteZei, 9)).VerticalAlignment = xlVAlignTop
oder:
Range(("A1"), Cells(letzteZei, 9)).VerticalAlignment = xlVAlignTop
Ich hatte das vermixt.
Allerdings funktioniert es so:
Worksheets("Auswahl").Range(("A1"), Cells(letzteZei, 9)).VerticalAlignment = xlVAlignTop
auch nicht.
Ich hab es jetzt so gelöst das ich zuerst das Worksheet aktiviere und dann die Zellen formatiere. Also so:
Worksheets("Auswahl").Activate
Range(("A1"), Cells(letzteZei, 9)).VerticalAlignment = xlVAlignTop
Vielen Dank für den Denkanstoß und deine Hilfe.
Beste Grüße Kentucky
|