Indset celle

I nedenstående eksempel vil du via objRange stadig have fat i den celle, der bliver "skubbet" en tand til højre.

Sub InsertCell
    Dim objRange As Range
   
    Set objRange = Selection.Offset(0, 12)
    objRange.Insert xlToRight
   
    Set objRange = Nothing
End Sub

Thx word-hajen, super

Ja, i høre noke ikke så meget fra mig mere nu da jeg har fundet ud af,
at der var en anden med samme ide, og har ført den ud i livet, sådan noget suug

svar tak

Svar :-)