crear arreglo de botones y agregarles imagen mediante For
Publicado por Valentin (1 intervención) el 29/03/2017 19:56:12
Que tal, estoy haciendo una macro sencilla en la cual quiero tener ciertos botones dependiendo un boton seleccionado de manera previa, para esto se deben de cargar los botones con cierta imagen y no lo he logrado hacer. en primera instancia ya tengo un form con botones y ltrate de cargar la imagen de la siguiente manera
pero eso solo aplica para la imagen pz1_1, los demas botones solo aumentan el final pz1_n y quise agregar el nombre a una variable y esta ir aumentando con el mismo valor de la x ejemplo: pz1_x pero no se como hacerlo, hay manera de hacerlo de esta forma y si hay que crear un arreglo de botnones de que manera seria.
1
2
3
4
5
6
7
8
9
10
ruta_catalogo = ThisWorkbook.Path
ruta_foto = ruta_catalogo & "\img\"
For x = 1 To 3PzC1.pz1_1.Picture = LoadPicture(ruta_foto & "frame1_" & x & ".jpg")
Next
PzC1.Showpero eso solo aplica para la imagen pz1_1, los demas botones solo aumentan el final pz1_n y quise agregar el nombre a una variable y esta ir aumentando con el mismo valor de la x ejemplo: pz1_x pero no se como hacerlo, hay manera de hacerlo de esta forma y si hay que crear un arreglo de botnones de que manera seria.
Valora esta pregunta
0