Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:23:45
Gehe zu Tabellenblatt
23.04.2024 14:07:03
Alternative Summewenn für Verlinkung closed Workbook
23.04.2024 13:44:37
Datum in Excelformel anzeigen
23.04.2024 13:31:41
alle Tabellblätter als csv exportieren - Verzeichnis wählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
580to584
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
580to584
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellenformatierung erkennen

Zellenformatierung erkennen
04.03.2005 10:50:20
atikar
Hi Leute,
kann ich mit einem Makro abragen welche formatierung vorhanden ist.
z.B. in einer Zelle steht der Text "Ich bin da"
Jetzt ist das Wort "Ich" fett geschrieben
das Wort "bin" kursiv
und das Wort "da" unterstrichen.
Das Makro soll mir jetzt sagen das von Buchstabe 1-3 fett ist von Buchstabe 5-7 kursiv usw.
ciao
atikar

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellenformatierung erkennen
04.03.2005 11:31:19
Matthias G
Hallo Atikar,
ein Beispiel:
Sub Test()
Dim l As Long, i As Long
l = Len(ActiveCell)
For i = 1 To l
Debug.Print i & ". Zeichen:"
With ActiveCell.Characters(Start:=i, Length:=1).Font
Debug.Print "  Font: " & .Name
Debug.Print "  FontStyle: " & .FontStyle
Debug.Print "  Size: " & .Size
Debug.Print "  Bold: " & .Bold
Debug.Print "  ColorIndex: " & .ColorIndex
End With
Next
End Sub
Gruß Matthias

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige