一、WORD中对象的属性种类
InlineShapes有一个type属性，type 是WdInlineShapeType
WdInlineShapeType can be one of the following constants.
wdInlineShapeEmbeddedOLEObject
wdInlineShapeHorizontalLine
wdInlineShapeLinkedOLEObject
wdInlineShapeLinkedPicture
wdInlineShapeLinkedPictureHorizontalLine
wdInlineShapeOLEControlObject
wdInlineShapeOWSAnchor
wdInlineShapePicture
wdInlineShapePictureBullet
wdInlineShapePictureHorizontalLine
wdInlineShapeScriptAnchor
二、获取WORD中的对象
你在一个空文档里面插入一个PPT或者EXCEL等对象，可以通过下面的代码来获得这个对象的类型.
shape = wordDoc.InlineShapes[0];
OLEFormat olef = shape.OLEFormat;
MessageBox.Show(olef.ClassType.ToString());
//olef.Open();
三、插入图片后的图片大小问题
Excel2007环境下用worksheet.shapes.addpicture方法插入的图片，实际显示的位置和方法参数中设定的位置不同。什么原因？如何解决？
因为放大率100%的状态下设置的图片不会位置偏差，
所以在插入图片之前暂时设定放大率为100%（sheet.ActiveWindow.Zoom = 100）， 图片设定完之后再把放大率给设回去。
sheet.ActiveWindow.Zoom = 100
修改为
sheet.Application.ActiveWindow.Zoom = 100
四、插入图片并置于文字之上
在word里面，插入的图片是一个inlineshape对象，衬于文字上下方的是shape对象，找到该对象，设置它的width 和height属性就是了。
我成功了，，原来将嵌入型转化下就行了
（嵌入型）
Selection.InlineShapes(1).Height = 360.85
Selection.InlineShapes(1).Width = 734.15
（浮于文字上方）
Selection.ShapeRange.Height = 360.85
Selection.ShapeRange.Width = 734.15
五、用宏批量定位word中图片位置
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数，图片类型为inlineshapes
ActiveDocument.InlineShapes(j).Height = 362 '设置高度
ActiveDocument.InlineShapes(j).Width = 481.87 '设置宽度
Next j
End Sub
