Comentário em célula

2024 - VBA & Macros

Post Recente por samuelss 7 anos atrás

4 Posts

2 Usuários

0 Reactions

1,189 Visualizações

RSS

samuelss

(@samuelss)

Posts: 21

Eminent Member

Topic starter

Boa tarde,

Existe alguma maneira de conseguir inserir comentários em uma coluna com os valores que está escrito no própria célula ?

Tenho uma tabela onde existe uma coluna que escrevo algumas descrições, para visualizar o que está escrito nas células deixando por extenso ou mesmo quebrando o texto, a célula fica extremamente grande, então queria um jeito de passar o mouse em cima da célula e aparecer como comentário oque está digitado na mesma... lembrando que quero que seja possível que esta rotina aconteça em toda coluna.

Att,

Postado : 04/09/2017 1:48 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Se puder ser através de Macro (e acredito que seja a única alternativa), segue anexo.

Código, supondo que os valores estejam na coluna B:

Sub ValorCelComment()

Dim i, f As Long

i = 2
f = Range("B65536").End(xlUp).Row


Do While i <= f

Range("B" & i).ClearComments

cmnt = Cells(i, 2).Value

Range("B" & i).AddComment
Range("B" & i).Comment.Visible = False
Range("B" & i).Comment.Text Text:=cmnt
    
i = i + 1

Loop
    
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 04/09/2017 3:32 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

samuelss

Movi teu tópico para VBA & Macros, que é o assunto da tua dúvida.

Como o nome já diz, em Dicas & Macetes, só podem ser postados Dicas e Macetes, sendo proibido postar dúvidas.

Conforme consta nos links que eu sugeri a leitura, quando você não souber em que sala postar, poste em Excel - O Básico, que eu irei mover o tópico para a sala correta.

[]s

Patropi- Moderador.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 04/09/2017 6:31 pm