Prezados amigos, como estão?
Não domino o VBA e gostaria de contar com o auxílio de vocês para solucionar uma questão que a mim foi imposta.
Quando eu passar o mouse sobre uma determinada célula uma caixa de texto deve aparecer com a informação de um cálculo que estou fazendo.
A situação problema é justamente o "aparecer" e "desaparecer" da caixa de texto. Não possuo conhecimento para desenvolver algo do tipo. O máximo que consegui foi exibir, porém como condicional, utilizando valores específicos e não pelo movimento do mouse na célula em questão.
Segue o código:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As integer
cel = Range("A1").Value
Select Case cel
Case 1
ActiveSheet.Shapes("Rect").Visible = True
Case 2
ActiveSheet.Shapes("Rect").Visible = False
End Select
End Sub
Conto com auxílio de vocês.
Atenciosamente,
Lucas
Postado : 27/06/2018 8:49 am