VBA问题：如何给插入的图片设置格式？

Question

用Selection.InlineShapes.AddPicture FileName:=PicName, LinkToFile:=False, SaveWithDocument:=True
插入了一个图片，如何用代码把它的格式设置为浮于文字上方或者衬于文字下方？
谢谢！

Answer 1

我觉得用这种方法插入的图片自动为嵌入文字型，很难找到代码将其改为浮于文字上方。不如用这种方法：
ActiveDocument.Shapes.AddPicture(FileName:= _
        PicName, LinkToFile:=False, SaveWithDocument:=True).Select
Selection.ShapeRange.WrapFormat.Type = 3
Selection.ShapeRange.ZOrder 4