Dynamic userform.images

[ghelfer]

I have a lot of images on userform2 and I need to access its in userform1.image1 as below:

for x = 1 to 150

if range("A" & x) = 1
userform1.image1.picture = userform2.image[x].picture
end if

next x

I spent a lot of time finding o solution for this but I am desting...
Someone help....

 

[Andrew Poulsom]

Welcome to the Board.

Try:

For x = 1 to 150
    If Range("A" & x).Value = 1
        UserForm1.Image1.Picture = UserForm2.Controls("Image" & x).Picture 
    End If
Next x

 

[ghelfer]

Great!!! Thank you!!!!