Notifications
Clear all

botão com imagens vba

5 Posts
2 Usuários
0 Reactions
1,331 Visualizações
(@davisao)
Posts: 28
Eminent Member
Topic starter
 

Seguinte, estou enviando um arquivo vba com 3 imagens, gostaria de que alguém me indicasse um código onde clicando nos botões as imagens sejam trocadas e eu possa colocar quantas imagens quiser e ir e vir apenas clicando nos botões, é que estou criando um programa para cadastrar um casa que estou fazendo e estou anexando imagens tanto do terreno quanto das etapas da construção.

O arquivo não tem código algum.

Obrigado

 
Postado : 15/06/2013 6:59 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Já usou a pesquisa do fórum??
viewtopic.php?f=21&t=8167
viewtopic.php?f=23&t=6789
viewtopic.php?f=21&t=5007
viewtopic.php?f=10&t=6689

Att

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

 
Postado : 16/06/2013 6:25 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Se seguir a dica do Alexandre quanto a pesquisa no Forum encontrara vários exemplos, alem dos que ele citou, de uma olhada no linka abaixo com certeza encontrara um modelo para sua questão.

Les images et shapes
http://boisgontierjacques.free.fr/pages ... images.htm

Veja a partir do item :
Affichage d'une image externe dans un formulaire (Visualizando uma imagem externa em um formulário)
Tem alguns modelos.

[]s

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

 
Postado : 16/06/2013 8:57 am
(@davisao)
Posts: 28
Eminent Member
Topic starter
 

Naveguei, procurei, queimei neurônios até quase dar tilti no cérebro e nada. Mas vou explicar de outra forma:

Criei uma Plan1 com diversas imagens, redimensionei as células para caber uma imagem em cada célula sendo 1 imagem na célula A1 e assim sucessivamente.

Criei um UserForm1

Uma Image1

Quatro botões sendo:

CommandBottom1: Voltar para primeira imagem;
CommandBottom2: Voltar uma imagem;
CommandBottom3: Ir uma imagem;
CommandBottom4: Voltar para última imagem;

E como eu disse, naveguei por diversos e queimei pestana e nada. Dai humildemente reformulo minha questão. Quais códigos farão os botões trocarem as imagens usando apenas Image1?

Gracias

 
Postado : 17/06/2013 10:35 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Veja se o link abaixo ajuda, é só fazer a adaptação para o objeto image em vez do grafico.

http://excel-vba.webnode.pt/news/como-a ... -userform/

[]s

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

 
Postado : 18/06/2013 7:15 am