wie kann ich bei der Merge Anweisung verhindert , das dauernd die Meldung kommt, dass alle Zellen überschrieben werden.
Danke
Alex
Sub merge_cells()
Application.DisplayAlerts = False
Range("A1:C1").MergeCells = True
Application.DisplayAlerts = True
End Sub