kann mir jemand sagen, was ich an diesem Code ändern muss, damit er nicht nur 1 Zelle runterspringt, sondern in die erste Zelle springt, einer nicht ausgeblendeten Zeile? In AE2 hilft mir das nicht viel, da die Zelle leer sein könnte.
Range("Abrechnung!ae1").Activate 'Ae1 aktivieren
ActiveCell.Offset(1, 0).Activate '1 Zellen von AE1 nach unten springen
variable = ActiveCell.Value 'Wert von AE1 in Speicherdatenfeld lesen
Range("ad1001").Activate 'jeweilige Zelle aktivieren
ActiveCell.Value = variable
Danke und Gruß
Nico