收集的C#和Word操作的一些代码(本人未经测试)
一、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
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/xjzdr/archive/2008/11/06/3241284.aspx
 
                    
                
 
                
            
         
         浙公网安备 33010602011771号
浙公网安备 33010602011771号