Schriftgröße im Kommentarfeld

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Luc,
wenn ich in diesem Forum etwas frage, dann habe ich vorher schon umfangreich recherchiert. Ich frage um zu lernen
und nicht um mir den Aufwand abnehmen zu lassen.
In der VBA-Hilfe wird meine Frage nicht beschrieben, auch umfangreiches Suchen im Internet hat meine Frage nicht beantwortet.
Es wird in allen gefundenen Beispielen nur für den gesamten Kommentartext die Schriftgröße angegeben und nicht für einzelne
Strings bzw. Buchstaben. Einzelne Strings oder Buchstaben kann ich mit unterschiedlichen Schrifttypen, -farben usw. versehen,
aber nicht ( nach meiner Meinung ) Textgrößen.
Wenn ich im Code für einzelne Strings oder Buchstaben unterschiedliche Schriftgrößen angebe, dann kommt die Fehlermitteilung,
dass die Schriftgröße nur von 1 bis 409 eingestellt werden kann.
Ich bin davon ausgegangen, dass dieses Forum für die Beantwortung solcher Fragen gedacht sei.
Entweder ist meine Frage ausführbar, oder nicht. So oder so sollte es möglich sein, von den Excel-Fachleuten eine Antwort zu bekommen.
Für mich ist meine Fragestellung recht einfach, aber ich weiß nicht mehr, wie ich die Frage noch stellen kann.
Schöne Grüße
Golem

Sub Golem1() Dim Kommentartext On Error Resume Next Range("D5").Comment.Delete On Error GoTo 0 Set Kommentartext = ActiveSheet.Range("D5").AddComment With Kommentartext .Text Text:="GOLEM" With .Shape.TextFrame .Characters(1, 2).Font.Size = 30 .Characters(3, 2).Font.Size = 10 .Characters(5, 99).Font.Size = 20 End With End With End Sub

Sub Golem2() Dim Kommentartext Dim StrG$ StrG = "GOLEM" On Error Resume Next Range("D5").Comment.Delete On Error GoTo 0 Set Kommentartext = ActiveSheet.Range("D5").AddComment With Kommentartext .Text Text:=StrG With .Shape.TextFrame .Characters(1, 2).Font.Size = 20 '2 Zeichen .Characters(3, 2).Font.Size = 15 '2 Zeichen .Characters(5, Len(StrG) - 4).Font.Size = 10 'Länge(Text) - 4 Zeichen End With End With End Sub

Hallo Matthias,
einen schönen Dank für Deine Antwort und Deine Datei.
Seit Heiligabend versuche ich in meinen Code unterschiedliche Schriftgrößen einzustellen. Immer mit dem Ergebnis der
beschriebenen Fehlermeldung. Ich habe die VBA-Hilfe rauf und runter gelesen, ohne einen Hinweis auf die Vergabe von
unterschiedlichen Schriftgrößen ( auch von W. Herber, VBAinExcel, habe ich bemüht ).
Mir fallen keine weiteren Suchbegriffe für Google ein, wonach ich noch wegen unterschiedlichen Schriftgrößen in Kommentarfeldern
( oder andere Beispiele ) suchen soll. Im englischsprachigen Raum ist einiges darüber zu finden ( z.B. contextures.com/xlcomments03, Excel Comments VBA, Ms.Debra Dalgleish ), aber es hat meine Frage nicht beantwortet. Auch in dem Beitrag aus Herbers EXCEL-FORUMSARCHIV vom 14.10.2010 wurde bei Vergabe von verschiedenen Schriftgrößen auf die beschriebene Fehlermeldung hingewiesen.
Deine Angabe, "Von Dir gabs bis dahin noch nicht mal eine Reaktion auf die von anderen geposteten Beiträge", ist nicht korrekt. Auf die erhaltenen Antworten habe ich bisher immer reagiert ( Du wirst es bestätigen können ), wenn ich sie gelesen und danach einiges probiert hatte.
Ein Bespiele meiner Reaktionen:
Hallo NoNet,
ich bekomme Deinen Code nicht eingebaut, bzw. nicht zum Funktionieren.
Ich habe meinen Code geändert:
hier mein Code
Damit bekomme ich fünf Zeilen mit fünf verschiedene Farben dargestellt.
Funktioniert alles problemlos.
Ich kann für die fünfte Zeile den Schrifttyp und die Größe ändern, funktioniert auch problemlos.
'Datums- und Zeitformat als Restzeichen in schwarz
.Characters(86, 27).Font.ColorIndex = 0
.Characters(86, 27).Font.Name = "Calibri"
.Characters(86, 27).Font.Size = 12
.Characters(86, 27).Font.Bold = True
Ich kann für die anderen Zeilen den Schrifttyp ändern, funktioniert auch problemlos.
Nur wenn ich bei Zeile eins bis vier die Schriftgröße unterschiedlich mache, kommt ein Fehler mit den Hinweis, "Schriftgrad muss
zwischen 1 und 409 Punkten liegen".
Und damit komme ich nicht mehr weiter.
Schöne Grüße
Golem
Keine Antwort bzw. Hilfe!
Hallo Golem
Da will ein MAkro eine ungültige Schriftgröße einstellen.
Das war mir mittlerweile auch schon klar geworden und ich habe meinen Code weiter nach Fehlerquellen überprüft.
Mittlerweile hatte ich den Eindruck gewonnen, dass diese Frage nicht beantwortet werden kann ( mit dem Hinweis, "Da will ein MAkro eine ungültige Schriftgröße einstellen. " , kam ich nicht weiter ).
Danach habe ich eine eindeutige Frage gestellt ( das ist mein gezieltes Nachfragen gewesen ), auf der ich eine Antwort erhalten habe, die nicht diese eindeutige Frage beantwortet hat.
Diese Antwort hat mich zu dieser provokanten Reaktion hinreißen lassen.
So, genug Text!
Deine Code-Beispiele und Deine Datei sind super. Damit komme ich weiter. Solch eine eindeutige Antwort hatte bisher gefehlt.
Übrigens möchte ich mich bei all den anderen fachkundigen Helfern in diesem Forum bedanken, die mir bisher bei meinen Fragen hervorragend geholfen haben.
Schöne Grüße
Golem

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Schriftgröße im Kommentarfeld

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread