Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Loop em objetos do ...
 
Notifications
Clear all

Loop em objetos do tipo Image

 
2024 - VBA & Macros
Post Recente por depoisteconto 11 anos atrás
4 Posts
2 Usuários
0 Reactions
894 Visualizações
RSS
depoisteconto
 depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
Topic starter
 

Boa noite!

Para apagar a figura de um objeto Image uso o comando abaixo:

With Image1
.Picture = Nothing
.BackColor = RGB(255, 255, 255)
End With

Mas eu preciso fazer isso com 20 objetos Image, fica ruim repetir o comando 20 vezes. Pensei em atribuir uma variável para substituir o nº 1, então faria um loop com For, mas não sei como atribuir essa variável ao objeto.

Tem alguma outra forma de fazer um loop nos 20 objetos? ou terei que repetir o código 20 vezes?

Valeu.

At

 
Postado : 08/09/2013 5:07 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Esses "objetos" estão em uma planilha ou em um formulário?

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

 
Postado : 08/09/2013 6:38 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Se for controles no Formulário, eu acho que sim, devido ao seu post anterior sobre imagem, de uma olhada no Tópico abaixo, deve esclarrecer, se pesquisar pelos posts do GUMA deverá encontrar a panilha completa.

Atualizar Imagem no Form
viewtopic.php?f=10&t=8220&start=10

[]d

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

 
Postado : 08/09/2013 7:25 pm
depoisteconto
 depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
Topic starter
 

Esses "objetos" estão em uma planilha ou em um formulário?

Valeu Reinaldo, será aplicado em um userform mesmo.

Se for controles no Formulário, eu acho que sim, devido ao seu post anterior sobre imagem, de uma olhada no Tópico abaixo, deve esclarrecer, se pesquisar pelos posts do GUMA deverá encontrar a panilha completa.

Atualizar Imagem no Form
viewtopic.php?f=10&t=8220&start=10

[]d

Valeu Mauro essa isso mesmo.

For x = 1 To 20

Me.Controls("Image" & x).Picture = Nothing
Me.Controls("Image" & x).BackColor = RGB(255, 255, 255)

Next
 
Postado : 09/09/2013 5:25 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico