Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Alle Kommentare aus 2003 formatieren

Alle Kommentare aus 2003 formatieren
24.07.2013 09:09:09
Judith
Guten Morgen,
nach der Übernahme einer Excel-Datei aus 2003 sind bei mir alle Kommentare "RIESENgross".
Die Fenster haben teilweise Grössen von 48 x 54 cm.
Ich suche ein Makro, dass alle Kommentar-Fenster auf 6x6 cm formatiert.
Liebe Excel-Freaks, einer von Euch Profis weiss das sicher....
Danke im Voraus
Judith

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Kommentare aus 2003 formatieren
24.07.2013 09:28:12
Mister
Hallo Judith,
als Ansatz:
Sub KommentarFormat()
Dim Cell As Range
For Each Cell In Cells.SpecialCells(xlCellTypeComments)
With ActiveCell.Comment.Shape.TextFrame
.Characters.Font.Name = "Tahoma"
.Characters.Font.Size = 8
.Characters.Font.Bold = True
.Characters.Font.ColorIndex = 53
.AutoSize = True
End With
ActiveCell.Comment.Shape.Fill.ForeColor.SchemeColor = 43  ' Hintergrundfarbe
Next
End Sub
Muss noch ein Wenig getweakt werden.
Gruß
Martin

Anzeige
AW: Alle Kommentare aus 2003 formatieren
24.07.2013 10:26:16
Judith
Hallo Martin,
es funktioniert, sofern ich ich - For Each ... und den Next herausnehme.
Aber wie kriege ich hin, dass alle Kommentare wie in Deinem Muster formatiert werden,
die markiert sind.
Es ist sehr aufwendig, ca 1000 Zellen einzeln zu markieren und dann jedesmal das Makro laufen zu lassen.
Danke
Judith

Anzeige
AW: Alle Kommentare aus 2003 formatieren
24.07.2013 11:05:50
Luschi
Hallo Judith,
der Vba-Code muß so lauten:

Sub KommentarFormat()
Dim Cell As Range
For Each Cell In Cells.SpecialCells(xlCellTypeComments)
With Cell.Comment.Shape.TextFrame
.Characters.Font.Name = "Tahoma"
.Characters.Font.Size = 8
.Characters.Font.Bold = True
.Characters.Font.ColorIndex = 53
.AutoSize = True
End With
Cell.Comment.Shape.Fill.ForeColor.SchemeColor = 43  ' Hintergrundfarbe
Next
End Sub
Gruß von Luschi
aus klein-Paris
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige