Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Spaltenbreite

Forumthread: Spaltenbreite

Spaltenbreite
09.07.2021 22:03:35
Burghard
Hallo,
ich möchte bei einem Makro die Spaltenbreite etwas optmieren. Im Makro steht bei mir die Zeile:
Worksheets("Test").Cells.EntireColumn.AutoFit
Ich würde aber gerne das "AutoFit" etwas erweitern, in etwa so:
Worksheets("Test").Cells.EntireColumn.AutoFit + ColumnWidth = 8 (geht so nicht)
Geht das in anderer Form überhaupt?
Hilfe wäre nett.
Grüße
Burghard
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenbreite
09.07.2021 22:53:30
oraculix
Versuche es mal so
With Me.Test 'Tabellenname
.ColumnCount = 3 'Spalten Anzahl hier Andern
.ColumnWidths = "7cm;8cm;3cm" 'Spaltenbreite hier Ändern
.ColumnHeads = False '1Zeile ein oder aus True oder False
.RowSource = ""
End With
Gruß Oraculix
kost fast nix
AW: Spaltenbreite
10.07.2021 05:35:45
RPP63
Moin!
Teste mal:
Sub Breite()
Dim c As Range
For Each c In Worksheets("Test").UsedRange.Columns
  c.AutoFit
  c.ColumnWidth = c.ColumnWidth + 8
Next
End Sub
Gruß Ralf
Anzeige
AW: Spaltenbreite
10.07.2021 10:38:32
Burghard
Hallo RPP63,
perfekt! Ergebnis ist wie gewünscht! :-)
Danke!
Grüße
Burghard
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige