Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
460to464
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
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

vba: Kommentar-größe ändern

vba: Kommentar-größe ändern
31.07.2004 19:07:38
Manuel
Hi folks..
Ich habe mal wieder ein Problem...
Ich erstelle per vba-code eine Kommentar.
Nun möchte ich aber, dass die Kommentarfeldgröße eine ganz bestimmte ist. Diese soll beim erstellen oder danach per vba-code automatisch eingestellt werden.
wie geht das?
ich habe ein makro laufen lassen:

Sub Makro4()
Range("B5").Comment.Text Text:= _
[xxxxxxxxx]
Selection.ShapeRange.ScaleHeight 1.93, msoFalse, msoScaleFromTopLeft
Range("A4:D4").Select
End Sub

so, aber der Text wird ja vorher geschrieben, deswegen kan ich das nicht nutzen.
der Komentar wir mit folgenden Code erstellt:
With Sheets("Spieler").Cells(5, planinummer)
.AddComment
.Comment.Visible = False
.Comment.Text Text:="[xxxx]"
End With
With Selection.Font
.name = "Verdana"
.FontStyle = "Fett"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Wäre über Hilfe sehr erfreut
Gruß
Manuel

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba: Kommentar-größe ändern
Ramses
Hallo
mach es so:

Sub Makro4()
Dim myCom As Object
Set myCom = Sheets("Spieler").Cells(5, planinummer).AddComment
With myCom
.Visible = True
.Text Text:="[xxxx]"
.Shape.Height = 70
.Shape.Width = 45
End With
With Selection
With .Font
.Name = "Verdana"
.FontStyle = "Fett"
.Size = 8
End With
End With
End Sub

Gruss Rainer
DANKE! [o.T. | geschlossen]
Manuel
.
Anzeige

16 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige