Hallo an alle,
das makro, dass ich bisher verwende sieht wie folgt aus:
Sub ZellenAdressieren()
Dim i As Byte, l As Byte, k As Byte, x As Byte
ActiveWorkbook.Sheets(„Tabelle1“).Select
startspalte = 7
startzeile = 21
endzeile = 55
l = startzeile
i = startzeile
Do While l