VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Anwendername im Kommentar nicht fettgedruckt

Gruppe

Allgemein

Bereich

Kommentar

Thema

Anwendername im Kommentar nicht fettgedruckt

Problem

Wie kann ich erreichen, daß der Anwendername in einem Kommentar nicht fett gedruckt wird?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




StandardModule: Modul1

Sub NewComment()
   Dim sComment As String
   sComment = InputBox( _
      prompt:="Bitte Kommentar eingeben:")
   If sComment = "" Then Exit Sub
   With ActiveCell
      .AddComment
      .Comment.Visible = False
      .Comment.Text _
         Text:=Application.UserName & _
         ":" & vbLf & sComment
   End With
   Application.DisplayCommentIndicator = _
      xlCommentIndicatorOnly
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Kommentar