jede dritte Zelle verbinden
04.07.2018 16:45:27
Jakob
Ich möchte in einer Spalte jede dritte Zelle mit den 2 darunterliegenden verbinden (also z.B. A3 bis A5, A6 bis A8 usw.). Inhalt ist nur in der obersten Zelle (in diesem Beispiel A3, A6), also kein Problem.
Folgenden Code hab ich schon, einzig dieser Sprung zu jeder dritten Zelle will mir nicht gelingen. Kann mir jemand den Code bitte ergänzen? (Next i+3 funktioniert nicht)
DAnke,
LG; Jakob
For i = 1 To 100
Range(Cells(3, i), Cells(5, i)).MergeCells = True
Next i