Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA Autofit Spaltenbreite bei Änderung

VBA Autofit Spaltenbreite bei Änderung
08.09.2015 10:08:43
Michael
Hallo,
besteht die Möglichkeit einer automatischen Spalten und Zeilenanpassung mittels VBA beim öffnen eines Sheets/Tabs? Es geht darum, dass bei unterschiedlicher Monitorauflösung teilweise die Werte ### werden. Der Anwender soll nicht umständlich selber die Spaltenbreite anpassen, das soll automatisch geschehen. Genauso wenn man die Zoomstufe verändert.
Gruß
Michael

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Autofit Spaltenbreite bei Änderung
08.09.2015 11:42:52
Michael
Hallo Michael!
Diese Möglichkeit besteht. Bspw. so (Code muss in DieseArbeitsmappe - Alt+F11 um in den VB-Editor zu gelangen, links oben im Projektexplorer DoKlick auf DieseArbeitsmappe - Code einfügen):
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Sh.Cells.EntireColumn.AutoFit
End Sub
Damit werden alle Spalten jenes Tabellenblattes AutoAngepasst, das gerade ausgewählt wurde. Bezieht sich somit auf alle Tabellenblätter. Einschränkung auf nur 1 Blatt wäre möglich.
LG
Michael

Anzeige
AW: Für nur 1 bestimmtes Tabellenblatt...
08.09.2015 11:45:23
Michael
Michael,
... schaut der Code so aus - Tabellenblattname muss natürlich angepasst werden:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Tabelle1" Then
Sh.Cells.EntireColumn.AutoFit
End If
End Sub
LG
Michael

Anzeige
AW: VBA Autofit Spaltenbreite bei Änderung
08.09.2015 11:49:32
Michael
Danke Michael,
ich hatte einen ähnlichen Ansatz gefunden aber deine Variante scheint schneller zu sein!
Danke und Gruß
Michael

AW: Gerne, Danke für die Rückmeldung, owT
08.09.2015 12:25:47
Michael
;
Anzeige

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