Notifications
Clear all

Inserir Imagem

4 Posts
3 Usuários
0 Reactions
1,162 Visualizações
(@rafacoxa86)
Posts: 19
Active Member
Topic starter
 

E aí pessoal, boa tarde!

Estou com uma dúvida no seguinte, tem uma imagem de material auxiliar, preciso que ele apareça somente quando eu apertar o botão auxiliar. Tem como?

Tem como fazer isto com uma caixa de texto?

Conto com a costumeira colaboração!

Valeu.

Att, Rafael.

 
Postado : 01/08/2013 9:10 am
(@tacito)
Posts: 67
Trusted Member
 

Bom dia!

Acho que é mais fácil se colocar em um userform. O anexo está exibindo uma imagem quando clica no botão "Auxiliar".

Pra você mudar você tem que ir no editor de código e selecionar o formulário (userform1), então você vai em em propiredades (apertar F4), então procure o item "pictures" e escolha a imagem que quer exibir.

Espero que ajude.

 
Postado : 01/08/2013 9:41 am
(@tacito)
Posts: 67
Trusted Member
 

Faltou só o anexo!

 
Postado : 01/08/2013 9:42 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Rafael, me baseando pelo seu anexo, adicione a rotina em um Modulo e depois associe a mesma ao Retangulo 5 o qual está escrito Auxiliar.

Sub Exibe_Oculta_Figura()

    If ActiveSheet.Shapes("Imagem 4").Visible = True Then
        ActiveSheet.Shapes("Imagem 4").Visible = False
    Else
        ActiveSheet.Shapes("Imagem 4").Visible = True
    
    End If
    
End Sub

Para associar a rotina, clique com o Botão direito do mouse em cima do retangulo_5 e escolha Atribuir MAcro e na caixa que abrir selecione e de ok.

Não vi o exemplo do Tacito, mas se não for isto retorne.

[]s

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

 
Postado : 01/08/2013 10:42 am