Need help...
I'm trying to change the shape fill from a picture which I placed in a different worksheet.
I tried the following code but received error msg:
Complie error:
Argument not optional.
Sub Rectangle34_Click()
Dim Shp1 As Shape
Set Shp1 = Worksheets("sheet1").Shapes("Rectangle 34")
Shp1.Fill.UserPicture = Worksheets("sheet2").image1.Picture
End Sub
Bookmarks