Word操作三步曲（二）

86 阅读 0 评论 57 点赞

我是靠谱客的博主陶醉裙子，这篇文章主要介绍Word操作三步曲（二），现在分享给大家，希望可以做个参考。

复制代码

using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.Office.Interop.Word;
using System.IO;
using System.Web;
using System.Data;
using System.Reflection;
using Microsoft.Win32;
using System.Text.RegularExpressions;
using System.Net;
namespace OfficeOperate
{
public class WordOperate
{
#region 动态生成Word文档并填充数据
/** <summary>
/// 动态生成Word文档并填充数据
/// </summary>
/// <returns>返回自定义信息</returns>
public static string CreateWordFile()
{
string message = "";
try
{
Object oMissing = System.Reflection.Missing.Value;
string dir = System.Web.HttpContext.Current.Server.MapPath( "" );//首先在类库添加using System.web的引用
if( !Directory.Exists( dir + "//file" ) )
{
Directory.CreateDirectory( dir + "//file" );
//创建文件所在目录
}
string name = DateTime.Now.ToLongDateString() + ".doc";
object filename = dir + "//file//" + name;
//文件保存路径
//创建Word文档
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
/**/添加页眉方法一：
//WordApp.ActiveWindow.View.Type = WdViewType.wdOutlineView;
//WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekPrimaryHeader;
//WordApp.ActiveWindow.ActivePane.Selection.InsertAfter( "无锡全真通科技有限公司" );//页眉内容
//添加页眉方法二：
if( WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdNormalView || WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdOutlineView )
{
WordApp.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdPrintView;
}
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader;
string sHeader = "页眉内容";
WordApp.Selection.HeaderFooter.LinkToPrevious = false;
WordApp.Selection.HeaderFooter.Range.Text = sHeader;
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument;
//WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;//设置右对齐
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphLeft;//设置左对齐
WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekMainDocument;//跳出页眉设置
WordApp.Selection.ParagraphFormat.LineSpacing = 15f;//设置文档的行间距
//移动焦点并换行
object count = 14;
object WdLine = Microsoft.Office.Interop.Word.WdUnits.wdLine;//换一行;
WordApp.Selection.MoveDown( ref WdLine, ref count, ref oMissing );//移动焦点
WordApp.Selection.TypeParagraph();//插入段落
//文档中创建表格
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables.Add( WordApp.Selection.Range, 12, 3, ref oMissing, ref oMissing );
//设置表格样式
newTable.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleThickThinLargeGap;
newTable.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle;
newTable.Columns[1].Width = 100f;
newTable.Columns[2].Width = 220f;
newTable.Columns[3].Width = 105f;
//填充表格内容
newTable.Cell( 1, 1 ).Range.Text = "产品详细信息表";
newTable.Cell( 1, 1 ).Range.Bold = 2;//设置单元格中字体为粗体
//合并单元格
newTable.Cell( 1, 1 ).Merge( newTable.Cell( 1, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;//垂直居中
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;//水平居中
//填充表格内容
newTable.Cell( 2, 1 ).Range.Text = "产品基本信息";
newTable.Cell( 2, 1 ).Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorDarkBlue;//设置单元格内字体颜色
//合并单元格
newTable.Cell( 2, 1 ).Merge( newTable.Cell( 2, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;
//填充表格内容
newTable.Cell( 3, 1 ).Range.Text = "品牌名称：";
newTable.Cell( 3, 2 ).Range.Text = "BrandName";
//纵向合并单元格
newTable.Cell( 3, 3 ).Select();//选中一行
object moveUnit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object moveCount = 5;
object moveExtend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;
WordApp.Selection.MoveDown( ref moveUnit, ref moveCount, ref moveExtend );
WordApp.Selection.Cells.Merge();
//插入图片
if( File.Exists( System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" ) ) )
{
string FileName = System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" );//图片所在路径
object LinkToFile = false;
object SaveWithDocument = true;
object Anchor = WordDoc.Application.Selection.Range;
WordDoc.Application.ActiveDocument.InlineShapes.AddPicture( FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor );
WordDoc.Application.ActiveDocument.InlineShapes[1].Width = 100f;//图片宽度
WordDoc.Application.ActiveDocument.InlineShapes[1].Height = 100f;//图片高度
}
//将图片设置为四周环绕型
Microsoft.Office.Interop.Word.Shape s = WordDoc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();
s.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;
newTable.Cell( 12, 1 ).Range.Text = "产品特殊属性";
newTable.Cell( 12, 1 ).Merge( newTable.Cell( 12, 3 ) );
//在表格中增加行
WordDoc.Content.Tables[1].Rows.Add( ref oMissing );
WordDoc.Paragraphs.Last.Range.Text = "文档创建时间：" + DateTime.Now.ToString();//“落款”
WordDoc.Paragraphs.Last.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
//文件保存
WordDoc.SaveAs( ref filename, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
message = name + "文档生成成功";
}
catch
{
message = "文件导出异常！";
}
return message;
}
#endregion
#region 创建并打开一个空的word文档进行编辑
/** <summary>
/// 创建并打开一个空的word文档进行编辑
/// </summary>
public static void OpenNewWordFileToEdit()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 创建word文档
/** <summary>
/// 创建word文档
/// </summary>
/// <returns></returns>
public static string createWord()
{
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Document WordDoc;
string strContent = "";
object strFileName = System.Web.HttpContext.Current.Server.MapPath( "test.doc " );
if( System.IO.File.Exists( (string)strFileName ) )
System.IO.File.Delete( (string)strFileName );
Object oMissing = System.Reflection.Missing.Value;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
#region
将数据库中读取得数据写入到word文件中
strContent = "你好/n/n/r ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
strContent = "这是测试程序 ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
#endregion
//将WordDoc文档对象的内容保存为DOC文档
WordDoc.SaveAs( ref strFileName, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref
oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//关闭WordDoc文档对象
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
//关闭WordApp组件对象
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
string message = strFileName + "/r/n " + "创建成功 ";
return message;
}
#endregion
#region 把Word文档装化为Html文件
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
public static void WordToHtml( string strFileName )
{
string saveFileName = strFileName + DateTime.Now.ToString( "yyyy-MM-dd-HH-mm-ss" ) + ".html";
WordToHtml( strFileName, saveFileName );
}
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
/// <param name="strSaveFileName">要生成的具体的Html页面</param>
public static void WordToHtml( string strFileName, string strSaveFileName )
{
Microsoft.Office.Interop.Word.ApplicationClass WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
Object oMissing = System.Reflection.Missing.Value;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
object fileName = strFileName;
WordDoc = WordApp.Documents.Open( ref fileName,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
Type wordType = WordApp.GetType();
// 打开文件
Type docsType = WordApp.Documents.GetType();
// 转换格式，另存为
Type docType = WordDoc.GetType();
object saveFileName = strSaveFileName;
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod, null, WordDoc, new object[] { saveFileName, Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatHTML } );
#region 其它格式：
/**//**/
/**wdFormatHTML
///wdFormatDocument
///wdFormatDOSText
///wdFormatDOSTextLineBreaks
///wdFormatEncodedText
///wdFormatRTF
///wdFormatTemplate
///wdFormatText
///wdFormatTextLineBreaks
///wdFormatUnicodeText
//-----------------------------------------------------------------------------------
//
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordDoc, new object[]{saveFileName, Word.WdSaveFormat.wdFormatHTML} );
// 退出 Word
//wordType.InvokeMember( "Quit", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordApp, null );
#endregion
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 导入模板
/** <summary>
/// 导入模板
/// </summary>
/// <param name="filePath">模板文档路径</param>
public static void ImportTemplate( string filePath )
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
object fileName = filePath;
WordDoc = WordApp.Documents.Add( ref fileName, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region word中添加新表
/** <summary>
/// word中添加新表
/// </summary>
public static void AddTable()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );//3行4列的表
}
#endregion
#region 在表中插入新行
/** <summary>
/// 在表中插入新的1行
/// </summary>
public static void AddRow()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
}
#endregion
#region 分离单元格
/** <summary>
/// 合并单元格
/// </summary>
public static void CombinationCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 2, 1 );//2行1列合并2行2列为一起
cell.Merge( newTable.Cell( 2, 2 ) );
//cell.Merge( newTable.Cell( 1, 3 ) );
}
#endregion
#region 分离单元格
/** <summary>
/// 分离单元格
/// </summary>
public static void SeparateCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 1, 1 );
cell.Merge( newTable.Cell( 1, 2 ) );
object Rownum = 2;
object Columnnum = 2;
cell.Split( ref Rownum, ref
Columnnum );
}
#endregion
#region 通过段落控制插入Insert a paragraph at the beginning of the document.
/** <summary>
/// 通过段落控制插入Insert a paragraph at the beginning of the document.
/// </summary>
public static void Insert()
{
object oMissing = System.Reflection.Missing.Value;
//object oEndOfDoc = "//endofdoc"; /**//* /endofdoc is a predefined bookmark */
//Start Word and create a new document.
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//Insert a paragraph at the beginning of the document.
Microsoft.Office.Interop.Word.Paragraph oPara1;
oPara1 = WordDoc.Content.Paragraphs.Add( ref oMissing );
oPara1.Range.Text = "Heading 1";
oPara1.Range.Font.Bold = 1;
oPara1.Format.SpaceAfter = 24;
//24 pt spacing after paragraph.
oPara1.Range.InsertParagraphAfter();
}
#endregion
#region word文档设置及获取光标位置
/** <summary>
/// word文档设置及获取光标位置
/// </summary>
public static void WordSet()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
#region 文档格式设置
WordApp.ActiveDocument.PageSetup.LineNumbering.Active = 0;//行编号
WordApp.ActiveDocument.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientPortrait;//页面方向
WordApp.ActiveDocument.PageSetup.TopMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//上页边距
WordApp.ActiveDocument.PageSetup.BottomMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//下页边距
WordApp.ActiveDocument.PageSetup.LeftMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//左页边距
WordApp.ActiveDocument.PageSetup.RightMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//右页边距
WordApp.ActiveDocument.PageSetup.Gutter = WordApp.CentimetersToPoints( float.Parse( "0" ) );//装订线位置
WordApp.ActiveDocument.PageSetup.HeaderDistance = WordApp.CentimetersToPoints( float.Parse( "1.5" ) );//页眉
WordApp.ActiveDocument.PageSetup.FooterDistance = WordApp.CentimetersToPoints( float.Parse( "1.75" ) );//页脚
WordApp.ActiveDocument.PageSetup.PageWidth = WordApp.CentimetersToPoints( float.Parse( "21" ) );//纸张宽度
WordApp.ActiveDocument.PageSetup.PageHeight = WordApp.CentimetersToPoints( float.Parse( "29.7" ) );//纸张高度
WordApp.ActiveDocument.PageSetup.FirstPageTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.OtherPagesTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.SectionStart = Microsoft.Office.Interop.Word.WdSectionStart.wdSectionNewPage;//节的起始位置：新建页
WordApp.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = 0;//页眉页脚-奇偶页不同
WordApp.ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = 0;//页眉页脚-首页不同
WordApp.ActiveDocument.PageSetup.VerticalAlignment = Microsoft.Office.Interop.Word.WdVerticalAlignment.wdAlignVerticalTop;//页面垂直对齐方式
WordApp.ActiveDocument.PageSetup.SuppressEndnotes = 0;//不隐藏尾注
WordApp.ActiveDocument.PageSetup.MirrorMargins = 0;//不设置首页的内外边距
WordApp.ActiveDocument.PageSetup.TwoPagesOnOne = false;//不双面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrinting = false;//不设置手动双面正面打印
WordApp.ActiveDocument.PageSetup.BookFoldRevPrinting = false;//不设置手动双面背面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrintingSheets = 1;//打印默认份数
WordApp.ActiveDocument.PageSetup.GutterPos = Microsoft.Office.Interop.Word.WdGutterStyle.wdGutterPosLeft;//装订线位于左侧
WordApp.ActiveDocument.PageSetup.LinesPage = 40;//默认页行数量
WordApp.ActiveDocument.PageSetup.LayoutMode = Microsoft.Office.Interop.Word.WdLayoutMode.wdLayoutModeLineGrid;//版式模式为“只指定行网格”
#endregion
#region 段落格式设定
WordApp.Selection.ParagraphFormat.LeftIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//左缩进
WordApp.Selection.ParagraphFormat.RightIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//右缩进
WordApp.Selection.ParagraphFormat.SpaceBefore = float.Parse( "0" );//段前间距
WordApp.Selection.ParagraphFormat.SpaceBeforeAuto = 0;//
WordApp.Selection.ParagraphFormat.SpaceAfter = float.Parse( "0" );//段后间距
WordApp.Selection.ParagraphFormat.SpaceAfterAuto = 0;//
WordApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle;//单倍行距
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;//段落2端对齐
WordApp.Selection.ParagraphFormat.WidowControl = 0;//孤行控制
WordApp.Selection.ParagraphFormat.KeepWithNext = 0;//与下段同页
WordApp.Selection.ParagraphFormat.KeepTogether = 0;//段中不分页
WordApp.Selection.ParagraphFormat.PageBreakBefore = 0;//段前分页
WordApp.Selection.ParagraphFormat.NoLineNumber = 0;//取消行号
WordApp.Selection.ParagraphFormat.Hyphenation = 1;//取消段字
WordApp.Selection.ParagraphFormat.FirstLineIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//首行缩进
WordApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText;
WordApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1;
WordApp.Selection.ParagraphFormat.DisableLineHeightGrid = 0;
WordApp.Selection.ParagraphFormat.FarEastLineBreakControl = 1;
WordApp.Selection.ParagraphFormat.WordWrap = 1;
WordApp.Selection.ParagraphFormat.HangingPunctuation = 1;
WordApp.Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine = 0;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha = 1;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit = 1;
WordApp.Selection.ParagraphFormat.BaseLineAlignment = Microsoft.Office.Interop.Word.WdBaselineAlignment.wdBaselineAlignAuto;
#endregion
#region 字体格式设定
WordApp.Selection.Font.NameFarEast = "华文中宋";
WordApp.Selection.Font.NameAscii = "Times New Roman";
WordApp.Selection.Font.NameOther = "Times New Roman";
WordApp.Selection.Font.Name = "宋体";
WordApp.Selection.Font.Size = float.Parse( "14" );
WordApp.Selection.Font.Bold = 0;
WordApp.Selection.Font.Italic = 0;
WordApp.Selection.Font.Underline = Microsoft.Office.Interop.Word.WdUnderline.wdUnderlineNone;
WordApp.Selection.Font.UnderlineColor = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.StrikeThrough = 0;//删除线
WordApp.Selection.Font.DoubleStrikeThrough = 0;//双删除线
WordApp.Selection.Font.Outline = 0;//空心
WordApp.Selection.Font.Emboss = 0;//阳文
WordApp.Selection.Font.Shadow = 0;//阴影
WordApp.Selection.Font.Hidden = 0;//隐藏文字
WordApp.Selection.Font.SmallCaps = 0;//小型大写字母
WordApp.Selection.Font.AllCaps = 0;//全部大写字母
WordApp.Selection.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.Engrave = 0;//阴文
WordApp.Selection.Font.Superscript = 0;//上标
WordApp.Selection.Font.Subscript = 0;//下标
WordApp.Selection.Font.Spacing = float.Parse( "0" );//字符间距
WordApp.Selection.Font.Scaling = 100;//字符缩放
WordApp.Selection.Font.Position = 0;//位置
WordApp.Selection.Font.Kerning = float.Parse( "1" );//字体间距调整
WordApp.Selection.Font.Animation = Microsoft.Office.Interop.Word.WdAnimation.wdAnimationNone;//文字效果
WordApp.Selection.Font.DisableCharacterSpaceGrid = false;
WordApp.Selection.Font.EmphasisMark = Microsoft.Office.Interop.Word.WdEmphasisMark.wdEmphasisMarkNone;
#endregion
#region 获取光标位置
/**/get_Information
WordApp.Selection.get_Information( WdInformation.wdActiveEndPageNumber );
//关于行号-页号-列号-位置
//information 属性
//返回有关指定的所选内容或区域的信息。variant 类型，只读。
//expression.information(type)
//expression 必需。该表达式返回一个 range 或 selection 对象。
//type long 类型，必需。需要返回的信息。可取下列 wdinformation 常量之一：
//wdactiveendadjustedpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾。如果设置了一个起始页码，并对页码进行了手工调整，则返回调整过的页码。
//wdactiveendpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾，页码从文档的开头开始计算而不考虑对页码的任何手工调整。
//wdactiveendsectionnumber 返回节号，在该节中包含了指定的所选内容或区域的活动结尾。
//wdatendofrowmarker 如果指定的所选内容或区域位于表格的行结尾标记处，则本参数返回 true。
//wdcapslock 如果大写字母锁定模式有效，则本参数返回 true。
//wdendofrangecolumnnumber 返回表格列号，在该表格列中包含了指定的所选内容或区域的活动结尾。
//wdendofrangerownumber 返回表格行号，在该表格行包含了指定的所选内容或区域的活动结尾。
//wdfirstcharactercolumnnumber 返回指定的所选内容或区域中第一个字符的位置。如果所选内容或区域是折叠的，则返回所选内容或区域右侧紧接着的字符编号。
//wdfirstcharacterlinenumber 返回所选内容中第一个字符的行号。如果 pagination 属性为 false，或 draft 属性为 true，则返回 - 1。
//wdframeisselected 如果所选内容或区域是一个完整的图文框文本框，则本参数返回 true。
//wdheaderfootertype 返回一个值，该值表明包含了指定的所选内容或区域的页眉或页脚的类型，如下表所示。 值 页眉或页脚的类型
//- 1 无
//0 偶数页页眉
//1 奇数页页眉
//2 偶数页页脚
//3 奇数页页脚
//4 第一个页眉
//5 第一个页脚
//wdhorizontalpositionrelativetopage 返回指定的所选内容或区域的水平位置。该位置是所选内容或区域的左边与页面的左边之间的距离，以磅为单位。如果所选内容或区域不可见，则返回 - 1。
//wdhorizontalpositionrelativetotextboundary 返回指定的所选内容或区域相对于周围最近的正文边界的左边的水平位置，以磅为单位。如果所选内容或区域没有显示在当前屏幕，则本参数返回 - 1。
//wdinclipboard 有关此常量的详细内容，请参阅 microsoft office 98 macintosh 版的语言参考帮助。
//wdincommentpane 如果指定的所选内容或区域位于批注窗格，则返回 true。
//wdinendnote 如果指定的所选内容或区域位于页面视图的尾注区内，或者位于普通视图的尾注窗格中，则本参数返回 true。
//wdinfootnote 如果指定的所选内容或区域位于页面视图的脚注区内，或者位于普通视图的脚注窗格中，则本参数返回 true。
//wdinfootnoteendnotepane 如果指定的所选内容或区域位于页面视图的脚注或尾注区内，或者位于普通视图的脚注或尾注窗格中，则本参数返回 true。详细内容，请参阅前面的 wdinfootnote 和 wdinendnote 的说明。
//wdinheaderfooter 如果指定的所选内容或区域位于页眉或页脚窗格中，或者位于页面视图的页眉或页脚中，则本参数返回 true。
//wdinmasterdocument 如果指定的所选内容或区域位于主控文档中，则本参数返回 true。
//wdinwordmail 返回一个值，该值表明了所选内容或区域的的位置，如下表所示。值 位置
//0 所选内容或区域不在一条电子邮件消息中。
//1 所选内容或区域位于正在发送的电子邮件中。
//2 所选内容或区域位于正在阅读的电子邮件中。
//wdmaximumnumberofcolumns 返回所选内容或区域中任何行的最大表格列数。
//wdmaximumnumberofrows 返回指定的所选内容或区域中表格的最大行数。
//wdnumberofpagesindocument 返回与所选内容或区域相关联的文档的页数。
//wdnumlock 如果 num lock 有效，则本参数返回 true。
//wdovertype 如果改写模式有效，则本参数返回 true。可用 overtype 属性改变改写模式的状态。
//wdreferenceoftype 返回一个值，该值表明所选内容相对于脚注、尾注或批注引用的位置，如下表所示。 值 描述
//— 1 所选内容或区域包含、但不只限定于脚注、尾注或批注引用中。
//0 所选内容或区域不在脚注、尾注或批注引用之前。
//1 所选内容或区域位于脚注引用之前。
//2 所选内容或区域位于尾注引用之前。
//3 所选内容或区域位于批注引用之前。
//wdrevisionmarking 如果修订功能处于活动状态，则本参数返回 true。
//wdselectionmode 返回一个值，该值表明当前的选定模式，如下表所示。 值 选定模式
//0 常规选定
//1 扩展选定
//2 列选定
//wdstartofrangecolumnnumber 返回所选内容或区域的起点所在的表格的列号。
//wdstartofrangerownumber 返回所选内容或区域的起点所在的表格的行号。
//wdverticalpositionrelativetopage 返回所选内容或区域的垂直位置，即所选内容的上边与页面的上边之间的距离，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdverticalpositionrelativetotextboundary 返回所选内容或区域相对于周围最近的正文边界的上边的垂直位置，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdwithintable 如果所选内容位于一个表格中，则本参数返回 true。
//wdzoompercentage 返回由 percentage 属性设置的当前的放大百分比。
#endregion
#region 光标移动
//移动光标
//光标下移3行 上移3行
object unit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object count = 3;
WordApp.Selection.MoveEnd( ref unit, ref count );
WordApp.Selection.MoveUp( ref unit, ref count, ref oMissing );
//Microsoft.Office.Interop.Word.WdUnits说明
//wdCell
A cell.
//wdCharacter
A character.
//wdCharacterFormatting
Character formatting.
//wdColumn
A column.
//wdItem
The selected item.
//wdLine
A line. //行
//wdParagraph
A paragraph.
//wdParagraphFormatting
Paragraph formatting.
//wdRow
A row.
//wdScreen
The screen dimensions.
//wdSection
A section.
//wdSentence
A sentence.
//wdStory
A story.
//wdTable
A table.
//wdWindow
A window.
//wdWord
A word.
//录制的vb宏
//
,移动光标至当前行首
//
Selection.HomeKey unit:=wdLine
//
'移动光标至当前行尾
//
Selection.EndKey unit:=wdLine
//
'选择从光标至当前行首的内容
//
Selection.HomeKey unit:=wdLine, Extend:=wdExtend
//
'选择从光标至当前行尾的内容
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'选择当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'移动光标至文档开始
//
Selection.HomeKey unit:=wdStory
//
'移动光标至文档结尾
//
Selection.EndKey unit:=wdStory
//
'选择从光标至文档开始的内容
//
Selection.HomeKey unit:=wdStory, Extend:=wdExtend
//
'选择从光标至文档结尾的内容
//
Selection.EndKey unit:=wdStory, Extend:=wdExtend
//
'选择文档全部内容（从WholeStory可猜出Story应是当前文档的意思）
//
Selection.WholeStory
//
'移动光标至当前段落的开始
//
Selection.MoveUp unit:=wdParagraph
//
'移动光标至当前段落的结尾
//
Selection.MoveDown unit:=wdParagraph
//
'选择从光标至当前段落开始的内容
//
Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
//
'选择从光标至当前段落结尾的内容
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'选择光标所在段落的内容
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'显示选择区的开始与结束的位置，注意：文档第1个字符的位置是0
//
MsgBox ("第" & Selection.Start & "个字符至第" & Selection.End & "个字符")
//
'删除当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
Selection.Delete
//
'删除当前段落
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
Selection.Delete
//表格的光标移动
//光标到当前光标所在表格的地单元格
WordApp.Selection.Tables[1].Cell( 1, 1 ).Select();
//unit对象定义
object unith = Microsoft.Office.Interop.Word.WdUnits.wdRow;//表格行方式
object extend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;/**//**//**extend对光标移动区域进行扩展选择
object unitu = Microsoft.Office.Interop.Word.WdUnits.wdLine;//文档行方式,可以看成表格一行.不过和wdRow有区别
object unitp = Microsoft.Office.Interop.Word.WdUnits.wdParagraph;//段落方式,对于表格可以选择到表格行后的换车符,对于跨行合并的行选择,我能找到的最简单方式
//object count = 1;//光标移动量
#endregion
}
#endregion
#region 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/** <summary>
/// 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/// </summary>
/// <param name="fileName">word文档</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <returns>返回数据</returns>
public static string ReadWord_tableContentByCell( string fileName, int rowIndex, int colIndex )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
string text = table.Cell( rowIndex, colIndex ).Range.Text.ToString();
text = text.Substring( 0, text.Length - 2 );　　//去除尾部的mark
return text;
}
catch( Exception ex )
{
return ex.Message;
}
finally
{
if( doc != null )
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
#endregion
#region 修改word表格中指定单元格的数据
/** <summary>
/// 修改word表格中指定单元格的数据
/// </summary>
/// <param name="fileName">word文档包括路径</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <param name="content"></param>
/// <returns></returns>
public static bool UpdateWordTableByCell( string fileName, int rowIndex, int colIndex, string content )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
//doc.Range( ref 0, ref 0 ).InsertParagraphAfter();//插入回车
table.Cell( rowIndex, colIndex ).Range.InsertParagraphAfter();//.Text = content;
return true;
}
catch
{
return false;
}
finally
{
if( doc != null )
{
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
}
#endregion
#region 清楚word进程
/** <summary>
/// 清楚word进程
/// </summary>
public static void KillWordProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "WINWORD.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "winword.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 清楚excel进程
/** <summary>
/// 清楚excel进程
/// </summary>
public static void KillExcelProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "excel.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "excel.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 网页内容或导入word或excel
/** <summary>
/// 网页内容保存或导出为word或excel
/// </summary>
/// <param name="url">网页地址</param>
/// <param name="num">0为导出word,1为导出excel</param>
public static void SaveOrOutData( string url, int num )//导出数据的函数0为word,1为Excel
{
WebRequest req = WebRequest.Create( url );
WebResponse resp = req.GetResponse();
StreamReader sr = new StreamReader( resp.GetResponseStream(), System.Text.Encoding.UTF8 );
string x = sr.ReadToEnd();
System.Web.HttpContext.Current.Response.Clear();
System.Web.HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.GetEncoding( "gb2312" );
string fName = DateTime.Now.ToString( "yyyy-MM-dd-ss" );
if( num == 0 )
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".doc";
System.Web.HttpContext.Current.Response.ContentType = "application/ms-word";
}
else
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".xls";
System.Web.HttpContext.Current.Response.ContentType = "application nd.xls";
}
System.Web.HttpContext.Current.Response.AddHeader( "content-disposition", "attachment;filename=" + fName );
System.Web.HttpContext.Current.Response.Write( getBodyContent( x ) );//获取table标签
System.Web.HttpContext.Current.Response.Flush();
System.Web.HttpContext.Current.Response.End();
}
/** <summary>
/// 获取网页table标签的内容
/// </summary>
/// <param name="input">html代码</param>
/// <returns></returns>
private static string getBodyContent( string input )
{
string pattern = @"<table.*?</table>";
Regex reg = new Regex( pattern, RegexOptions.Singleline | RegexOptions.Compiled | RegexOptions.IgnoreCase );
Match mc = reg.Match( input );
string bodyContent = "";
if( mc.Success )
{
bodyContent = mc.Value;
}
return bodyContent;
}
#endregion
#region 判断系统是否装excel
/** <summary>
/// 判断系统是否装excel
/// </summary>
/// <returns></returns>
public static bool IsInstallExcel()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的excel
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallExcelByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Excel" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
#region 判断系统是否装word
/** <summary>
/// 判断系统是否装word
/// </summary>
/// <returns></returns>
public static bool IsInstallWord()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的word
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallWordByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Word" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
}
}

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.Office.Interop.Word;
using System.IO;
using System.Web;
using System.Data;
using System.Reflection;
using Microsoft.Win32;
using System.Text.RegularExpressions;
using System.Net;
namespace OfficeOperate
{
public class WordOperate
{
#region 动态生成Word文档并填充数据
/** <summary>
/// 动态生成Word文档并填充数据
/// </summary>
/// <returns>返回自定义信息</returns>
public static string CreateWordFile()
{
string message = "";
try
{
Object oMissing = System.Reflection.Missing.Value;
string dir = System.Web.HttpContext.Current.Server.MapPath( "" );//首先在类库添加using System.web的引用
if( !Directory.Exists( dir + "//file" ) )
{
Directory.CreateDirectory( dir + "//file" );
//创建文件所在目录
}
string name = DateTime.Now.ToLongDateString() + ".doc";
object filename = dir + "//file//" + name;
//文件保存路径
//创建Word文档
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
/**/添加页眉方法一：
//WordApp.ActiveWindow.View.Type = WdViewType.wdOutlineView;
//WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekPrimaryHeader;
//WordApp.ActiveWindow.ActivePane.Selection.InsertAfter( "无锡全真通科技有限公司" );//页眉内容
//添加页眉方法二：
if( WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdNormalView || WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdOutlineView )
{
WordApp.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdPrintView;
}
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader;
string sHeader = "页眉内容";
WordApp.Selection.HeaderFooter.LinkToPrevious = false;
WordApp.Selection.HeaderFooter.Range.Text = sHeader;
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument;
//WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;//设置右对齐
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphLeft;//设置左对齐
WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekMainDocument;//跳出页眉设置
WordApp.Selection.ParagraphFormat.LineSpacing = 15f;//设置文档的行间距
//移动焦点并换行
object count = 14;
object WdLine = Microsoft.Office.Interop.Word.WdUnits.wdLine;//换一行;
WordApp.Selection.MoveDown( ref WdLine, ref count, ref oMissing );//移动焦点
WordApp.Selection.TypeParagraph();//插入段落
//文档中创建表格
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables.Add( WordApp.Selection.Range, 12, 3, ref oMissing, ref oMissing );
//设置表格样式
newTable.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleThickThinLargeGap;
newTable.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle;
newTable.Columns[1].Width = 100f;
newTable.Columns[2].Width = 220f;
newTable.Columns[3].Width = 105f;
//填充表格内容
newTable.Cell( 1, 1 ).Range.Text = "产品详细信息表";
newTable.Cell( 1, 1 ).Range.Bold = 2;//设置单元格中字体为粗体
//合并单元格
newTable.Cell( 1, 1 ).Merge( newTable.Cell( 1, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;//垂直居中
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;//水平居中
//填充表格内容
newTable.Cell( 2, 1 ).Range.Text = "产品基本信息";
newTable.Cell( 2, 1 ).Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorDarkBlue;//设置单元格内字体颜色
//合并单元格
newTable.Cell( 2, 1 ).Merge( newTable.Cell( 2, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;
//填充表格内容
newTable.Cell( 3, 1 ).Range.Text = "品牌名称：";
newTable.Cell( 3, 2 ).Range.Text = "BrandName";
//纵向合并单元格
newTable.Cell( 3, 3 ).Select();//选中一行
object moveUnit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object moveCount = 5;
object moveExtend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;
WordApp.Selection.MoveDown( ref moveUnit, ref moveCount, ref moveExtend );
WordApp.Selection.Cells.Merge();
//插入图片
if( File.Exists( System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" ) ) )
{
string FileName = System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" );//图片所在路径
object LinkToFile = false;
object SaveWithDocument = true;
object Anchor = WordDoc.Application.Selection.Range;
WordDoc.Application.ActiveDocument.InlineShapes.AddPicture( FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor );
WordDoc.Application.ActiveDocument.InlineShapes[1].Width = 100f;//图片宽度
WordDoc.Application.ActiveDocument.InlineShapes[1].Height = 100f;//图片高度
}
//将图片设置为四周环绕型
Microsoft.Office.Interop.Word.Shape s = WordDoc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();
s.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;
newTable.Cell( 12, 1 ).Range.Text = "产品特殊属性";
newTable.Cell( 12, 1 ).Merge( newTable.Cell( 12, 3 ) );
//在表格中增加行
WordDoc.Content.Tables[1].Rows.Add( ref oMissing );
WordDoc.Paragraphs.Last.Range.Text = "文档创建时间：" + DateTime.Now.ToString();//“落款”
WordDoc.Paragraphs.Last.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
//文件保存
WordDoc.SaveAs( ref filename, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
message = name + "文档生成成功";
}
catch
{
message = "文件导出异常！";
}
return message;
}
#endregion
#region 创建并打开一个空的word文档进行编辑
/** <summary>
/// 创建并打开一个空的word文档进行编辑
/// </summary>
public static void OpenNewWordFileToEdit()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 创建word文档
/** <summary>
/// 创建word文档
/// </summary>
/// <returns></returns>
public static string createWord()
{
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Document WordDoc;
string strContent = "";
object strFileName = System.Web.HttpContext.Current.Server.MapPath( "test.doc " );
if( System.IO.File.Exists( (string)strFileName ) )
System.IO.File.Delete( (string)strFileName );
Object oMissing = System.Reflection.Missing.Value;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
#region
将数据库中读取得数据写入到word文件中
strContent = "你好/n/n/r ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
strContent = "这是测试程序 ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
#endregion
//将WordDoc文档对象的内容保存为DOC文档
WordDoc.SaveAs( ref strFileName, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref
oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//关闭WordDoc文档对象
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
//关闭WordApp组件对象
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
string message = strFileName + "/r/n " + "创建成功 ";
return message;
}
#endregion
#region 把Word文档装化为Html文件
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
public static void WordToHtml( string strFileName )
{
string saveFileName = strFileName + DateTime.Now.ToString( "yyyy-MM-dd-HH-mm-ss" ) + ".html";
WordToHtml( strFileName, saveFileName );
}
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
/// <param name="strSaveFileName">要生成的具体的Html页面</param>
public static void WordToHtml( string strFileName, string strSaveFileName )
{
Microsoft.Office.Interop.Word.ApplicationClass WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
Object oMissing = System.Reflection.Missing.Value;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
object fileName = strFileName;
WordDoc = WordApp.Documents.Open( ref fileName,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
Type wordType = WordApp.GetType();
// 打开文件
Type docsType = WordApp.Documents.GetType();
// 转换格式，另存为
Type docType = WordDoc.GetType();
object saveFileName = strSaveFileName;
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod, null, WordDoc, new object[] { saveFileName, Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatHTML } );
#region 其它格式：
/**//**/
/**wdFormatHTML
///wdFormatDocument
///wdFormatDOSText
///wdFormatDOSTextLineBreaks
///wdFormatEncodedText
///wdFormatRTF
///wdFormatTemplate
///wdFormatText
///wdFormatTextLineBreaks
///wdFormatUnicodeText
//-----------------------------------------------------------------------------------
//
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordDoc, new object[]{saveFileName, Word.WdSaveFormat.wdFormatHTML} );
// 退出 Word
//wordType.InvokeMember( "Quit", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordApp, null );
#endregion
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 导入模板
/** <summary>
/// 导入模板
/// </summary>
/// <param name="filePath">模板文档路径</param>
public static void ImportTemplate( string filePath )
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
object fileName = filePath;
WordDoc = WordApp.Documents.Add( ref fileName, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region word中添加新表
/** <summary>
/// word中添加新表
/// </summary>
public static void AddTable()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );//3行4列的表
}
#endregion
#region 在表中插入新行
/** <summary>
/// 在表中插入新的1行
/// </summary>
public static void AddRow()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
}
#endregion
#region 分离单元格
/** <summary>
/// 合并单元格
/// </summary>
public static void CombinationCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 2, 1 );//2行1列合并2行2列为一起
cell.Merge( newTable.Cell( 2, 2 ) );
//cell.Merge( newTable.Cell( 1, 3 ) );
}
#endregion
#region 分离单元格
/** <summary>
/// 分离单元格
/// </summary>
public static void SeparateCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 1, 1 );
cell.Merge( newTable.Cell( 1, 2 ) );
object Rownum = 2;
object Columnnum = 2;
cell.Split( ref Rownum, ref
Columnnum );
}
#endregion
#region 通过段落控制插入Insert a paragraph at the beginning of the document.
/** <summary>
/// 通过段落控制插入Insert a paragraph at the beginning of the document.
/// </summary>
public static void Insert()
{
object oMissing = System.Reflection.Missing.Value;
//object oEndOfDoc = "//endofdoc"; /**//* /endofdoc is a predefined bookmark */
//Start Word and create a new document.
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//Insert a paragraph at the beginning of the document.
Microsoft.Office.Interop.Word.Paragraph oPara1;
oPara1 = WordDoc.Content.Paragraphs.Add( ref oMissing );
oPara1.Range.Text = "Heading 1";
oPara1.Range.Font.Bold = 1;
oPara1.Format.SpaceAfter = 24;
//24 pt spacing after paragraph.
oPara1.Range.InsertParagraphAfter();
}
#endregion
#region word文档设置及获取光标位置
/** <summary>
/// word文档设置及获取光标位置
/// </summary>
public static void WordSet()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
#region 文档格式设置
WordApp.ActiveDocument.PageSetup.LineNumbering.Active = 0;//行编号
WordApp.ActiveDocument.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientPortrait;//页面方向
WordApp.ActiveDocument.PageSetup.TopMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//上页边距
WordApp.ActiveDocument.PageSetup.BottomMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//下页边距
WordApp.ActiveDocument.PageSetup.LeftMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//左页边距
WordApp.ActiveDocument.PageSetup.RightMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//右页边距
WordApp.ActiveDocument.PageSetup.Gutter = WordApp.CentimetersToPoints( float.Parse( "0" ) );//装订线位置
WordApp.ActiveDocument.PageSetup.HeaderDistance = WordApp.CentimetersToPoints( float.Parse( "1.5" ) );//页眉
WordApp.ActiveDocument.PageSetup.FooterDistance = WordApp.CentimetersToPoints( float.Parse( "1.75" ) );//页脚
WordApp.ActiveDocument.PageSetup.PageWidth = WordApp.CentimetersToPoints( float.Parse( "21" ) );//纸张宽度
WordApp.ActiveDocument.PageSetup.PageHeight = WordApp.CentimetersToPoints( float.Parse( "29.7" ) );//纸张高度
WordApp.ActiveDocument.PageSetup.FirstPageTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.OtherPagesTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.SectionStart = Microsoft.Office.Interop.Word.WdSectionStart.wdSectionNewPage;//节的起始位置：新建页
WordApp.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = 0;//页眉页脚-奇偶页不同
WordApp.ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = 0;//页眉页脚-首页不同
WordApp.ActiveDocument.PageSetup.VerticalAlignment = Microsoft.Office.Interop.Word.WdVerticalAlignment.wdAlignVerticalTop;//页面垂直对齐方式
WordApp.ActiveDocument.PageSetup.SuppressEndnotes = 0;//不隐藏尾注
WordApp.ActiveDocument.PageSetup.MirrorMargins = 0;//不设置首页的内外边距
WordApp.ActiveDocument.PageSetup.TwoPagesOnOne = false;//不双面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrinting = false;//不设置手动双面正面打印
WordApp.ActiveDocument.PageSetup.BookFoldRevPrinting = false;//不设置手动双面背面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrintingSheets = 1;//打印默认份数
WordApp.ActiveDocument.PageSetup.GutterPos = Microsoft.Office.Interop.Word.WdGutterStyle.wdGutterPosLeft;//装订线位于左侧
WordApp.ActiveDocument.PageSetup.LinesPage = 40;//默认页行数量
WordApp.ActiveDocument.PageSetup.LayoutMode = Microsoft.Office.Interop.Word.WdLayoutMode.wdLayoutModeLineGrid;//版式模式为“只指定行网格”
#endregion
#region 段落格式设定
WordApp.Selection.ParagraphFormat.LeftIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//左缩进
WordApp.Selection.ParagraphFormat.RightIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//右缩进
WordApp.Selection.ParagraphFormat.SpaceBefore = float.Parse( "0" );//段前间距
WordApp.Selection.ParagraphFormat.SpaceBeforeAuto = 0;//
WordApp.Selection.ParagraphFormat.SpaceAfter = float.Parse( "0" );//段后间距
WordApp.Selection.ParagraphFormat.SpaceAfterAuto = 0;//
WordApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle;//单倍行距
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;//段落2端对齐
WordApp.Selection.ParagraphFormat.WidowControl = 0;//孤行控制
WordApp.Selection.ParagraphFormat.KeepWithNext = 0;//与下段同页
WordApp.Selection.ParagraphFormat.KeepTogether = 0;//段中不分页
WordApp.Selection.ParagraphFormat.PageBreakBefore = 0;//段前分页
WordApp.Selection.ParagraphFormat.NoLineNumber = 0;//取消行号
WordApp.Selection.ParagraphFormat.Hyphenation = 1;//取消段字
WordApp.Selection.ParagraphFormat.FirstLineIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//首行缩进
WordApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText;
WordApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1;
WordApp.Selection.ParagraphFormat.DisableLineHeightGrid = 0;
WordApp.Selection.ParagraphFormat.FarEastLineBreakControl = 1;
WordApp.Selection.ParagraphFormat.WordWrap = 1;
WordApp.Selection.ParagraphFormat.HangingPunctuation = 1;
WordApp.Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine = 0;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha = 1;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit = 1;
WordApp.Selection.ParagraphFormat.BaseLineAlignment = Microsoft.Office.Interop.Word.WdBaselineAlignment.wdBaselineAlignAuto;
#endregion
#region 字体格式设定
WordApp.Selection.Font.NameFarEast = "华文中宋";
WordApp.Selection.Font.NameAscii = "Times New Roman";
WordApp.Selection.Font.NameOther = "Times New Roman";
WordApp.Selection.Font.Name = "宋体";
WordApp.Selection.Font.Size = float.Parse( "14" );
WordApp.Selection.Font.Bold = 0;
WordApp.Selection.Font.Italic = 0;
WordApp.Selection.Font.Underline = Microsoft.Office.Interop.Word.WdUnderline.wdUnderlineNone;
WordApp.Selection.Font.UnderlineColor = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.StrikeThrough = 0;//删除线
WordApp.Selection.Font.DoubleStrikeThrough = 0;//双删除线
WordApp.Selection.Font.Outline = 0;//空心
WordApp.Selection.Font.Emboss = 0;//阳文
WordApp.Selection.Font.Shadow = 0;//阴影
WordApp.Selection.Font.Hidden = 0;//隐藏文字
WordApp.Selection.Font.SmallCaps = 0;//小型大写字母
WordApp.Selection.Font.AllCaps = 0;//全部大写字母
WordApp.Selection.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.Engrave = 0;//阴文
WordApp.Selection.Font.Superscript = 0;//上标
WordApp.Selection.Font.Subscript = 0;//下标
WordApp.Selection.Font.Spacing = float.Parse( "0" );//字符间距
WordApp.Selection.Font.Scaling = 100;//字符缩放
WordApp.Selection.Font.Position = 0;//位置
WordApp.Selection.Font.Kerning = float.Parse( "1" );//字体间距调整
WordApp.Selection.Font.Animation = Microsoft.Office.Interop.Word.WdAnimation.wdAnimationNone;//文字效果
WordApp.Selection.Font.DisableCharacterSpaceGrid = false;
WordApp.Selection.Font.EmphasisMark = Microsoft.Office.Interop.Word.WdEmphasisMark.wdEmphasisMarkNone;
#endregion
#region 获取光标位置
/**/get_Information
WordApp.Selection.get_Information( WdInformation.wdActiveEndPageNumber );
//关于行号-页号-列号-位置
//information 属性
//返回有关指定的所选内容或区域的信息。variant 类型，只读。
//expression.information(type)
//expression 必需。该表达式返回一个 range 或 selection 对象。
//type long 类型，必需。需要返回的信息。可取下列 wdinformation 常量之一：
//wdactiveendadjustedpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾。如果设置了一个起始页码，并对页码进行了手工调整，则返回调整过的页码。
//wdactiveendpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾，页码从文档的开头开始计算而不考虑对页码的任何手工调整。
//wdactiveendsectionnumber 返回节号，在该节中包含了指定的所选内容或区域的活动结尾。
//wdatendofrowmarker 如果指定的所选内容或区域位于表格的行结尾标记处，则本参数返回 true。
//wdcapslock 如果大写字母锁定模式有效，则本参数返回 true。
//wdendofrangecolumnnumber 返回表格列号，在该表格列中包含了指定的所选内容或区域的活动结尾。
//wdendofrangerownumber 返回表格行号，在该表格行包含了指定的所选内容或区域的活动结尾。
//wdfirstcharactercolumnnumber 返回指定的所选内容或区域中第一个字符的位置。如果所选内容或区域是折叠的，则返回所选内容或区域右侧紧接着的字符编号。
//wdfirstcharacterlinenumber 返回所选内容中第一个字符的行号。如果 pagination 属性为 false，或 draft 属性为 true，则返回 - 1。
//wdframeisselected 如果所选内容或区域是一个完整的图文框文本框，则本参数返回 true。
//wdheaderfootertype 返回一个值，该值表明包含了指定的所选内容或区域的页眉或页脚的类型，如下表所示。 值 页眉或页脚的类型
//- 1 无
//0 偶数页页眉
//1 奇数页页眉
//2 偶数页页脚
//3 奇数页页脚
//4 第一个页眉
//5 第一个页脚
//wdhorizontalpositionrelativetopage 返回指定的所选内容或区域的水平位置。该位置是所选内容或区域的左边与页面的左边之间的距离，以磅为单位。如果所选内容或区域不可见，则返回 - 1。
//wdhorizontalpositionrelativetotextboundary 返回指定的所选内容或区域相对于周围最近的正文边界的左边的水平位置，以磅为单位。如果所选内容或区域没有显示在当前屏幕，则本参数返回 - 1。
//wdinclipboard 有关此常量的详细内容，请参阅 microsoft office 98 macintosh 版的语言参考帮助。
//wdincommentpane 如果指定的所选内容或区域位于批注窗格，则返回 true。
//wdinendnote 如果指定的所选内容或区域位于页面视图的尾注区内，或者位于普通视图的尾注窗格中，则本参数返回 true。
//wdinfootnote 如果指定的所选内容或区域位于页面视图的脚注区内，或者位于普通视图的脚注窗格中，则本参数返回 true。
//wdinfootnoteendnotepane 如果指定的所选内容或区域位于页面视图的脚注或尾注区内，或者位于普通视图的脚注或尾注窗格中，则本参数返回 true。详细内容，请参阅前面的 wdinfootnote 和 wdinendnote 的说明。
//wdinheaderfooter 如果指定的所选内容或区域位于页眉或页脚窗格中，或者位于页面视图的页眉或页脚中，则本参数返回 true。
//wdinmasterdocument 如果指定的所选内容或区域位于主控文档中，则本参数返回 true。
//wdinwordmail 返回一个值，该值表明了所选内容或区域的的位置，如下表所示。值 位置
//0 所选内容或区域不在一条电子邮件消息中。
//1 所选内容或区域位于正在发送的电子邮件中。
//2 所选内容或区域位于正在阅读的电子邮件中。
//wdmaximumnumberofcolumns 返回所选内容或区域中任何行的最大表格列数。
//wdmaximumnumberofrows 返回指定的所选内容或区域中表格的最大行数。
//wdnumberofpagesindocument 返回与所选内容或区域相关联的文档的页数。
//wdnumlock 如果 num lock 有效，则本参数返回 true。
//wdovertype 如果改写模式有效，则本参数返回 true。可用 overtype 属性改变改写模式的状态。
//wdreferenceoftype 返回一个值，该值表明所选内容相对于脚注、尾注或批注引用的位置，如下表所示。 值 描述
//— 1 所选内容或区域包含、但不只限定于脚注、尾注或批注引用中。
//0 所选内容或区域不在脚注、尾注或批注引用之前。
//1 所选内容或区域位于脚注引用之前。
//2 所选内容或区域位于尾注引用之前。
//3 所选内容或区域位于批注引用之前。
//wdrevisionmarking 如果修订功能处于活动状态，则本参数返回 true。
//wdselectionmode 返回一个值，该值表明当前的选定模式，如下表所示。 值 选定模式
//0 常规选定
//1 扩展选定
//2 列选定
//wdstartofrangecolumnnumber 返回所选内容或区域的起点所在的表格的列号。
//wdstartofrangerownumber 返回所选内容或区域的起点所在的表格的行号。
//wdverticalpositionrelativetopage 返回所选内容或区域的垂直位置，即所选内容的上边与页面的上边之间的距离，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdverticalpositionrelativetotextboundary 返回所选内容或区域相对于周围最近的正文边界的上边的垂直位置，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdwithintable 如果所选内容位于一个表格中，则本参数返回 true。
//wdzoompercentage 返回由 percentage 属性设置的当前的放大百分比。
#endregion
#region 光标移动
//移动光标
//光标下移3行 上移3行
object unit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object count = 3;
WordApp.Selection.MoveEnd( ref unit, ref count );
WordApp.Selection.MoveUp( ref unit, ref count, ref oMissing );
//Microsoft.Office.Interop.Word.WdUnits说明
//wdCell
A cell.
//wdCharacter
A character.
//wdCharacterFormatting
Character formatting.
//wdColumn
A column.
//wdItem
The selected item.
//wdLine
A line. //行
//wdParagraph
A paragraph.
//wdParagraphFormatting
Paragraph formatting.
//wdRow
A row.
//wdScreen
The screen dimensions.
//wdSection
A section.
//wdSentence
A sentence.
//wdStory
A story.
//wdTable
A table.
//wdWindow
A window.
//wdWord
A word.
//录制的vb宏
//
,移动光标至当前行首
//
Selection.HomeKey unit:=wdLine
//
'移动光标至当前行尾
//
Selection.EndKey unit:=wdLine
//
'选择从光标至当前行首的内容
//
Selection.HomeKey unit:=wdLine, Extend:=wdExtend
//
'选择从光标至当前行尾的内容
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'选择当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'移动光标至文档开始
//
Selection.HomeKey unit:=wdStory
//
'移动光标至文档结尾
//
Selection.EndKey unit:=wdStory
//
'选择从光标至文档开始的内容
//
Selection.HomeKey unit:=wdStory, Extend:=wdExtend
//
'选择从光标至文档结尾的内容
//
Selection.EndKey unit:=wdStory, Extend:=wdExtend
//
'选择文档全部内容（从WholeStory可猜出Story应是当前文档的意思）
//
Selection.WholeStory
//
'移动光标至当前段落的开始
//
Selection.MoveUp unit:=wdParagraph
//
'移动光标至当前段落的结尾
//
Selection.MoveDown unit:=wdParagraph
//
'选择从光标至当前段落开始的内容
//
Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
//
'选择从光标至当前段落结尾的内容
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'选择光标所在段落的内容
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'显示选择区的开始与结束的位置，注意：文档第1个字符的位置是0
//
MsgBox ("第" & Selection.Start & "个字符至第" & Selection.End & "个字符")
//
'删除当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
Selection.Delete
//
'删除当前段落
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
Selection.Delete
//表格的光标移动
//光标到当前光标所在表格的地单元格
WordApp.Selection.Tables[1].Cell( 1, 1 ).Select();
//unit对象定义
object unith = Microsoft.Office.Interop.Word.WdUnits.wdRow;//表格行方式
object extend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;/**//**//**extend对光标移动区域进行扩展选择
object unitu = Microsoft.Office.Interop.Word.WdUnits.wdLine;//文档行方式,可以看成表格一行.不过和wdRow有区别
object unitp = Microsoft.Office.Interop.Word.WdUnits.wdParagraph;//段落方式,对于表格可以选择到表格行后的换车符,对于跨行合并的行选择,我能找到的最简单方式
//object count = 1;//光标移动量
#endregion
}
#endregion
#region 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/** <summary>
/// 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/// </summary>
/// <param name="fileName">word文档</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <returns>返回数据</returns>
public static string ReadWord_tableContentByCell( string fileName, int rowIndex, int colIndex )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
string text = table.Cell( rowIndex, colIndex ).Range.Text.ToString();
text = text.Substring( 0, text.Length - 2 );　　//去除尾部的mark
return text;
}
catch( Exception ex )
{
return ex.Message;
}
finally
{
if( doc != null )
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
#endregion
#region 修改word表格中指定单元格的数据
/** <summary>
/// 修改word表格中指定单元格的数据
/// </summary>
/// <param name="fileName">word文档包括路径</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <param name="content"></param>
/// <returns></returns>
public static bool UpdateWordTableByCell( string fileName, int rowIndex, int colIndex, string content )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
//doc.Range( ref 0, ref 0 ).InsertParagraphAfter();//插入回车
table.Cell( rowIndex, colIndex ).Range.InsertParagraphAfter();//.Text = content;
return true;
}
catch
{
return false;
}
finally
{
if( doc != null )
{
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
}
#endregion
#region 清楚word进程
/** <summary>
/// 清楚word进程
/// </summary>
public static void KillWordProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "WINWORD.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "winword.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 清楚excel进程
/** <summary>
/// 清楚excel进程
/// </summary>
public static void KillExcelProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "excel.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "excel.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 网页内容或导入word或excel
/** <summary>
/// 网页内容保存或导出为word或excel
/// </summary>
/// <param name="url">网页地址</param>
/// <param name="num">0为导出word,1为导出excel</param>
public static void SaveOrOutData( string url, int num )//导出数据的函数0为word,1为Excel
{
WebRequest req = WebRequest.Create( url );
WebResponse resp = req.GetResponse();
StreamReader sr = new StreamReader( resp.GetResponseStream(), System.Text.Encoding.UTF8 );
string x = sr.ReadToEnd();
System.Web.HttpContext.Current.Response.Clear();
System.Web.HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.GetEncoding( "gb2312" );
string fName = DateTime.Now.ToString( "yyyy-MM-dd-ss" );
if( num == 0 )
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".doc";
System.Web.HttpContext.Current.Response.ContentType = "application/ms-word";
}
else
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".xls";
System.Web.HttpContext.Current.Response.ContentType = "application nd.xls";
}
System.Web.HttpContext.Current.Response.AddHeader( "content-disposition", "attachment;filename=" + fName );
System.Web.HttpContext.Current.Response.Write( getBodyContent( x ) );//获取table标签
System.Web.HttpContext.Current.Response.Flush();
System.Web.HttpContext.Current.Response.End();
}
/** <summary>
/// 获取网页table标签的内容
/// </summary>
/// <param name="input">html代码</param>
/// <returns></returns>
private static string getBodyContent( string input )
{
string pattern = @"<table.*?</table>";
Regex reg = new Regex( pattern, RegexOptions.Singleline | RegexOptions.Compiled | RegexOptions.IgnoreCase );
Match mc = reg.Match( input );
string bodyContent = "";
if( mc.Success )
{
bodyContent = mc.Value;
}
return bodyContent;
}
#endregion
#region 判断系统是否装excel
/** <summary>
/// 判断系统是否装excel
/// </summary>
/// <returns></returns>
public static bool IsInstallExcel()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的excel
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallExcelByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Excel" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
#region 判断系统是否装word
/** <summary>
/// 判断系统是否装word
/// </summary>
/// <returns></returns>
public static bool IsInstallWord()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的word
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallWordByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Word" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
}
}

转载地址：http://blog.csdn.net/chenhuizhouhb/article/details/6237690

复制代码

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.Office.Interop.Word;
using System.IO;
using System.Web;
using System.Data;
using System.Reflection;
using Microsoft.Win32;
using System.Text.RegularExpressions;
using System.Net;
namespace OfficeOperate
{
public class WordOperate
{
#region 动态生成Word文档并填充数据
/** <summary>
/// 动态生成Word文档并填充数据
/// </summary>
/// <returns>返回自定义信息</returns>
public static string CreateWordFile()
{
string message = "";
try
{
Object oMissing = System.Reflection.Missing.Value;
string dir = System.Web.HttpContext.Current.Server.MapPath( "" );//首先在类库添加using System.web的引用
if( !Directory.Exists( dir + "//file" ) )
{
Directory.CreateDirectory( dir + "//file" );
//创建文件所在目录
}
string name = DateTime.Now.ToLongDateString() + ".doc";
object filename = dir + "//file//" + name;
//文件保存路径
//创建Word文档
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
/**/添加页眉方法一：
//WordApp.ActiveWindow.View.Type = WdViewType.wdOutlineView;
//WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekPrimaryHeader;
//WordApp.ActiveWindow.ActivePane.Selection.InsertAfter( "无锡全真通科技有限公司" );//页眉内容
//添加页眉方法二：
if( WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdNormalView || WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdOutlineView )
{
WordApp.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdPrintView;
}
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader;
string sHeader = "页眉内容";
WordApp.Selection.HeaderFooter.LinkToPrevious = false;
WordApp.Selection.HeaderFooter.Range.Text = sHeader;
WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument;
//WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;//设置右对齐
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphLeft;//设置左对齐
WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekMainDocument;//跳出页眉设置
WordApp.Selection.ParagraphFormat.LineSpacing = 15f;//设置文档的行间距
//移动焦点并换行
object count = 14;
object WdLine = Microsoft.Office.Interop.Word.WdUnits.wdLine;//换一行;
WordApp.Selection.MoveDown( ref WdLine, ref count, ref oMissing );//移动焦点
WordApp.Selection.TypeParagraph();//插入段落
//文档中创建表格
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables.Add( WordApp.Selection.Range, 12, 3, ref oMissing, ref oMissing );
//设置表格样式
newTable.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleThickThinLargeGap;
newTable.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle;
newTable.Columns[1].Width = 100f;
newTable.Columns[2].Width = 220f;
newTable.Columns[3].Width = 105f;
//填充表格内容
newTable.Cell( 1, 1 ).Range.Text = "产品详细信息表";
newTable.Cell( 1, 1 ).Range.Bold = 2;//设置单元格中字体为粗体
//合并单元格
newTable.Cell( 1, 1 ).Merge( newTable.Cell( 1, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;//垂直居中
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;//水平居中
//填充表格内容
newTable.Cell( 2, 1 ).Range.Text = "产品基本信息";
newTable.Cell( 2, 1 ).Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorDarkBlue;//设置单元格内字体颜色
//合并单元格
newTable.Cell( 2, 1 ).Merge( newTable.Cell( 2, 3 ) );
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;
//填充表格内容
newTable.Cell( 3, 1 ).Range.Text = "品牌名称：";
newTable.Cell( 3, 2 ).Range.Text = "BrandName";
//纵向合并单元格
newTable.Cell( 3, 3 ).Select();//选中一行
object moveUnit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object moveCount = 5;
object moveExtend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;
WordApp.Selection.MoveDown( ref moveUnit, ref moveCount, ref moveExtend );
WordApp.Selection.Cells.Merge();
//插入图片
if( File.Exists( System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" ) ) )
{
string FileName = System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" );//图片所在路径
object LinkToFile = false;
object SaveWithDocument = true;
object Anchor = WordDoc.Application.Selection.Range;
WordDoc.Application.ActiveDocument.InlineShapes.AddPicture( FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor );
WordDoc.Application.ActiveDocument.InlineShapes[1].Width = 100f;//图片宽度
WordDoc.Application.ActiveDocument.InlineShapes[1].Height = 100f;//图片高度
}
//将图片设置为四周环绕型
Microsoft.Office.Interop.Word.Shape s = WordDoc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();
s.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;
newTable.Cell( 12, 1 ).Range.Text = "产品特殊属性";
newTable.Cell( 12, 1 ).Merge( newTable.Cell( 12, 3 ) );
//在表格中增加行
WordDoc.Content.Tables[1].Rows.Add( ref oMissing );
WordDoc.Paragraphs.Last.Range.Text = "文档创建时间：" + DateTime.Now.ToString();//“落款”
WordDoc.Paragraphs.Last.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
//文件保存
WordDoc.SaveAs( ref filename, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
message = name + "文档生成成功";
}
catch
{
message = "文件导出异常！";
}
return message;
}
#endregion
#region 创建并打开一个空的word文档进行编辑
/** <summary>
/// 创建并打开一个空的word文档进行编辑
/// </summary>
public static void OpenNewWordFileToEdit()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 创建word文档
/** <summary>
/// 创建word文档
/// </summary>
/// <returns></returns>
public static string createWord()
{
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Document WordDoc;
string strContent = "";
object strFileName = System.Web.HttpContext.Current.Server.MapPath( "test.doc " );
if( System.IO.File.Exists( (string)strFileName ) )
System.IO.File.Delete( (string)strFileName );
Object oMissing = System.Reflection.Missing.Value;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
#region
将数据库中读取得数据写入到word文件中
strContent = "你好/n/n/r ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
strContent = "这是测试程序 ";
WordDoc.Paragraphs.Last.Range.Text = strContent;
#endregion
//将WordDoc文档对象的内容保存为DOC文档
WordDoc.SaveAs( ref strFileName, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref
oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//关闭WordDoc文档对象
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
//关闭WordApp组件对象
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
string message = strFileName + "/r/n " + "创建成功 ";
return message;
}
#endregion
#region 把Word文档装化为Html文件
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
public static void WordToHtml( string strFileName )
{
string saveFileName = strFileName + DateTime.Now.ToString( "yyyy-MM-dd-HH-mm-ss" ) + ".html";
WordToHtml( strFileName, saveFileName );
}
/** <summary>
/// 把Word文档装化为Html文件
/// </summary>
/// <param name="strFileName">要转换的Word文档</param>
/// <param name="strSaveFileName">要生成的具体的Html页面</param>
public static void WordToHtml( string strFileName, string strSaveFileName )
{
Microsoft.Office.Interop.Word.ApplicationClass WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
Object oMissing = System.Reflection.Missing.Value;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
object fileName = strFileName;
WordDoc = WordApp.Documents.Open( ref fileName,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
Type wordType = WordApp.GetType();
// 打开文件
Type docsType = WordApp.Documents.GetType();
// 转换格式，另存为
Type docType = WordDoc.GetType();
object saveFileName = strSaveFileName;
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod, null, WordDoc, new object[] { saveFileName, Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatHTML } );
#region 其它格式：
/**//**/
/**wdFormatHTML
///wdFormatDocument
///wdFormatDOSText
///wdFormatDOSTextLineBreaks
///wdFormatEncodedText
///wdFormatRTF
///wdFormatTemplate
///wdFormatText
///wdFormatTextLineBreaks
///wdFormatUnicodeText
//-----------------------------------------------------------------------------------
//
docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordDoc, new object[]{saveFileName, Word.WdSaveFormat.wdFormatHTML} );
// 退出 Word
//wordType.InvokeMember( "Quit", System.Reflection.BindingFlags.InvokeMethod,
//
null, WordApp, null );
#endregion
WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region 导入模板
/** <summary>
/// 导入模板
/// </summary>
/// <param name="filePath">模板文档路径</param>
public static void ImportTemplate( string filePath )
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
object fileName = filePath;
WordDoc = WordApp.Documents.Add( ref fileName, ref oMissing, ref oMissing, ref oMissing );
}
#endregion
#region word中添加新表
/** <summary>
/// word中添加新表
/// </summary>
public static void AddTable()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );//3行4列的表
}
#endregion
#region 在表中插入新行
/** <summary>
/// 在表中插入新的1行
/// </summary>
public static void AddRow()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
}
#endregion
#region 分离单元格
/** <summary>
/// 合并单元格
/// </summary>
public static void CombinationCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 2, 1 );//2行1列合并2行2列为一起
cell.Merge( newTable.Cell( 2, 2 ) );
//cell.Merge( newTable.Cell( 1, 3 ) );
}
#endregion
#region 分离单元格
/** <summary>
/// 分离单元格
/// </summary>
public static void SeparateCell()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
object start = 0;
object end = 0;
Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
object beforeRow = newTable.Rows[1];
newTable.Rows.Add( ref beforeRow );
Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 1, 1 );
cell.Merge( newTable.Cell( 1, 2 ) );
object Rownum = 2;
object Columnnum = 2;
cell.Split( ref Rownum, ref
Columnnum );
}
#endregion
#region 通过段落控制插入Insert a paragraph at the beginning of the document.
/** <summary>
/// 通过段落控制插入Insert a paragraph at the beginning of the document.
/// </summary>
public static void Insert()
{
object oMissing = System.Reflection.Missing.Value;
//object oEndOfDoc = "//endofdoc"; /**//* /endofdoc is a predefined bookmark */
//Start Word and create a new document.
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
WordApp.Visible = true;
WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
//Insert a paragraph at the beginning of the document.
Microsoft.Office.Interop.Word.Paragraph oPara1;
oPara1 = WordDoc.Content.Paragraphs.Add( ref oMissing );
oPara1.Range.Text = "Heading 1";
oPara1.Range.Font.Bold = 1;
oPara1.Format.SpaceAfter = 24;
//24 pt spacing after paragraph.
oPara1.Range.InsertParagraphAfter();
}
#endregion
#region word文档设置及获取光标位置
/** <summary>
/// word文档设置及获取光标位置
/// </summary>
public static void WordSet()
{
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application WordApp;
Microsoft.Office.Interop.Word.Document WordDoc;
WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
#region 文档格式设置
WordApp.ActiveDocument.PageSetup.LineNumbering.Active = 0;//行编号
WordApp.ActiveDocument.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientPortrait;//页面方向
WordApp.ActiveDocument.PageSetup.TopMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//上页边距
WordApp.ActiveDocument.PageSetup.BottomMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//下页边距
WordApp.ActiveDocument.PageSetup.LeftMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//左页边距
WordApp.ActiveDocument.PageSetup.RightMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//右页边距
WordApp.ActiveDocument.PageSetup.Gutter = WordApp.CentimetersToPoints( float.Parse( "0" ) );//装订线位置
WordApp.ActiveDocument.PageSetup.HeaderDistance = WordApp.CentimetersToPoints( float.Parse( "1.5" ) );//页眉
WordApp.ActiveDocument.PageSetup.FooterDistance = WordApp.CentimetersToPoints( float.Parse( "1.75" ) );//页脚
WordApp.ActiveDocument.PageSetup.PageWidth = WordApp.CentimetersToPoints( float.Parse( "21" ) );//纸张宽度
WordApp.ActiveDocument.PageSetup.PageHeight = WordApp.CentimetersToPoints( float.Parse( "29.7" ) );//纸张高度
WordApp.ActiveDocument.PageSetup.FirstPageTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.OtherPagesTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//纸张来源
WordApp.ActiveDocument.PageSetup.SectionStart = Microsoft.Office.Interop.Word.WdSectionStart.wdSectionNewPage;//节的起始位置：新建页
WordApp.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = 0;//页眉页脚-奇偶页不同
WordApp.ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = 0;//页眉页脚-首页不同
WordApp.ActiveDocument.PageSetup.VerticalAlignment = Microsoft.Office.Interop.Word.WdVerticalAlignment.wdAlignVerticalTop;//页面垂直对齐方式
WordApp.ActiveDocument.PageSetup.SuppressEndnotes = 0;//不隐藏尾注
WordApp.ActiveDocument.PageSetup.MirrorMargins = 0;//不设置首页的内外边距
WordApp.ActiveDocument.PageSetup.TwoPagesOnOne = false;//不双面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrinting = false;//不设置手动双面正面打印
WordApp.ActiveDocument.PageSetup.BookFoldRevPrinting = false;//不设置手动双面背面打印
WordApp.ActiveDocument.PageSetup.BookFoldPrintingSheets = 1;//打印默认份数
WordApp.ActiveDocument.PageSetup.GutterPos = Microsoft.Office.Interop.Word.WdGutterStyle.wdGutterPosLeft;//装订线位于左侧
WordApp.ActiveDocument.PageSetup.LinesPage = 40;//默认页行数量
WordApp.ActiveDocument.PageSetup.LayoutMode = Microsoft.Office.Interop.Word.WdLayoutMode.wdLayoutModeLineGrid;//版式模式为“只指定行网格”
#endregion
#region 段落格式设定
WordApp.Selection.ParagraphFormat.LeftIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//左缩进
WordApp.Selection.ParagraphFormat.RightIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//右缩进
WordApp.Selection.ParagraphFormat.SpaceBefore = float.Parse( "0" );//段前间距
WordApp.Selection.ParagraphFormat.SpaceBeforeAuto = 0;//
WordApp.Selection.ParagraphFormat.SpaceAfter = float.Parse( "0" );//段后间距
WordApp.Selection.ParagraphFormat.SpaceAfterAuto = 0;//
WordApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle;//单倍行距
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;//段落2端对齐
WordApp.Selection.ParagraphFormat.WidowControl = 0;//孤行控制
WordApp.Selection.ParagraphFormat.KeepWithNext = 0;//与下段同页
WordApp.Selection.ParagraphFormat.KeepTogether = 0;//段中不分页
WordApp.Selection.ParagraphFormat.PageBreakBefore = 0;//段前分页
WordApp.Selection.ParagraphFormat.NoLineNumber = 0;//取消行号
WordApp.Selection.ParagraphFormat.Hyphenation = 1;//取消段字
WordApp.Selection.ParagraphFormat.FirstLineIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//首行缩进
WordApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText;
WordApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse( "0" );
WordApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1;
WordApp.Selection.ParagraphFormat.DisableLineHeightGrid = 0;
WordApp.Selection.ParagraphFormat.FarEastLineBreakControl = 1;
WordApp.Selection.ParagraphFormat.WordWrap = 1;
WordApp.Selection.ParagraphFormat.HangingPunctuation = 1;
WordApp.Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine = 0;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha = 1;
WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit = 1;
WordApp.Selection.ParagraphFormat.BaseLineAlignment = Microsoft.Office.Interop.Word.WdBaselineAlignment.wdBaselineAlignAuto;
#endregion
#region 字体格式设定
WordApp.Selection.Font.NameFarEast = "华文中宋";
WordApp.Selection.Font.NameAscii = "Times New Roman";
WordApp.Selection.Font.NameOther = "Times New Roman";
WordApp.Selection.Font.Name = "宋体";
WordApp.Selection.Font.Size = float.Parse( "14" );
WordApp.Selection.Font.Bold = 0;
WordApp.Selection.Font.Italic = 0;
WordApp.Selection.Font.Underline = Microsoft.Office.Interop.Word.WdUnderline.wdUnderlineNone;
WordApp.Selection.Font.UnderlineColor = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.StrikeThrough = 0;//删除线
WordApp.Selection.Font.DoubleStrikeThrough = 0;//双删除线
WordApp.Selection.Font.Outline = 0;//空心
WordApp.Selection.Font.Emboss = 0;//阳文
WordApp.Selection.Font.Shadow = 0;//阴影
WordApp.Selection.Font.Hidden = 0;//隐藏文字
WordApp.Selection.Font.SmallCaps = 0;//小型大写字母
WordApp.Selection.Font.AllCaps = 0;//全部大写字母
WordApp.Selection.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
WordApp.Selection.Font.Engrave = 0;//阴文
WordApp.Selection.Font.Superscript = 0;//上标
WordApp.Selection.Font.Subscript = 0;//下标
WordApp.Selection.Font.Spacing = float.Parse( "0" );//字符间距
WordApp.Selection.Font.Scaling = 100;//字符缩放
WordApp.Selection.Font.Position = 0;//位置
WordApp.Selection.Font.Kerning = float.Parse( "1" );//字体间距调整
WordApp.Selection.Font.Animation = Microsoft.Office.Interop.Word.WdAnimation.wdAnimationNone;//文字效果
WordApp.Selection.Font.DisableCharacterSpaceGrid = false;
WordApp.Selection.Font.EmphasisMark = Microsoft.Office.Interop.Word.WdEmphasisMark.wdEmphasisMarkNone;
#endregion
#region 获取光标位置
/**/get_Information
WordApp.Selection.get_Information( WdInformation.wdActiveEndPageNumber );
//关于行号-页号-列号-位置
//information 属性
//返回有关指定的所选内容或区域的信息。variant 类型，只读。
//expression.information(type)
//expression 必需。该表达式返回一个 range 或 selection 对象。
//type long 类型，必需。需要返回的信息。可取下列 wdinformation 常量之一：
//wdactiveendadjustedpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾。如果设置了一个起始页码，并对页码进行了手工调整，则返回调整过的页码。
//wdactiveendpagenumber 返回页码，在该页中包含指定的所选内容或区域的活动结尾，页码从文档的开头开始计算而不考虑对页码的任何手工调整。
//wdactiveendsectionnumber 返回节号，在该节中包含了指定的所选内容或区域的活动结尾。
//wdatendofrowmarker 如果指定的所选内容或区域位于表格的行结尾标记处，则本参数返回 true。
//wdcapslock 如果大写字母锁定模式有效，则本参数返回 true。
//wdendofrangecolumnnumber 返回表格列号，在该表格列中包含了指定的所选内容或区域的活动结尾。
//wdendofrangerownumber 返回表格行号，在该表格行包含了指定的所选内容或区域的活动结尾。
//wdfirstcharactercolumnnumber 返回指定的所选内容或区域中第一个字符的位置。如果所选内容或区域是折叠的，则返回所选内容或区域右侧紧接着的字符编号。
//wdfirstcharacterlinenumber 返回所选内容中第一个字符的行号。如果 pagination 属性为 false，或 draft 属性为 true，则返回 - 1。
//wdframeisselected 如果所选内容或区域是一个完整的图文框文本框，则本参数返回 true。
//wdheaderfootertype 返回一个值，该值表明包含了指定的所选内容或区域的页眉或页脚的类型，如下表所示。 值 页眉或页脚的类型
//- 1 无
//0 偶数页页眉
//1 奇数页页眉
//2 偶数页页脚
//3 奇数页页脚
//4 第一个页眉
//5 第一个页脚
//wdhorizontalpositionrelativetopage 返回指定的所选内容或区域的水平位置。该位置是所选内容或区域的左边与页面的左边之间的距离，以磅为单位。如果所选内容或区域不可见，则返回 - 1。
//wdhorizontalpositionrelativetotextboundary 返回指定的所选内容或区域相对于周围最近的正文边界的左边的水平位置，以磅为单位。如果所选内容或区域没有显示在当前屏幕，则本参数返回 - 1。
//wdinclipboard 有关此常量的详细内容，请参阅 microsoft office 98 macintosh 版的语言参考帮助。
//wdincommentpane 如果指定的所选内容或区域位于批注窗格，则返回 true。
//wdinendnote 如果指定的所选内容或区域位于页面视图的尾注区内，或者位于普通视图的尾注窗格中，则本参数返回 true。
//wdinfootnote 如果指定的所选内容或区域位于页面视图的脚注区内，或者位于普通视图的脚注窗格中，则本参数返回 true。
//wdinfootnoteendnotepane 如果指定的所选内容或区域位于页面视图的脚注或尾注区内，或者位于普通视图的脚注或尾注窗格中，则本参数返回 true。详细内容，请参阅前面的 wdinfootnote 和 wdinendnote 的说明。
//wdinheaderfooter 如果指定的所选内容或区域位于页眉或页脚窗格中，或者位于页面视图的页眉或页脚中，则本参数返回 true。
//wdinmasterdocument 如果指定的所选内容或区域位于主控文档中，则本参数返回 true。
//wdinwordmail 返回一个值，该值表明了所选内容或区域的的位置，如下表所示。值 位置
//0 所选内容或区域不在一条电子邮件消息中。
//1 所选内容或区域位于正在发送的电子邮件中。
//2 所选内容或区域位于正在阅读的电子邮件中。
//wdmaximumnumberofcolumns 返回所选内容或区域中任何行的最大表格列数。
//wdmaximumnumberofrows 返回指定的所选内容或区域中表格的最大行数。
//wdnumberofpagesindocument 返回与所选内容或区域相关联的文档的页数。
//wdnumlock 如果 num lock 有效，则本参数返回 true。
//wdovertype 如果改写模式有效，则本参数返回 true。可用 overtype 属性改变改写模式的状态。
//wdreferenceoftype 返回一个值，该值表明所选内容相对于脚注、尾注或批注引用的位置，如下表所示。 值 描述
//— 1 所选内容或区域包含、但不只限定于脚注、尾注或批注引用中。
//0 所选内容或区域不在脚注、尾注或批注引用之前。
//1 所选内容或区域位于脚注引用之前。
//2 所选内容或区域位于尾注引用之前。
//3 所选内容或区域位于批注引用之前。
//wdrevisionmarking 如果修订功能处于活动状态，则本参数返回 true。
//wdselectionmode 返回一个值，该值表明当前的选定模式，如下表所示。 值 选定模式
//0 常规选定
//1 扩展选定
//2 列选定
//wdstartofrangecolumnnumber 返回所选内容或区域的起点所在的表格的列号。
//wdstartofrangerownumber 返回所选内容或区域的起点所在的表格的行号。
//wdverticalpositionrelativetopage 返回所选内容或区域的垂直位置，即所选内容的上边与页面的上边之间的距离，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdverticalpositionrelativetotextboundary 返回所选内容或区域相对于周围最近的正文边界的上边的垂直位置，以磅为单位。如果所选内容或区域没有显示在屏幕上，则本参数返回 - 1。
//wdwithintable 如果所选内容位于一个表格中，则本参数返回 true。
//wdzoompercentage 返回由 percentage 属性设置的当前的放大百分比。
#endregion
#region 光标移动
//移动光标
//光标下移3行 上移3行
object unit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object count = 3;
WordApp.Selection.MoveEnd( ref unit, ref count );
WordApp.Selection.MoveUp( ref unit, ref count, ref oMissing );
//Microsoft.Office.Interop.Word.WdUnits说明
//wdCell
A cell.
//wdCharacter
A character.
//wdCharacterFormatting
Character formatting.
//wdColumn
A column.
//wdItem
The selected item.
//wdLine
A line. //行
//wdParagraph
A paragraph.
//wdParagraphFormatting
Paragraph formatting.
//wdRow
A row.
//wdScreen
The screen dimensions.
//wdSection
A section.
//wdSentence
A sentence.
//wdStory
A story.
//wdTable
A table.
//wdWindow
A window.
//wdWord
A word.
//录制的vb宏
//
,移动光标至当前行首
//
Selection.HomeKey unit:=wdLine
//
'移动光标至当前行尾
//
Selection.EndKey unit:=wdLine
//
'选择从光标至当前行首的内容
//
Selection.HomeKey unit:=wdLine, Extend:=wdExtend
//
'选择从光标至当前行尾的内容
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'选择当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
'移动光标至文档开始
//
Selection.HomeKey unit:=wdStory
//
'移动光标至文档结尾
//
Selection.EndKey unit:=wdStory
//
'选择从光标至文档开始的内容
//
Selection.HomeKey unit:=wdStory, Extend:=wdExtend
//
'选择从光标至文档结尾的内容
//
Selection.EndKey unit:=wdStory, Extend:=wdExtend
//
'选择文档全部内容（从WholeStory可猜出Story应是当前文档的意思）
//
Selection.WholeStory
//
'移动光标至当前段落的开始
//
Selection.MoveUp unit:=wdParagraph
//
'移动光标至当前段落的结尾
//
Selection.MoveDown unit:=wdParagraph
//
'选择从光标至当前段落开始的内容
//
Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
//
'选择从光标至当前段落结尾的内容
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'选择光标所在段落的内容
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
'显示选择区的开始与结束的位置，注意：文档第1个字符的位置是0
//
MsgBox ("第" & Selection.Start & "个字符至第" & Selection.End & "个字符")
//
'删除当前行
//
Selection.HomeKey unit:=wdLine
//
Selection.EndKey unit:=wdLine, Extend:=wdExtend
//
Selection.Delete
//
'删除当前段落
//
Selection.MoveUp unit:=wdParagraph
//
Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
//
Selection.Delete
//表格的光标移动
//光标到当前光标所在表格的地单元格
WordApp.Selection.Tables[1].Cell( 1, 1 ).Select();
//unit对象定义
object unith = Microsoft.Office.Interop.Word.WdUnits.wdRow;//表格行方式
object extend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;/**//**//**extend对光标移动区域进行扩展选择
object unitu = Microsoft.Office.Interop.Word.WdUnits.wdLine;//文档行方式,可以看成表格一行.不过和wdRow有区别
object unitp = Microsoft.Office.Interop.Word.WdUnits.wdParagraph;//段落方式,对于表格可以选择到表格行后的换车符,对于跨行合并的行选择,我能找到的最简单方式
//object count = 1;//光标移动量
#endregion
}
#endregion
#region 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/** <summary>
/// 读取Word表格中某个单元格的数据。其中的参数分别为文件名（包括路径），行号，列号。
/// </summary>
/// <param name="fileName">word文档</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <returns>返回数据</returns>
public static string ReadWord_tableContentByCell( string fileName, int rowIndex, int colIndex )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
string text = table.Cell( rowIndex, colIndex ).Range.Text.ToString();
text = text.Substring( 0, text.Length - 2 );　　//去除尾部的mark
return text;
}
catch( Exception ex )
{
return ex.Message;
}
finally
{
if( doc != null )
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
#endregion
#region 修改word表格中指定单元格的数据
/** <summary>
/// 修改word表格中指定单元格的数据
/// </summary>
/// <param name="fileName">word文档包括路径</param>
/// <param name="rowIndex">行</param>
/// <param name="colIndex">列</param>
/// <param name="content"></param>
/// <returns></returns>
public static bool UpdateWordTableByCell( string fileName, int rowIndex, int colIndex, string content )
{
ApplicationClass cls = null;
Document doc = null;
Table table = null;
object missing = Missing.Value;
object path = fileName;
cls = new ApplicationClass();
try
{
doc = cls.Documents.Open
( ref path, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing );
table = doc.Tables[1];
//doc.Range( ref 0, ref 0 ).InsertParagraphAfter();//插入回车
table.Cell( rowIndex, colIndex ).Range.InsertParagraphAfter();//.Text = content;
return true;
}
catch
{
return false;
}
finally
{
if( doc != null )
{
doc.Close( ref missing, ref missing, ref missing );
cls.Quit( ref missing, ref missing, ref missing );
}
}
}
#endregion
#region 清楚word进程
/** <summary>
/// 清楚word进程
/// </summary>
public static void KillWordProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "WINWORD.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "winword.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 清楚excel进程
/** <summary>
/// 清楚excel进程
/// </summary>
public static void KillExcelProcess()
{
System.Diagnostics.Process[] myPs;
myPs = System.Diagnostics.Process.GetProcesses();
foreach( System.Diagnostics.Process p in myPs )
{
if( p.Id != 0 )
{
string myS = "excel.EXE" + p.ProcessName + "
ID:" + p.Id.ToString();
try
{
if( p.Modules != null )
if( p.Modules.Count > 0 )
{
System.Diagnostics.ProcessModule pm = p.Modules[0];
myS += "/n Modules[0].FileName:" + pm.FileName;
myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
if( pm.ModuleName.ToLower() == "excel.exe" )
p.Kill();
}
}
catch
{ }
finally
{
;
}
}
}
}
#endregion
#region 网页内容或导入word或excel
/** <summary>
/// 网页内容保存或导出为word或excel
/// </summary>
/// <param name="url">网页地址</param>
/// <param name="num">0为导出word,1为导出excel</param>
public static void SaveOrOutData( string url, int num )//导出数据的函数0为word,1为Excel
{
WebRequest req = WebRequest.Create( url );
WebResponse resp = req.GetResponse();
StreamReader sr = new StreamReader( resp.GetResponseStream(), System.Text.Encoding.UTF8 );
string x = sr.ReadToEnd();
System.Web.HttpContext.Current.Response.Clear();
System.Web.HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.GetEncoding( "gb2312" );
string fName = DateTime.Now.ToString( "yyyy-MM-dd-ss" );
if( num == 0 )
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".doc";
System.Web.HttpContext.Current.Response.ContentType = "application/ms-word";
}
else
{
fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".xls";
System.Web.HttpContext.Current.Response.ContentType = "application nd.xls";
}
System.Web.HttpContext.Current.Response.AddHeader( "content-disposition", "attachment;filename=" + fName );
System.Web.HttpContext.Current.Response.Write( getBodyContent( x ) );//获取table标签
System.Web.HttpContext.Current.Response.Flush();
System.Web.HttpContext.Current.Response.End();
}
/** <summary>
/// 获取网页table标签的内容
/// </summary>
/// <param name="input">html代码</param>
/// <returns></returns>
private static string getBodyContent( string input )
{
string pattern = @"<table.*?</table>";
Regex reg = new Regex( pattern, RegexOptions.Singleline | RegexOptions.Compiled | RegexOptions.IgnoreCase );
Match mc = reg.Match( input );
string bodyContent = "";
if( mc.Success )
{
bodyContent = mc.Value;
}
return bodyContent;
}
#endregion
#region 判断系统是否装excel
/** <summary>
/// 判断系统是否装excel
/// </summary>
/// <returns></returns>
public static bool IsInstallExcel()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的excel
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallExcelByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Excel" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
#region 判断系统是否装word
/** <summary>
/// 判断系统是否装word
/// </summary>
/// <returns></returns>
public static bool IsInstallWord()
{
RegistryKey machineKey = Registry.LocalMachine;
if( IsInstallExcelByVersion( "12.0", machineKey ) )
{
return true;
}
if( IsInstallExcelByVersion( "11.0", machineKey ) )
{
return true;
}
return false;
}
/** <summary>
/// 判断系统是否装某版本的word
/// </summary>
/// <param name="strVersion">版本号</param>
/// <param name="machineKey"></param>
/// <returns></returns>
private static bool IsInstallWordByVersion( string strVersion, RegistryKey machineKey )
{
try
{
RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Word" ).OpenSubKey( "InstallRoot" );
if( installKey == null )
{
return false;
}
return true;
}
catch
{
return false;
}
}
#endregion
}
}