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

Forumthread: Feste Spaltenbreite

Feste Spaltenbreite
17.03.2005 14:40:03
Gio*
Salü,
Mein Problem ist folgendes:
Beim aktualisieren der Pivot Tabelle wird die Spaltenbreite jedes mal verstellt so das ich jede einzelne wieder anpassen muss.
Gibt es eine Möglichkeit den Spalten eine feste Breite zuzuweisen die sie dann für immer beibehalten.
Danke für die Antwort
Gio*
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Feste Spaltenbreite
17.03.2005 14:47:22
Holger
Hallo Gio,
sieh mal in der Symbolleiste unter PivotTable unter Tabellenoptionen nach (dort "Formatierung beibehalten").
Holger
AW: Feste Spaltenbreite
17.03.2005 14:49:46
Gio*
Hallo Holger,
danke für die rasante Antwort, jedoch habe ich diese Option bereits abgecheckt. Funktioniert leider nicht.
Trozdem Danke!
Gio*
AW: Feste Spaltenbreite
17.03.2005 14:51:55
Holger
ladfe die datei doch mal hoch, damit man den Effekt betrachten kann.
Holger
Anzeige
AW: Feste Spaltenbreite
17.03.2005 14:55:27
Gio*
Sorry, darf nicht. Sind streng vertrauliche Daten.
Aber nochmals Danke
Gio*
AW: Feste Spaltenbreite
17.03.2005 14:55:54
Holger
Hallo Gio,
nicht nötig. Du musst den Haken bei "Tabelle AutoFormatieren" rausnehmen.
Holger
AW: Feste Spaltenbreite
17.03.2005 15:22:07
Gio*
Das Problem ist, das PivotTable ist mit einer Formatvorlage verknüpft, wenn ich also den Haken entferne, entferne ich auch die Vorlage.
Aber weisst Du zufälligerweise wie ich ein Makro erstelle der mit immer automatisch die richtige (optimale) Spaltenbreite einstellt?
Gio*
Anzeige
AW: Feste Spaltenbreite
21.03.2005 18:35:29
Erich
Hallo Gio,
ärgere mich da auch immer; habe das so gelöst:

Sub Spalte_opt()
Dim mySpalte As Integer
Dim iSpalte As Integer  ' Byte
Cells.Select
With Selection
.WrapText = False
End With
Range("A1").Select
' Hier die maximale Spaltenbreite einstellen
Const MaxBreite = 60
mySpalte = Cells.SpecialCells(xlCellTypeLastCell).Column
Range(Cells(1, 1), Cells(1, mySpalte)).EntireColumn.AutoFit
For iSpalte = 1 To mySpalte
If Columns(iSpalte).ColumnWidth > MaxBreite Then _
Columns(iSpalte).ColumnWidth = MaxBreite
Next iSpalte
End Sub

mfg
Erich
http://www.toolex.de
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Feste Spaltenbreite in Excel festlegen


Schritt-für-Schritt-Anleitung

Um die Spaltenbreite in Excel zu fixieren, befolge diese Schritte:

  1. PivotTable Optionen: Gehe zur PivotTable und klicke mit der rechten Maustaste darauf. Wähle "PivotTable Optionen".
  2. Formatierung beibehalten: Aktiviere unter dem Reiter "Layout & Format" die Option "Formatierung beibehalten". Dies sorgt dafür, dass die Spaltenbreite nach einer Aktualisierung nicht zurückgesetzt wird.
  3. AutoFormatierung deaktivieren: Stelle sicher, dass der Haken bei "Tabelle AutoFormatieren" entfernt ist. Dies verhindert, dass die Spaltenbreite von einer Formatvorlage beeinflusst wird.
  4. Feste Spaltenbreite manuell festlegen: Klicke auf die Spaltenüberschrift, ziehe den Rand der Spalte und stelle deine gewünschte Breite ein.

Häufige Fehler und Lösungen

  • Spaltenbreite wird nicht beibehalten: Wenn die Breite nach der Aktualisierung der PivotTable zurücksetzt, überprüfe die AutoFormatierungs-Optionen und stelle sicher, dass der Haken entfernt ist.

  • Formatvorlage wird entfernt: Wenn du die AutoFormatierung deaktivierst, kann die Formatvorlage verloren gehen. Erstelle eine eigene Formatvorlage oder wähle eine, die deinen Anforderungen entspricht.


Alternative Methoden

  1. Makro zur Automatisierung: Du kannst ein Makro verwenden, um die Spaltenbreite automatisch festzulegen. Ein Beispiel-Makro könnte so aussehen:

    Sub Spalte_opt()
       Dim mySpalte As Integer
       Dim iSpalte As Integer
       Const MaxBreite = 60
    
       Cells.Select
       With Selection
           .WrapText = False
       End With
       mySpalte = Cells.SpecialCells(xlCellTypeLastCell).Column
       Range(Cells(1, 1), Cells(1, mySpalte)).EntireColumn.AutoFit
    
       For iSpalte = 1 To mySpalte
           If Columns(iSpalte).ColumnWidth > MaxBreite Then _
               Columns(iSpalte).ColumnWidth = MaxBreite
       Next iSpalte
    End Sub
  2. Zellenbreite fixieren: Um die Breite einzelner Zellen zu fixieren, kannst du die Zellen manuell anpassen und dann die Zellenformatierung sperren.


Praktische Beispiele

  • Feste Spaltenbreite in einer Tabelle: Wenn du eine Excel-Tabelle erstellst und die Spaltenbreite fixieren möchtest, gehe zu "Tabellen-Design" und stelle die Breite der gewünschten Spalten ein. Dadurch bleibt die Breite auch nach Sortierungen oder Filterungen erhalten.

  • Pivot Tabelle Spaltenbreite fixieren: In einer Pivot-Tabelle kannst du die Breite der Spalten manuell einstellen und durch die oben genannten Schritte sicherstellen, dass sie bei der Aktualisierung erhalten bleibt.


Tipps für Profis

  • Nutze die Funktion "Spaltenbreite sperren", um Änderungen durch andere Benutzer zu verhindern. Dies ist besonders nützlich in geteilten Arbeitsmappen.

  • Überlege, ob du die Zeilenhöhe ebenfalls sperren möchtest, um eine einheitliche Darstellung deiner Daten zu gewährleisten.

  • Wenn du oft mit Pivot-Tabellen arbeitest, investiere Zeit in das Erstellen von Makros, die die Spaltenbreite automatisch anpassen, um Zeit zu sparen.


FAQ: Häufige Fragen

1. Wie kann ich die Spaltenbreite in Excel dauerhaft fixieren? Um die Spaltenbreite in Excel dauerhaft zu fixieren, entferne die AutoFormatierungs-Option und stelle die Breite manuell ein.

2. Was kann ich tun, wenn die Spaltenbreite nach einer Aktualisierung der Pivot-Tabelle verloren geht? Stelle sicher, dass die Option "Formatierung beibehalten" aktiviert ist und die AutoFormatierung deaktiviert wurde. Wenn das Problem weiterhin besteht, erwäge die Verwendung eines Makros, um die Breite automatisch wiederherzustellen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige