Wie schreibe ich das?

Ich bin wieder einmal ein wenig dumm und suche folgendes:

Ich möchte in einem Tabellenblatt, dessen Anfang bei Zeile 6 und dessen Ende ich per lLetzte = Range(„A65536“).END(xlup).Row bestimmt habe alle Zeilen auf eine Höhe von 39,9 bringen.

Aufgezeichnet für eine Zeile heißt das:
Rows("6:6").Select
Selection.RowHeight = 39.9

Wie schreibe ich das als Schleife?

For lIndx = 6 to lLetzte
Rows (…..).Select
Selection.RowHeight = 39.9
Next lIndx

Auf das .Select möchte ich ebenfalls verzichten – wenn das möglich ist.

Wer hat einen guten Tipp für mich?

Gruß, Peter