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

Forumthread: Einzelnes Wort in Zelle mittels Formel formatieren

Einzelnes Wort in Zelle mittels Formel formatieren
Richard
Hallo miteinander
Ziel: Ich möchte bestimmte Wörter in einer Zelle farblich hervorheben.
Im Feld A1 steht bspw. folgender Text: Der Briefträger kommt jeden Samstag um acht Uhr.
Im Feld B1 möchte ich nun exakt den gleichen Text, jedoch das Wort "Briefträger" und das Wort "Samstag" fett geschrieben.
Wie muss ich dazu die Formel im Feld B1 bauen?
Danke für die Hilfe.
Anzeige
AW: Einzelnes Wort in Zelle mittels Formel formatieren
18.03.2011 22:45:49
Rudi
Hallo,
solltest du bei dem Level wissen: Geht nicht.
Gruß
Rudi
AW: Einzelnes Wort in Zelle mittels Formel formatieren
18.03.2011 23:05:46
Richard
Salü Rudi
Gibt's auch kein VBA-Befehl, mit dem man die Formatierung eines Worts bestimmen kann?
Gruss
VBA geht schon
18.03.2011 23:27:06
Matthias
Hallo
Du hattest aber geschrieben das Du in B1 eine Formel einbauen wolltest
Und bei ner Formel geht es eben nicht.
VBA geht z.B so:
Text in A1
Der Briefträger kommt jeden Samstag um acht Uhr.
BeispielCode:
Sub TexTinA1()
[A1].Font.Bold = False
[A1].Characters(Start:=5, Length:=11).Font.Bold = True
[A1].Characters(Start:=29, Length:=8).Font.Bold = True
End Sub
Gruß Matthias
Anzeige
AW: VBA geht schon
18.03.2011 23:41:57
Richard
Salü Matthias, Salü Erich
Danke für die Tipps.
Damit das ganze funktioniert, muss ich ein Makro mit euren Befehlszeilen bzw. Tipps anlegen und es jeweils bezogen auf die Zelle, die formatiert werden muss, laufen lassen.
Ist das richtig?
Ja, richtig ...
18.03.2011 23:54:19
Matthias
Hallo
... und evtl solltest Du noch das entsprechende Tabellenblatt mit referenzieren.
also in etwa so
Worksheets("Tabelle1").[A1].Characters(Start:=5, Length:=11).Font.Bold = True

oder auch so:
Worksheets("Tabelle1").Range("A1").Characters(Start:=5, Length:=11).Font.Bold = True

