Selection wird nicht übernommen
07.01.2021 13:18:47
Christoph
in einer Arbeitsmappe habe ich mehrere Tabellen ("5a"; "5b" usw.). Ich möchte die Spaltenbreite per Makro ändern. Wenn ich nun ein Makro aufzeichne zur Änderung der Spaltenbreite in Tabelle 5a (die Spalten D bis X) und anschließend in Tabelle 5b auch die Spalten D bis X, erhalte ich folgenden Makrocode:
Sub Makro11()
' Makro11 Makro
Columns("D:X").Select
Selection.ColumnWidth = 7
Sheets("5b").Select
Columns("D:X").Select
Selection.ColumnWidth = 7
End Sub
Nun das Problem: wenn ich das Makro ausführe, werden die Spalten B und C ebenfalls auf diese Spaltenbreite gesetzt (Spalte A aber nicht, auch die Spalten nach X bleiben in ihrer ursprünglichen Breite).
Sicher ein einfaches Problem - aber ich sehe meinen Fehler nicht.