Exibição de Caixa d...
 
Notifications
Clear all

Exibição de Caixa de Texto (movto do mouse Cel específica)

16 Posts
3 Usuários
0 Reactions
2,518 Visualizações
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

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
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

lucasbenzi,

Boa tarde!

Com VBA até que é possível fazer o que você quer, todavia, sendo a execução disparada de uma forma que o VBA admita (como você está fazendo, disparando pelo evento Change da planilha. Todavia, não existe evento, nas células, que esteja associado ao movimento do mouse. Desse modo, não dá pra ser disparada a execução com o movimento do mouse sobre as células.

O que você pode fazer e que resolve facilmente seu problema é inserir comentários, sem VBA mesmo, como no exemplo abaixo.

 
Postado : 27/06/2018 10:06 am
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Obrigado pela resposta Wagner!

E se ao invés de mover o mouse sobre a célula eu clicar, selecionando-a?
Propus essa solução aos solicitantes e disseram que é uma saída...

Assim conseguiríamos criar um código para tal finalidade?

Muito obrigado e no aguardo...

 
Postado : 28/06/2018 6:24 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

lucasbenzi,

Bom dia!

Aí é outra história...

Veja no exemplo abaixo, como fiz para inserir um comentário na célula C4. Também pode ser sem ser com comentário. Pode ser com uma MsgBox. Todavia, nesse caso, ela só desaparece depois que clicar no botão dela.

 
Postado : 28/06/2018 7:20 am
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Perfeito Wagner, porém eu preciso que o conteúdo do comentário seja uma fórmula ou "pesque" o resultado de um cálculo que esta em uma outra célula.

Tipo: A1 = 2, A2 = 3
Na Célula C3: A1+A2

Ao clicar/ selecionar a D3 aparece o comentário ou o textbox com o resultado do cálculo da C3. Eu penso em fazer uma menção a célula, pois posso escrever algo como: ="O Valor mínimo para negociação é de: R$"&c3.

É possível adaptar o código para que me retorne dessa forma?

Muito obrigado pelo auxílio!

 
Postado : 28/06/2018 8:32 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

lucasbenzi,

OK.

Veja se é assim.

 
Postado : 28/06/2018 9:31 am
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Isso, porém o valor no comentário não esta atualizando quando modifico o cálculo... Na planilha que estou desenvolvendo o comentário carregará a rentabilidade do item calculado, portanto é necessário que ele seja atualizado mediante a modificação do item!

Muito obrigado pela atenção dada a minha questão!

 
Postado : 28/06/2018 10:42 am
(@klarc28)
Posts: 0
New Member
 

Mensagem apagada pelo usuário

 
Postado : 28/06/2018 12:37 pm
(@klarc28)
Posts: 0
New Member
 

Mensagem apagada pelo usuário

 
Postado : 28/06/2018 12:38 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

OK.

Havia um pequeno erro de lógica. Segue nova versão.

 
Postado : 28/06/2018 12:39 pm
(@klarc28)
Posts: 0
New Member
 

Lucas,

Evite o uso de ponto de exclamação.
Em alguns casos, pode dar a impressão de que você está irritado, gritando.

 
Postado : 28/06/2018 12:43 pm
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Opa que legal Wagner! É praticamente isso que precisamos!

O diretor da empresa me chamou para mostrar um video no YT https://www.youtube.com/watch?v=Aaedor0DJqo. Atente-se ao minuto 1:27.

É um comentário dinâmico que faz referencia a uma célula, seja calculada ou informada.

Tentei reproduzir a função aqui, porém não consegui...

Como base histórica poderia me ajudar com esta opção usando o validador de dados? Assim, além de dar mais opções para o pessoal internamente escolher a melhor alternativa, enriqueceremos a comunidade com mais este modo de solucionar o problema.

Muito obrigado!

 
Postado : 28/06/2018 1:26 pm
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Obrigado pela dica, porém dependendo do contexto a exclamação pode ser considerada como euforia, surpresa, alegria... Evitar o uso dificultaria expressar os sentimentos não concorda? Agora, usar com critério é melhor do que simplesmente não usar.

De qualquer forma ficarei atento ao uso. Caso a moderação perceba algum tipo de desvio ou excesso (particularmente procuro me condicionar a isso) solicito que intercedam.

Obrigado.

 
Postado : 28/06/2018 1:34 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

lucasbenzi,

Pedimos, por gentileza, não utilizar citações de inteiro teor das mensagens que lhe são encaminhadas em suas respostas. Conforme regras do fórum elas são desnecessárias e devem restringir-se, quando estritamente necessárias ao entendimento da mensagem que você quer enviar, apenas a pequenos trechos.

Quanto a questão colocada por você, infelizmente, com validação de dados não sei fazer.

 
Postado : 28/06/2018 3:05 pm
(@lucasbenzi)
Posts: 8
Active Member
Topic starter
 

Olá Wagner! Muito obrigado pelo apoio a minha questão e por me lembrar das regras do forum.

Realizei a citação justamente para fazer uma menção ao amigo klarc28, já que o conteúdo de sua mensagem era pequeno e por ter havido uma mensagem posterior, portanto me condicionarei a seguir estritamente as regras do forum.

Muito obrigado.

Atenciosamente,
Lucas

 
Postado : 29/06/2018 7:27 am
Página 1 / 2