Ich habe mir folgendes Makro geschrieben. Leider komme ich nicht mehr weiter. Ich möchte im gleichen Makro noch einen zweiten Bereich formatieren.
Bereich 1: ("k14:v62")
Bereich 2: ("BH14:BS62")
Beim Bereich 1: wären die plus 10 richtig jedoch stimmt dies dann nicht mehr für bereich 2.
Gibt es eine Lösung, damit ich diese plus 10 nicht habe oder irgend eine andere Variante?
________________________________________________________________________
Sub Quartal_Formatierung_Monate()
Dim sSheet As Variant, iQuartal As Integer, c As Range
iQuartal = Sheets("Steuerung").Range("A1")
Application.ScreenUpdating = False
For Each sSheet In Array("Sheet1", "Sheet1", "Sheet2")
With Sheets(sSheet)
For Each c In Sheets(sSheet).Range("k14:v62").Cells
With c
If .Column
____________________________________________________________________VIelen Dank für die Hilfe