Hallo und Guten Morgen Zusammen!
Ich verwende folgendes Makro:
Dim r As Range
Application.ScreenUpdating = False
Rows.AutoFit
For Each r In ActiveSheet.Range("F12:F61, G4, G12:G61, I12:I61")
r.RowHeight = Application.Max(r.RowHeight, 20)
Next
Application.ScreenUpdating = True
Wie muss ich das in meine Tabelle einbauen, wenn es nach Verlassen der Zelle G1 funktionieren bzw. ausgelöst werrden soll?
Wie immer für jeden Rat sehr dankbar!!!
Gruß Frank H.