Hallo SOUTHAMERICA70,
Sie konnten einfach ersetzen
Spalten („A: F“). Auserwählt
Selection.ColumnWidth = 20
mit
[a: a] .ColumnWidth = 26.29
[b: b] .ColumnWidth = 13.29
'usw.
Sie konnten auch gerade autofit die Strecke:
Spalten („A: F“) .AutoFit
Respekt,
Patrick