Code verschönern
03.08.2018 09:07:55
Sonaldo
habe mit dem Makro Recorder einen Code aufgenommen:
Range("S18").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("L:R").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlToLeft
Range("S8").Select
Kann man den irgendwie eleganter machen?