Este fórum está sendo desativado

[Pernilongo]

Bom dia gurus,
minha pergunta na teoria é simples
acontece assim, quando a gente insere um comentário em uma célula, automaticamente ele aparece com o nome do usuário logado na máquina e o tamanho da fonte é 9, pois bem, teria como modificar isso? por exemplo, queria que ao adicionar um novo comentário ele abrisse sem nenhum texto e com a fonte tamanho 12 por exemplo...é possível?
bom espero ter sido claro

enfim, desde já muito obrigado

[alexandrevba]

Boa tarde!!

Click com o botão direito do mouse no comentário, navegue pelas abas e faça sua personalização!

Att

[Pernilongo]

bom dia alexandrevba,
cara desculpe, mas sou novato no excel, nao entendi mto bem, pq assim, cliquei com o direito no comentario mas não achei a opção para tonar o que eu fiz em padrão, não sei se fui bem claro na pergunta, mas é assim, eu queria personalizar o comentario para toda vez que eu inserir um comentario em qualquer planilha do excel ele ja viesse do jeito que eu escolhi entendeu?
de qualquer forma muito obrigado por tentar ajudar
abraço

[alexandrevba]

Bom dia!!

Olha essa é a unica forma que eu conheço (considerando os recursos primitivos da ferramenta).
http://www.online-tech-tips.com/ms-offi ... d-comment/

Você terá alterar nas propriedades do comentário e nas opções da ferramenta.

Att

[Pernilongo]

bom dia alexandre e desculpe a demora na resposta, então fiz como esta indicado mas não funciona não, quando eu crio um novo comentario ele não vem com o formato que eu deixei como padrão, mas enfim obrigado por tentar ajudar, continuarei tentando ok

[Sandman]

bom dia Pernilongo, acredito que seja isso que vc procura, dê uma olhada
o código está bem comentado, mas qualquer dúvida é só dizer ok...

Código: Selecionar todos

'MACRO PARA CRIAR UM COMENTÁRIO
Public Sub novo_comentário_()

    'ADICIONA O COMENTÁRIO NA CELULA SELECIONADA
    ActiveCell.AddComment ("")
    
    'TORNA O COMENTÁRIO VISÍVEL
    ActiveCell.Comment.Visible = True
    
    'SELECIONA O COMENTÁRIO
    ActiveCell.Comment.Shape.Select
    
    With Selection
    
        'DEFINE A FONTE ARIAL *** OBS *** PODERIA SER QUALQUER OUTRA
        .Font.Name = "arial"
        
        'DEFINE O TAMANHO DA FONTE COMO 14 *** OBS *** PODERIA SER QUALQUER OUTRO
        .Font.Size = 14
        
        'DEFINE A ALTURA DO COMENTÁRIO COMO 50 *** OBS *** PODERIA SER QUALQUER OUTRA
        .Height = 50
        
        'DEFINE A LARGURA DO COMENTÁRIO COMO 100 *** OBS *** PODERIA SER QUALQUER OUTRA
        .Width = 100
        
    End With
    
End Sub

[Pernilongo]

boa tarde Sandman, cara muito obrigado mesmo, isso com certeza resolve meu problema definitivamente...abraço

[Pernilongo]

obrigado alexandre por tentar ajudar tb