HERBERS Excel-Forum - das Archiv
Spaltenbreite jeder einzelnen Spalte auslesen
Frank

Guten Morgen,
wie kann ich mir alle Spaltenbreiten in einem Arbeitsblatt in einem zweiten Arbeitsblatt ausgeben lassen? Es sollen alle Spalten berücksichtigt werden, egal, ob sie eventuell ausgeblendet sind (Spaltenbreite null) oder gruppiert sind.
Ist das möglich?
Vielen Dank,
Frank

AW: Spaltenbreite jeder einzelnen Spalte auslesen
Rudi

Hallo,
in ein Modul:
Sub tt()
Dim c As Range, i As Long
For Each c In Sheets(1).Columns
i = i + 1
Sheets(2).Cells(1, i) = c.ColumnWidth
Next
End Sub

Gruß
Rudi
AW: Spaltenbreite jeder einzelnen Spalte auslesen
Frank

vielen dank!