Word Kommentare in separates Dokument kopieren

[Andreina Salerno]

Hallo,
ich möchte Kommentare aus einem Word 2000 Dokument heraus
in ein separates Dokument kopieren. Dabei geht die
Information über den Verfasser des Kommentars / user
information verloren, die ich jedoch brauche.
Kann mir jemand weiterhelfen?

Danke + Grüße
andreina

[Christian Freßdorf]

Hallo Andreina,

> ich möchte Kommentare aus einem Word 2000 Dokument heraus
> in ein separates Dokument kopieren. Dabei geht die
> Information über den Verfasser des Kommentars / user
> information verloren, die ich jedoch brauche.

wenn Du Dich mit Makros auskennst, kopiert Dir folgendes Makro alle
Kommentare in ein neues Dokument unter Angabe der Benutzerinitialen:

Sub CopyComments()
Dim com As Comment
Dim oDoc As Document
Dim newDoc As Document
Dim str As String
Set oDoc = ActiveDocument
Set newDoc = Documents.Add
For Each com In oDoc.Comments
str = "[" & com.Initial & com.Index & "]:" & _
com.Range.Text & " S.: " & _
com.Scope.Information(wdActiveEndPageNumber) & vbCrLf
newDoc.Range.InsertAfter str
Next com
End Sub

--
Gruß Christian
~~~~~~~~~~~~
Antworten / Rückmeldungen nur in die NG!
http://www.mvps.org/word/FindHelp/Posting.htm
http://support.microsoft.com/default.aspx?scid=fh;DE;NGNetikette

[andreina]

Hallo Christian,
es klappt!
Vielen Dank
+ Gruß
andreina
>-----Originalnachricht-----

>.
>