zoukankan
html css js c++ java
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;
//
水平居中
//
填充表格内容
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;
}
查看全文
相关阅读:
MySql(六)单表查询
MySql(五)
MySql(四)
MySql(三)
MySql(二)
2016高管必看的五大互联网营销方法
昨日股市暴跌熔断 赵薇亏3.3亿赔惨了(如何预测今年股市走向)
何炅加入阿里音乐预示“互联网+”三大发展走向
《老炮儿》的江湖道义就是互联网创业的规矩?
世界互联网大会三大看点 传递什么信号?
原文地址:https://www.cnblogs.com/lingxzg/p/867209.html
最新文章
ubuntu20.04虚拟机中使用vmware中设置的共享文件夹
mysql8.0.21在ubuntu20.04下的配置问题
STM32单片机开发Clion环境配置(windowslinux)
用Excel排值班表用到的几个公式
kali2020更换中科大的更新源
FreeRTOS
链式队列
顺序队列
队列
链栈的基本操作
热门文章
栈的基本操作
栈
循环链表
双向链表的基本操作
双向链表
Django框架(一)
MySql习题和答案
MySql(九)索引
MySql(八)
MySql(七)多表查询
Copyright © 2011-2022 走看看