Microsoft Excel

Herbers Excel/VBA-Archiv

Spaltenbreite jeder einzelnen Spalte auslesen | Herbers Excel-Forum


Betrifft: Spaltenbreite jeder einzelnen Spalte auslesen von: Frank Schmalacker
Geschrieben am: 27.11.2009 09:06:33

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

  

Betrifft: AW: Spaltenbreite jeder einzelnen Spalte auslesen von: Rudi Maintaire
Geschrieben am: 27.11.2009 09:13:11

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


  

Betrifft: AW: Spaltenbreite jeder einzelnen Spalte auslesen von: Frank Schmalacker
Geschrieben am: 27.11.2009 09:17:53

vielen dank!


Beiträge aus den Excel-Beispielen zum Thema "Spaltenbreite jeder einzelnen Spalte auslesen"