Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1180to1184
1180to1184
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltenbreite zurücksetzen

Forumthread: Spaltenbreite zurücksetzen

Spaltenbreite zurücksetzen
Heinz
Hallo Leute
Mit unteren Code wird die Spaltenbreite automatisch bei eintrag verbreitert.
Nun möchte ich aber auch in diesen Code noch, wenn der Eintrag wieder gelöscht wird, das die Spaltenbreite automatisch wieder auf 3,0 zurückgeht.
Bitte um Hilfe
Gruß
Heinz
Private Sub Worksheet_Activate()
Range("A1:AH154").Columns.AutoFit
End Sub

Anzeige

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

Betreff
Benutzer
Anzeige
AW: Spaltenbreite zurücksetzen
07.10.2010 11:48:45
Bertram
Hallo Heinz,
du schreibst DER Eintag. Woher soll Excel wissen, welchen Eintrag in dem Bereich du meinst?
LG
Bertram
AW: Spaltenbreite zurücksetzen
07.10.2010 11:52:26
welga
Hallo,
schreibe folgenden Code in das Arbeitsblatt:
Private Sub worksheet_change(ByVal target As Range)
Application.EnableEvents = False
target.Columns.AutoFit
If target.Columns.ColumnWidth  "" Then target.Columns.ColumnWidth = 3
Application.EnableEvents = True
End Sub
Damit wird die Mindestbreite bei jeder Änderung auf 3 gesetzt, falls aber größer gebraucht, automatisch angepasst.
Gruß
Anzeige
AW: Spaltenbreite zurücksetzen
07.10.2010 12:02:50
Heinz
Hallo Welga
Wiederum ein recht herzliches D A N K E
Gruß
Heinz
;
Anzeige
Anzeige

Infobox / Tutorial

Spaltenbreite zurücksetzen in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und wähle das Arbeitsblatt aus, in dem Du die Spaltenbreite zurücksetzen möchtest.

  2. Drücke Alt + F11, um den VBA-Editor zu öffnen.

  3. Füge den folgenden Code in das Arbeitsblattmodul ein:

    Private Sub Worksheet_Change(ByVal target As Range)
   Application.EnableEvents = False
   target.Columns.AutoFit
   If target.Columns.ColumnWidth <> "" Then 
       target.Columns.ColumnWidth = 3
   End If
   Application.EnableEvents = True
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Teste den Code, indem Du einen Wert in die Zellen eingibst und dann wieder löschst. Die Spaltenbreite sollte automatisch auf 3 zurückgesetzt werden.

Häufige Fehler und Lösungen

  • Fehler: Der Code funktioniert nicht, wenn ich Zellen lösche.

    • Lösung: Stelle sicher, dass Du den Code im richtigen Arbeitsblattmodul eingefügt hast. Der Code muss im Modul des entsprechenden Arbeitsblatts platziert werden.

  • Fehler: Excel gibt eine Fehlermeldung aus.

    • Lösung: Überprüfe, ob die Application.EnableEvents Zeilen korrekt eingefügt sind. Diese verhindern, dass der Code wiederholt ausgelöst wird.

Alternative Methoden

Eine weitere Möglichkeit, die Spaltenbreite in Excel zurückzusetzen, ist die Verwendung von Tastenkombinationen:

  • Spaltenbreite automatisch anpassen: Markiere die Spalten und drücke Alt + H, gefolgt von O und dann I für "AutoFit".
  • Spaltenbreite manuell anpassen: Du kannst die Spaltenbreite auch manuell einstellen, indem Du die Grenze der Spalte doppelt klickst oder mit der Maus ziehst.

Praktische Beispiele

  • Beispiel 1: Wenn Du die Spaltenbreite an den Text anpassen möchtest, kannst Du die Tastenkombination Alt + H, O, I verwenden.
  • Beispiel 2: Um alle Spaltenbreiten gleichzeitig anzupassen, markiere alle Spalten und drücke die gleiche Kombination.

Tipps für Profis

  • Tastenkombinationen nutzen: Mit der Tastenkombination Ctrl + A kannst Du alle Zellen auswählen, bevor Du die Spaltenbreite anpasst.
  • Standardzeilenhöhe festlegen: Wenn Du die Standardzeilenhöhe in Excel zurücksetzen möchtest, gehe zu Start > Format > Zeilenhöhe und setze sie auf die gewünschte Höhe.
  • Makros verwenden: Überlege, ein Makro zu erstellen, um die Spaltenbreite und Zeilenhöhe regelmäßig zurückzusetzen.

FAQ: Häufige Fragen

1. Wie kann ich die gesamte Spaltenbreite anpassen? Um alle Spaltenbreiten anzupassen, markiere die gesamte Tabelle und drücke Alt + H, O, I.

2. Kann ich die Standardzeilenhöhe in Excel ändern? Ja, gehe zu Start > Format > Zeilenhöhe und lege die gewünschte Höhe fest.

3. Gibt es eine Tastenkombination, um die Spaltenbreite manuell zu ändern? Ja, markiere die Spalte und ziehe die Grenze mit der Maus oder drücke Alt + H, O, W, um die Breite manuell einzustellen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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