If you're simply pasting the picture from the clipboard, it's
defaulting to being in line with text. That's why you can't drag it.
Instead, you should insert it from a file as a floating shape to begin
with.

The method works like this:

   Dim oShp As Shape
   
   Set oShp = ActiveDocument.Shapes.AddPicture( _
       FileName:="C:\path\MyPicture.jpg", _
       LinkToFile:=False, _
       SaveWithDocument:=True, _
       Anchor:=Selection.Range)
   With oShp
       ' the next two lines do "behind text"
       .WrapFormat.Type = wdWrapNone
       .ZOrder msoSendBehindText
       
       ' other attributes are optional
       .Left = InchesToPoints(0.25)
       .LockAspectRatio = msoTrue
       .Width = InchesToPoints(1.75)
   End With

--
Regards,
Jay Freedman
Microsoft Word MVP        FAQ: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.