Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Teilbereich einer Zelle einfärben

Teilbereich einer Zelle einfärben
21.07.2008 09:16:00
TommiH
Moin,
kann man eigentlich gezielt z.B. die ersten 10 Zeichen einer Zelle X einfärben? Also die Schriftart. Ich habe schon mit dem Makrorecorder rumgespielt, aber mit dem Output komme ich nicht ganz klar.
Da steht immer etwas von
' ActiveCell.FormulaR1C1 = "Beitrag von: .blafasel"
Nur ich weiss ja nicht was genau in den "" steht, ich hatte irgendwie gedacht, das etwas in der Form
Range(Cells(y,1),Cells(y,1)).Characters(Start:=1, Length:=12).ColorIndex = 3
funktionieren würde... Aber da kommt nur ein Fehler.
LG,
Tommi

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teilbereich einer Zelle einfärben
21.07.2008 09:39:00
fcs
Hallo Tommi,
die Formatierung von einzelnen Zeichen ist nur zellenweise möglich. Du muss die Zellen also in einer Schleife abarbeiten.
Gruß
Franz

Sub aa()
For Zeile = 2 To Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row
If Len(Cells(Zeile, 1).Value) 


So spllte es gehen:
21.07.2008 09:42:21
Worti
Range("B1").Characters(Start:=1, Length:=10).Font.ColorIndex = 3
Worti

AW: So spllte es gehen:
21.07.2008 10:30:54
TommiH
Hallo Worti,
ah, FONT fehlte, super danke! so gehts.
LG,
Tommi

AW: Teilbereich einer Zelle einfärben
21.07.2008 09:42:40
done
Hallo,
fast richtig.
Cells(y, 1).Characters(Start:=1, Length:=10).Font.ColorIndex = 3
Gruß
Rudi
Anzeige

307 Forumthreads zu ähnlichen Themen


Hallöchen,
folgendes Problem,
ich habe eine Artikelerfolgsauflistung (Alpha-Numerisch gefüllte Zellen) über den Bereich Tabelle3!A2-G99.
Über eine Lagerbestandsliste in Tabelle1!B2-B99, die ich per copy/paste täglich aktualisieren kann zählt mir das Programm automatisch die Menge, i...

Hallo Forum,
ich habe in Zeile 1 in jeder Spalte einen Buchsteben stehen:
a|b|c|c|c|e|
Wie kann ich die Zelle ausgeben lassen, in der beispielsweise das "c" das erste mal vorkommt? Als Ergebnis soll dann C1 ausgegeben werden.
Besten Dank!
-s

Moins!
ich würde gerne Teile einer Zelle tiefgestellt haben, finde aber keine Einstellung dazu.
Bisher bekomme ich das nur hin, indem ich den Text so wie er sein soll von Word aus in die Zelle kopiere.
Geht das nicht auch einfacher?
Gruß, Lars

Mahlzeit an alle,
habe wohl ne ganz einfache Sache .. ich suche ne kleine Formel, womit ich in A1 die ersten 4 Zeichen in der Zelle B1 wieder anzeige, also kopiert wird
Danke und gruß Eddie

Moin Excellianer!
Wie kann man in einer TextBox (in einem UserForm) Leerzeichen links des ersten Wortes so rausfiltern, dass der TB-Eintrag wirklich mit einem Zeichen beginnt? ...und keinem Leerzeichen.
Vielen Dank für Eure Hilfe!
Viele Grüße aus dem hohen Norden!
Lenni

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige