查看: 7399|回复: 1
打印 上一主题 下一主题

C#编程实现动态生成Word文档

[复制链接]
跳转到指定楼层
1#
发表于 2009-9-1 14:00:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
台州网址导航
如何用C#编程实现动态生成Word文档并填充数据的效果呢?要使用C#操作word,首先要添加引用:

    1、添加引用->COM->Microsoft Word 11.0 Object Library

    2、在.cs文件中添加

    using  Word;

    下面的例子中包括C#对Word文档的创建、插入表格、设置样式等操作:

    (例子中代码有些涉及数据信息部分被省略,重要是介绍一些C#操作word文档的方法)

    public   string  CreateWordFile( string  CheckedInfo)

    ... {

    string  message  =   "" ;

    try

    ... {

    Object Nothing  =  System.Reflection.Missing.Value;

    Directory.CreateDirectory( " C:/CNSI " );   // 创建文件所在目录

    string  name  =   " CNSI_ "   +  DateTime.Now.ToShortString() + " .doc " ;

    object  filename  =   " C://CNSI// "   +  name;   // 文件保存路径

    // 创建Word文档

    Word.Application WordApp  =   new  Word.ApplicationClass();

    Word.Document WordDoc  =  WordApp.Documents.Add( ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing);

    // 添加页眉

    WordApp.ActiveWindow.View.Type  =  WdViewType.wdOutlineView;

    WordApp.ActiveWindow.View.SeekView  =  WdSeekView.wdSeekPrimaryHeader;

    WordApp.ActiveWindow.ActivePane.Selection.InsertAfter( " [页眉内容] " );

    WordApp.Selection.ParagraphFormat.Alignment  =  Word.WdParagraphAlignment.wdAlignParagraphRight; // 设置右对齐

    WordApp.ActiveWindow.View.SeekView  =  WdSeekView.wdSeekMainDocument; // 跳出页眉设置

    WordApp.Selection.ParagraphFormat.LineSpacing  =  15f; // 设置文档的行间距

    // 移动焦点并换行

    object  count  =   14 ;

    object  WdLine  =  Word.WdUnits.wdLine; // 换一行;

    WordApp.Selection.MoveDown( ref  WdLine,  ref  count,  ref  Nothing); // 移动焦点

    WordApp.Selection.TypeParagraph(); // 插入段落

    // 文档中创建表格

    Word.Table newTable  =  WordDoc.Tables.Add(WordApp.Selection.Range,  12 ,  3 ,  ref  Nothing,  ref  Nothing);

    // 设置表格样式

    newTable.Borders.OutsideLineStyle  =  Word.WdLineStyle.wdLineStyleThickThinLargeGap;

    newTable.Borders.InsideLineStyle  =  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  =  Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter; // 垂直居中

    WordApp.Selection.ParagraphFormat.Alignment  =  Word.WdParagraphAlignment.wdAlignParagraphCenter; // 水平居中
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 转播转播 分享分享 分享淘帖
台州维博网络(www.tzweb.com)专门运用PHP+MYSQL/ASP.NET+MSSQL技术开发网站门户平台系统等。
2#
 楼主| 发表于 2009-9-1 14:00:46 | 只看该作者
台州网址导航
// 填充表格内容

    newTable.Cell( 2 ,  1 ).Range.Text  =   " 产品基本信息 " ;

    newTable.Cell( 2 ,  1 ).Range.Font.Color  =  Word.WdColor.wdColorDarkBlue; // 设置单元格内字体颜色

    // 合并单元格

    newTable.Cell( 2 ,  1 ).Merge(newTable.Cell( 2 ,  3 ));

    WordApp.Selection.Cells.VerticalAlignment  =  Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;

    // 填充表格内容

    newTable.Cell( 3 ,  1 ).Range.Text  =   " 品牌名称: " ;

    newTable.Cell( 3 ,  2 ).Range.Text  =  BrandName;

    // 纵向合并单元格

    newTable.Cell( 3 ,  3 ).Select(); // 选中一行

    object  moveUnit  =  Word.WdUnits.wdLine;

    object  moveCount  =   5 ;

    object  moveExtend  =  Word.WdMovementType.wdExtend;

    WordApp.Selection.MoveDown( ref  moveUnit,  ref  moveCount,  ref  moveExtend);

    WordApp.Selection.Cells.Merge();

    // 插入图片

    string  FileName  =  Picture; // 图片所在路径

    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; // 图片高度

    // 将图片设置为四周环绕型

    Word.Shape s  =  WordDoc.Application.ActiveDocument.InlineShapes[ 1 ].ConvertToShape();

    s.WrapFormat.Type  =  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  Nothing);

    WordDoc.Paragraphs.Last.Range.Text  =   " 文档创建时间: "   +  DateTime.Now.ToString(); // “落款”

    WordDoc.Paragraphs.Last.Alignment  =  Word.WdParagraphAlignment.wdAlignParagraphRight;

    // 文件保存

    WordDoc.SaveAs( ref  filename,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing,  ref  Nothing);

    WordDoc.Close( ref  Nothing,  ref  Nothing,  ref  Nothing);

    WordApp.Quit( ref  Nothing,  ref  Nothing,  ref  Nothing);

    message = name + " 文档生成成功,以保存到C:CNSI下 " ;

    }

    catch

    ... {

    message  =   " 文件导出异常! " ;

    }

    return  message;

    }
台州维博网络(www.tzweb.com)专门运用PHP+MYSQL/ASP.NET+MSSQL技术开发网站门户平台系统等。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

网站推广
关于我们
  • 台州朗动科技(Tzweb.com)拥有多年开发网站平台系统门户手机客户端等业务的成功经验。主要从事:政企网站,系统平台,微信公众号,各类小程序,手机APP客户端,浙里办微应用,浙政钉微应用、主机域名、虚拟空间、后期维护等服务,满足不同企业公司的需求,是台州地区领先的网络技术服务商!

Hi,扫描关注我

Copyright © 2005-2026 站长论坛 All rights reserved

Powered by 站长论坛 with TZWEB Update Techonolgy Support

快速回复 返回顶部 返回列表