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

Zellen formatieren per VBA

Forumthread: Zellen formatieren per VBA

Zellen formatieren per VBA
07.08.2002 15:10:11
Simon
Ich möchte gerne per VBA alle Zellen in einem Sheet formatieren. D.h. alle Zellen sollen die Eigenschaft "Text" zugewiesen bekommen. Von Hand würde das so aussehen, dass man erst auf die Zelle rechtsklickt, dann "Zellen formatieren..." auswählt und schließlich unter "Zahlen" die "Kategorie" "Text" auswählt. Wie erreiche ich das nun mit Hilfe von VBA mit allen Zellen des Sheets?

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zellen formatieren per VBA
07.08.2002 15:12:18
michel
hallo simon,

erster tipp.....probiere mal die makroaufzeichnung, da kann man sowas lernen...
zweiter tipp....markiere einfach das ganze sheet und formatiere deine zellen....

michel

Re: Zellen formatieren per VBA
07.08.2002 15:45:49
Thomas Kahnt
Sub AlleZellenText()
ActiveSheet.Cells.NumberFormat = "@"
End Sub
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Zellen formatieren per VBA


Schritt-für-Schritt-Anleitung

Um alle Zellen in einem Excel-Blatt per VBA als Text zu formatieren, kannst du einfach den folgenden VBA-Code verwenden:

Sub AlleZellenText()
    ActiveSheet.Cells.NumberFormat = "@"
End Sub

Dieser Code setzt das Format aller Zellen in dem aktiven Blatt auf "Text". Du kannst diesen Code in den VBA-Editor einfügen, den du über ALT + F11 erreichst. Wähle dann das entsprechende Arbeitsblatt aus und füge den Code in ein neues Modul ein. Mit F5 führst du das Makro aus.


Häufige Fehler und Lösungen

  • Fehler: "Das Makro kann nicht ausgeführt werden."

    • Lösung: Stelle sicher, dass die Makros in Excel aktiviert sind. Du findest diese Option unter Datei -> Optionen -> Trust Center -> Einstellungen für das Trust Center -> Makroeinstellungen.
  • Fehler: Zellen werden nicht als Text formatiert.

    • Lösung: Überprüfe, ob du den richtigen Arbeitsbereich gewählt hast. Der Code funktioniert nur im aktiven Arbeitsblatt.

Alternative Methoden

Falls du nicht mit VBA arbeiten möchtest, kannst du auch die folgende Methode verwenden:

  1. Markiere alle Zellen im Arbeitsblatt.
  2. Klicke mit der rechten Maustaste und wähle Zellen formatieren....
  3. Wähle im Tab Zahlen die Kategorie Text aus und bestätige mit OK.

Diese Methode ist zwar manuell, aber hilfreich, wenn du kein VBA verwenden möchtest.


Praktische Beispiele

  1. Formatierung einer bestimmten Spalte als Text:

    Wenn du nur eine bestimmte Spalte als Text formatieren möchtest, kannst du den folgenden Code verwenden:

    Sub SpalteAlsTextFormatieren()
       Columns("A:A").NumberFormat = "@"
    End Sub

    Dieser Code formatiert die gesamte Spalte A als Text.

  2. Formatierung eines spezifischen Zellbereichs:

    Sub BereichAlsTextFormatieren()
       Range("B1:B10").NumberFormat = "@"
    End Sub

    Hiermit wird der Bereich von B1 bis B10 als Text formatiert.


Tipps für Profis

  • Nutze die Makroaufzeichnung, um dir den VBA-Code automatisch generieren zu lassen, wenn du das Formatieren von Zellen manuell durchführst. So bekommst du ein besseres Verständnis für den Code.
  • Experimentiere mit dem VBA-Editor und passe bestehende Codes an deine Bedürfnisse an.

FAQ: Häufige Fragen

1. Wie kann ich die Formatierung auf mehrere Arbeitsblätter anwenden? Verwende eine Schleife im VBA-Code, um durch alle Arbeitsblätter zu iterieren und die Zellen zu formatieren.

2. Kann ich einen Shortcut für das Ausführen des VBA-Codes erstellen? Ja, du kannst im VBA-Editor unter Extras -> Makros den gewünschten Makronamen auswählen und dann Optionen wählen, um einen Shortcut festzulegen.

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