2 Schriftarten für Text in Zelle

Forumthread: 2 Schriftarten für Text in Zelle
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: 2 Schriftarten für Text in Zelle

Joni

Hi,
ich möchte in eine Telle Zelle mit VBA Text schreiben. Der Text setzt sich aus
1. Wert aus einer anderen Zelle &
2. Zeilenumbruch &
3. Text in Wingdings (1 Zeichen) &
4. "normaler Text
zusammen.
1 + 4 ist in Tahoma
Geht das überhaupt?
Danke und Gruß
Joni

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Makrorekorder schon angeworfen?

Bertram
AW: Makrorekorder schon angeworfen?

Joni
Nix umfangreich:-)

Bertram

Makrorekorder schon angeworfen?

14.02.2011 16:51:35

Bertram

Hallo Joni,
warum sollte das nicht gehen? Probier doch mal den Makrorekorder.
Gruß
Bertram

AW: Makrorekorder schon angeworfen?

14.02.2011 17:04:22

Joni

Hallo Bertram,
ok auf der Grundlage kann ich aufbauen. Wird mit den variablen Längen dann zwar etwas umfangreicher sollte aber gehen. Danke für den Tipp (hätte ich auch selber drauf kommen können).
Gruß Joni

Nix umfangreich:-)

14.02.2011 17:06:49

Bertram

Hallo Joni,
ganz schnell:
Teil 1, 3 und 5 in A1, B1, C1
Dann folgender Code:

Sub Verketten()
With Range("C4")
.Value = [a1] & Chr(10) & [b1] & Chr(10) & [c1]
.Characters(Len([a1]) + 2, 1).Font.Name = "wingdings"
End With
End Sub

Gruß
Bertram

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