Dim pic As String Dim myPicture As Picture Dim rng As Range Dim item As Range Dim aPic() As Byte Dim objWin As Object Dim ImageExists As Boolean Set rng = Range("c4:c100") For Each item In rng pic = item.Offse...