Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
496to500
496to500
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zeichenfolge finden

Forumthread: zeichenfolge finden

zeichenfolge finden
07.10.2004 14:21:54
monika
hallo zusammen,
ich hab folgende aufgabe bzw. problem:
eine tabelle besteht aus ca 100 zeilen. es sollen nun alle zeilen die schriftfarbe blau haben, in denen in der ersten zelle die ersten zeichen "er:" sind.
hab leider von excel zu wenig ahnung und geb das auch offen zu. bitte deshalb um verständliche hilfe - wenn möglich.
ich möchte mich aber schon vorab für antworten und bemühungen recht herzlich bedanken !!!
gruß aus werl
monika
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: zeichenfolge finden
Dieter
Hallo Monika
bedingte Formatierung
Formel ist: =LINKS(A2;2)="er"
und Schriftfarbe "blau" wählen
Gruß Dieter
AW: zeichenfolge finden
Ingo
Du gehst mit ALT-F11 in den VBA_Editor, dort Menüleiste > Einfügem > Modul und dort kopierst Du folgenden Code rein:

Sub blau_färben()
Dim rng As Range
Dim letzte_zeile As Long
letzte_zeile = ActiveSheet.Range("A65536").End(xlUp).Row
For Each rng In Range(Cells(1, 1), Cells(letzte_zeile, 1))
If Left(rng, 2) = "er" Then
With ActiveSheet.Rows(rng.Row)
.Interior.ColorIndex = 5
End With
End If
Next rng
End Sub

danach wieder zurück in Deine ExcelMappe und ALT_F8;
Im Dialog Makros erscheint dann Blau_färben und dort nur noch auf Ausführen drücken
mfG
Ingo Christiansen
Anzeige
danke euch beiden
monika
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige