Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1048to1052
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
Inhaltsverzeichnis

Kommentare automatisch befüllen

Kommentare automatisch befüllen
10.02.2009 17:44:38
Christiane
Hallo an Alle!
Ich habe eine Frage zu Kommentaren.
Ich hätte gerne ein Makro das mir in die gerade aktive Zelle ein Kommentar einfügt und in diesem den Text der aktiven Zelle wiedergibt. Wenn also in der Zelle A1 die Zahl "150" steht hätte ich gerne in der Zelle A1 ein Kommentar mit dem Inhalt "150".
Ist dies möglich?
Mein momentaner Makro sieht so aus:

Sub Kommentar_befüllen()
' Kommentar_befüllen Makro
' Makro am 10.02.2009 aufgezeichnet
ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Text Text:="150"
End Sub


Ich bin für jeden Hinweis dankbar!
Liebe Grüße,
Christiane

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

Betreff
Datum
Anwender
Anzeige
AW: Kommentare automatisch befüllen
10.02.2009 17:47:00
Gerd
Hi,
ActiveCell.Comment.Text Text:=ActiveCell.Text
Läuft aber auf einen Fehler, wenn die zelle schon einen Kommentar enthält.
mfg Gerd
erst alten Kommentar löschen ...
10.02.2009 17:57:48
Matthias
Hallo

Sub Christiane()
Dim strg As String
strg = ActiveCell.Value
ActiveCell.ClearComments
ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Text Text:=strg
End Sub


Gruß Matthias

Vielen Dank für die Hilfe!!!!
10.02.2009 18:15:33
Christiane
Vielen Dank für die Hilfe!!!!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige