Wie Autor Name in Kommentar in Word mithilfe von VBA festlegen?

Question

Ich habe kleine Vorlage für MS Word. Ich möchte einen Kommentar mit Hyperlink hinzufügen. Ich kann den Kommentar bereits mit dem folgenden Code hinzufügen, aber ich möchte den Autorennamen dieses Kommentars festlegen. Ich weiß nicht, wie ich das machen soll.

Hier ist meine Arbeitscode: (Autor ist derzeit nicht festgelegt)

URLText = "https:\\www.google.com" 
Selection.Comments.Add Range:=Selection.Range 
With Selection 
     .TypeText (CommentText)      'Add comment text 
     .Hyperlinks.Add Anchor:=Selection.Range, _  'Add hyperlink to comment 
     Address:=URLText, _ 
     ScreenTip:=URLText, _ 
     TextToDisplay:=URLText 
End With 

Jedoch habe ich durch folgenden Code versucht haben. Welche setzen den Namen des Autors, aber ich kann nicht Hyper-Link in meinem Kommentar auf diese Weise hinzufügen:

Dim cmtMyComment As Comment 
Dim link As Hyperlink 
link.Address = URLText 
link.ScreenTip = URLText 
link.TextToDisplay = URLText 


Set cmtMyComment = Selection.Comments.Add(Range:=Selection.Range, _ 
Text:=(CommentText) 
cmtMyComment.Author = "ABC" 

ich nicht Eigenschaft Hyperlink zu setzen gefunden hat.

Kann mir jemand vorschlagen, wie man den Autorennamen einstellt? Ich habe es versucht, aber habe kein Eigentum gefunden.

Answer 1

Nun gibt es eine Author Eigenschaft, die Sie wie so und der Hyperlink festlegen können noch funktioniert, wie Sie mit dem GIF unter

Public Sub AddCommentWithLink() 
    URLText = "https:\\www.google.com" 
    Set Comment = Selection.Comments.Add(Range:=Selection.Range) 
    Comment.Author = "Donald Duck" 
    With Selection 
      .TypeText (CommentText) 
      .Hyperlinks.Add Anchor:=Selection.Range, _ 
      Address:=URLText, _ 
      ScreenTip:=URLText, _ 
      TextToDisplay:=URLText 
    End With 
End Sub 

, die in einem Kommentar zur Folge haben werden, wie diese

sehen