Hallo zusammen,
ich möchte gerne das ein Timestamp in dem Kommentar enthalten ist sobalt ich einen erstelle. Ist sowas möglich? Natürlich kann man die Änderungen nachverfolgen aber ich möchte das dies schon direkt in dem Kommentar steht.
Hi,
Da du nicht schreibst, welches Programm Du meinst, gehe ich einmal von Word aus. Auf Text und Timestamp eines Kommentars hat man dort per VBA Zugriff durch
ActiveDocument.Comments(1).Range
ActiveDocument.Comments(1).Date
In einer kleinen Schleife könntest Du alle Kommentar-_Range_s durchlaufen, deren _Date_s prüfen, schauen, ob die schon Teil des Kommentara sind (schließlich kann ja auch ein Bearbeiter sie versehentlich weglöschen), und sie oerforderlichenfalls vorne oder hinten an die _Range_s dranhängen.
HTH.
Markus
Und Sterne sammel’ ich noch immern.
Hi, ich arbeite mit Excel und deine Lösung hört sich richtig an. Kanns du mir noch etwas genauer sagen, was ich nun machen muss? So einen VBA-Zugriff habe ich (denke ich) noch nie gemacht
ich möchte gerne das ein Timestamp in dem Kommentar enthalten
ist sobalt ich einen erstelle. Ist sowas möglich? Natürlich
kann man die Änderungen nachverfolgen aber ich möchte das dies
schon direkt in dem Kommentar steht.
Hallo Viva,
geht irgendwie, aber nicht so einfach direkt durch Vba.
Wie wäre es denn wenn du beim Kommentar ausfüllen mal kurz
Strg+Punkt bzw. Strg+Shift+Punkt drückst?
„irgendwie“ bedeutet es geht schon mit Workarounds. Ich habe da einge
Ideen wie. Sie haben alle Vor- und Nachteile.
Beschreib mal dein Tabellenblatt, um wieviele Zeilen/Spalten/Kommentare geht es denn so etwa maximal?
1000 Zeilen a 10 Spalten oder 500.000 Zeilen mit 100 Spalten oder?
Und die Kommentare, wahllos verstreut oder nur in 3-10 Spalten?
Gruß
Reinhard
Danke erstmal für die beiden Kürzel ^^ die kannte ich noch gar nicht.
Es handelt sich hierbei um einen Jahresplan mit 50 Personen, wobei jeder Monat ein Reiter entspricht. Die Kommentare werden mal hier mal da eingetragen von verschiedenen Personen. Da die Leute aber oft das Datum vergessen mit einzutragen wollte ich dies automatisch generieren.
Ich arbeite mit Office 2010.
Vba Lösung 0001
ich möchte gerne das ein Timestamp in dem Kommentar enthalten
ist sobalt ich einen erstelle. Ist sowas möglich? Natürlich
kann man die Änderungen nachverfolgen aber ich möchte das dies
schon direkt in dem Kommentar steht.
Hallo Viva,
nimm mal eine Kopie deiner Mappe und drücke dort Alt+F11.
Im Vb_Editor klickste oben auf Einfügen—Modul.
In das Modul kopierst du dann nachfolgenden Code.
Entferne den mistigen „… mehr…“ Anahng im Reinkopierten.
Dann teste den Code an beliebigen Zellen in dem Blatt.
Derzeit ist der Code noch so, hat die Zelle einen Kommentar
macht er Code nix, hat sie keinen Kommentar erzeugt sie einen
Kommentar indem das drin steht was du möchtest.
Derzeit mußte den Code noch starten, vom Blatt aus mit Alt+F8,
„Kommentar“ ausführen lassen.
Vom VB-Editor aus indem du den Cursor mitten in den Code stellst und F5 drückst.
Mit Alt+F11 toggelst du (umschalten) zwischen Blatt und Editor.
Später, bei Gefallen, lege ich dir den Code auf eine
Tastenkombination, z.B. Strg+k.
Sub Kommentar()
With ActiveCell
If ActiveCell.Comment Is Nothing Then
.AddComment
'.Comment.Visible = False
.Comment.Text Text:=Application.UserName & ":" & Chr(10) & Date & " " & Time & Chr(10) & ""
Application.SendKeys ("+{F2}") 'Danke Klaus, kam ich nicht drauf :smile:
Else
'ggfs. vorh. Kommentar um Datum/Zeit ergänzen
End If
End With
End Sub