Try this for each of your If Then statements:
If Range("C2").Value = Range("A2").Value Then
ActiveSheet.Shapes("Image1").Select
Selection.Copy
Range("B10").Select
ActiveSheet.Paste
End If
Let me know how thet works... - Piku
--
Message posted from
http://www.ExcelForum.com