oder so:
Worksheets("Tabelle1").Cells(1,1).Characters(Start:=5, Length:=11).Font.Bold = True
Gruß Matthias
Anzeige
AW: Ja, richtig ...
18.03.2011 23:59:31
Richard
ok, dann ist's mir soweit klar, werde mich morgen früh mal dahinterklemmen.
Gute Nacht
OT Nachfrage
19.03.2011 00:47:43
Reinhard
Hallo Matthias,
benutzt du in deinen Codes die Schreibweise [A1]?
Zweite Frage, gibt es Konstellationen wo ich mit Range() oder Cells(9 nicht hinkomme und [A1]-Form benutzen muß?
Danke ^ Gruß
Reinhard
Anzeige
AW: OT Nachfrage - zweite Frage
19.03.2011 07:25:08
Gerd
Hallo Reinhard,
nein.
Gruß Gerd
Antwort auf Nachfrage ...
19.03.2011 08:38:35
Matthias
Hallo
Antwort auf Frage 1:
[Adresse] benutze ich selten(und wenn, dann nur aus Schreibfaulheit ;o), oft Range(), oft auch Cells()
Am meisten benutze ich aber definierte Namen
Antwort auf Frage 2:
siehe Antwort von Gerd
Gruß Matthias
Anzeige
Teile eines Textes in einer Zelle formatieren
18.03.2011 23:27:38
Erich
Hi Richard,
schau dir mal die Eigenschaft Characters an. Darüber kannst du Teile einer (konstanten) Textes formatieren.
Cells(1, 1).Characters(3, 4).Font.Size = 15
stellt die 3. bis 6. Stelle des Textes in A1 auf Schriftgröße 15.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: Teile eines Textes in einer Zelle formatieren
18.03.2011 23:41:41
Richard
Salü Matthias, Salü Erich
Danke für die Tipps.
Damit das ganze funktioniert, muss ich ein Makro mit euren Befehlszeilen bzw. Tipps anlegen und es jeweils bezogen auf die Zelle, die formatiert werden muss, laufen lassen.
Ist das richtig?

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Einzelnes Wort in Zelle formatieren


Schritt-für-Schritt-Anleitung

Um ein einzelnes Wort in einer Zelle fett zu formatieren, kannst du in Excel keine Formel verwenden, da die Formatierung nur über VBA möglich ist. Hier ist eine einfache Schritt-für-Schritt-Anleitung, wie du dies mit VBA umsetzen kannst:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und dann auf Modul, um ein neues Modul zu erstellen.

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

    Sub TexTinA1()
       Worksheets("Tabelle1").[A1].Characters(Start:=5, Length:=11).Font.Bold = True
       Worksheets("Tabelle1").[A1].Characters(Start:=29, Length:=8).Font.Bold = True
    End Sub

    In diesem Beispiel wird das Wort "Briefträger" (Position 5-15) und "Samstag" (Position 29-36) fett formatiert.

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

  5. Führe das Makro aus, indem du auf Entwicklertools > Makros klickst und das Makro TexTinA1 auswählst.


Häufige Fehler und Lösungen

  • Fehler: "Der Code funktioniert nicht."

    • Lösung: Stelle sicher, dass das Makro in der richtigen Arbeitsmappe und im richtigen Modul eingefügt wurde. Überprüfe auch, ob die Zellen korrekt referenziert sind.
  • Fehler: "Es wird kein Text fett dargestellt."

    • Lösung: Überprüfe die Startposition und die Länge der Zeichen im Code. Diese müssen mit den genauen Positionen der Wörter übereinstimmen, die du formatieren möchtest.

Alternative Methoden

Wenn du keine VBA-Programmierung verwenden möchtest, kannst du die Bedingte Formatierung in Excel nutzen, um bestimmte Wörter farblich hervorzuheben. Allerdings ist diese Methode nicht für die direkte Formatierung von Text innerhalb einer Zelle geeignet. Hier kannst du nur die gesamte Zelle formatieren.

Um einzelne Wörter farbig zu markieren, musst du manuell den Text in der Zelle bearbeiten und die gewünschten Wörter auswählen, um sie fett zu schreiben oder die Schriftfarbe zu ändern.


Praktische Beispiele

Hier sind einige Beispiele, wie du die oben genannten Methoden umsetzen kannst:

  • VBA-Beispiel für das Fettformatieren von Wörtern:

    Sub TextFormatieren()
       With Worksheets("Tabelle1").Range("A1")
           .Characters(1, 3).Font.Bold = True       ' Erstes Wort
           .Characters(5, 11).Font.Bold = True      ' Zweites Wort
           .Characters(20, 8).Font.Color = RGB(255, 0, 0) ' Drittes Wort rot
       End With
    End Sub
  • Bedingte Formatierung:

    • Wähle die Zelle aus, gehe zu Start > Bedingte Formatierung > Neue Regel, um bestimmte Bedingungen für die gesamte Zelle zu definieren.

Tipps für Profis

  • Wenn du mit vielen Zellen arbeitest, erstelle eine Schleife in deinem VBA-Code, um mehrere Zellen gleichzeitig zu formatieren.
  • Nutze definierte Namen für Zellen, um deinen Code übersichtlicher zu gestalten.
  • Teste deine Makros in einer Kopie deiner Datei, um unerwünschte Änderungen zu vermeiden.

FAQ: Häufige Fragen

1. Kann ich bestimmte Wörter in einer Formel fett formatieren? Nein, Excel erlaubt keine Formatierungen innerhalb einer Formel. Du kannst nur VBA verwenden.

2. Was ist der Unterschied zwischen Range und Cells? Range verwendet Zelladressen (z.B. "A1"), während Cells Zeilen- und Spaltennummern verwendet (z.B. Cells(1,1) für A1). Beide Methoden sind gleichwertig, abhängig von deinem Bedarf.

3. Wie kann ich mehrere Wörter in einer Zelle farbig markieren? Das Markieren mehrerer Wörter erfordert ebenfalls VBA. Du kannst die Characters-Eigenschaft verwenden, um spezifische Teile des Textes zu formatieren.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige