Cambiar el num del image en sentencia for
Publicado por watchapop (21 intervenciones) el 28/02/2015 01:27:03
Mil gracias de antemano.
necesito incrustar imágenes en varios cuadros de imagen ( para generar un catalogo ) hice este codigo :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dibujo As String
For I = 1 To 3
dibujo = "C:\imagenes cat\" & Range("C" & I & "").Value & ".jpg"
Image & C & .Picture = LoadPicture(dibujo) <<<--- aqui es donde necesito que cambie " error de sintaxis "
Next I
End Sub
basicamente lo que requiero es que vaya cambiando el numero del image por el valor que va adquiriendo I en cada vuelta. es decir image1 para primera vuelta, image2 para segunda y asi
espero su ayuda gracias
necesito incrustar imágenes en varios cuadros de imagen ( para generar un catalogo ) hice este codigo :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dibujo As String
For I = 1 To 3
dibujo = "C:\imagenes cat\" & Range("C" & I & "").Value & ".jpg"
Image & C & .Picture = LoadPicture(dibujo) <<<--- aqui es donde necesito que cambie " error de sintaxis "
Next I
End Sub
basicamente lo que requiero es que vaya cambiando el numero del image por el valor que va adquiriendo I en cada vuelta. es decir image1 para primera vuelta, image2 para segunda y asi
espero su ayuda gracias
Valora esta pregunta
0
