Настроить новый комментарий

Question

Как создать новые комментарии без «Автор:» вставлен (vba). Inherently Новые комментарии создаются с применением Автор «Автор:» вставлен. Как правило, можно использовать имя автора. Application.Author = «Mr.Dud» Однако, чтобы настроить это для различных использует различные Activecell.AddComment вызовы должны быть добавлены

Answer 1

Public Sub MyComment(strText as String) 
' Creates comment applying "strText" to Text 

     ActiveCell.AddComment.Text Text:=strText 

End Sub 

---

Затем, чтобы создать & редактировать новый комментарий вставить этот вызов к MyComment. Эта вставка системной даты и перевода строки;

If ActiveCell.Comment Is Nothing Then 
     MyComment CStr(Date) & Chr(10) 
    End If 

    Application.SendKeys ("+{F2}") , True 

В качестве альтернативы, MyComment «" может быть вызван, если требуется пустой комментарий.

Горячие клавиши открывают комментарий для редактирования (вместо вызова Mso: ReviewEditComment).