|
 Saberexcel - o site das macros
Inserir um comentário com texto formatação fonte e tamanho predefinido
Esta macro do aplicativo Microsoft Excel VBA, insere um comentario personalizado, com formatação, e texto pre-determinado:
Determinar a fonte da formatação
Determinar a cor da fonte
Inserir (autofit) para ajustar ajuste de tamanho do comentário ao texto
Sub inserir_comentario()
Dim x As Range
Set x = ActiveCell
x.ClearComments
x.AddComment.Text _
Text:="Aprender excel vba é fundamental (Saberexcel)"
x.Comment.Visible = True
x.Comment.Shape.Select True
With Selection.Font
.Name = "Tahoma"
.FontStyle = "Regular"
.Size = 12
End With
With Selection.Interior
x.Interior.ThemeColor = xlThemeColorAccent3 '2007 se testar outra versão, desabilite a linha
End With
With Selection
.Placement = xlFreeFloating
.PrintObject = False
.Locked = True
.LockedText = True
.AutoSize = True
End With
Application.DisplayCommentIndicator _
= xlCommentIndicatorOnly
End Sub
Aprenda Microsoft Excel VBA (SaberExcel)
|