Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
656to660
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
656to660
656to660
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bedingte Zellenformatierung

Bedingte Zellenformatierung
22.08.2005 15:12:26
Gereon
Hallo zusammen,
ich habe Zellinhalte, die innerhalb einer Zelle unterschiedlich formatiert sein sollen.
Bsp.;
P1010000
P1020000
P1110000
P1120000
P2710000
P2810000
Nun soll die zweite Stelle des Zelleninhaltes (also die 1 und die 2) grundsätzlich fett und dann auch noch farbig abgesetzt vom restlichen Zellinhalt dargestellt werden. Idealerweise sollen 1 und 2 auch noch unterschiedliche Farben bekommen.
Kann man eine solche Formatierung in eine Formel packen?
Danke im voraus.
Gruß
Gero

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

Betreff
Datum
Anwender
Anzeige
AW: Bedingte Zellenformatierung
22.08.2005 15:26:16
Andi
Hi,
mit Formel geht das nicht, aber mit folgendem Code sollte es klappen:

Sub format()
Dim zelle As Range
For Each zelle In Selection
zelle.Characters(Start:=2, Length:=1).Font.FontStyle = "Fett"
Select Case Mid(zelle, 2, 1)
Case 1
zelle.Characters(Start:=2, Length:=1).Font.ColorIndex = 3
Case 2
zelle.Characters(Start:=2, Length:=1).Font.ColorIndex = 50
End Select
Next zelle
End Sub

Einfach den gewünschten Bereich markieren und das Makro starten.
Schönen Gruß,
Andi
AW: Bedingte Zellenformatierung
22.08.2005 15:43:52
Gereon
Hallo Andi,
klasse!
Vielen Dank.
Gruß,
Gero
Anzeige
Gern geschehen... (ot)
22.08.2005 15:45:38
Andi
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige