Hello everybody ! I have found many solutions for my problems in your forum but I have another problem which I can't solve.
I have the PICTURES sheet and the USER sheet. At the USER sheet I have a Combo Box (Form Control) where I choose some products. And for every product I choose I want to have a specific picture in USER sheet at a specific position (inside cells G4:H11). The source of this shape(picture) is the PICTURE sheet.
Here is my code:
Code:'Panel is the name of the Combo Box Sub Panel_Change() Dim PanelThesi As String 'At the two lines below I assign to a string the value of cell and then copy the shape with this name. Dont bother about that, just think that I am copying a shape Sheets("USER").Range("K7") = PanelThesi Sheets("PICTURES").Shapes(PanelThesi).Copy 'I paste the shape(picture) to the USER sheet. Sheets("USER").Range("G4:H11").PasteSpecial Paste:=xlPasteAll End Sub
The problem is that I want every time the picture that is shown in the USER sheet to be in the same position inside the range G4:H11 and if its posible to delete the previous image (if it exists)
I attach the excel file.
I would be very happy if you can help me.
(Sorry for my english)
water.zip


Reply With Quote