JavaScript操作word文档

最新推荐文章于 2024-04-09 11:37:50 发布

最新推荐文章于 2024-04-09 11:37:50 发布 · 348 阅读

文章标签：

#JavaScript #ViewUI

JavaScript+Ajax+JQuery+Ext 专栏收录该内容

16 篇文章

订阅专栏

本文介绍了一种利用VBA（Visual Basic for Applications）脚本自动化创建Word文档的方法，包括设置页面方向、字体样式、插入标题及副标题，并自动生成包含特定行数和列数的表格。

<script>
var WordApp=new ActiveXObject("Word.Application");

var wdCharacter=1
var wdOrientLandscape = 1
WordApp.Application.Visible=true;
var myDoc=WordApp.Documents.Add();

WordApp.ActiveDocument.PageSetup.Orientation = wdOrientLandscape

WordApp. Selection.ParagraphFormat.Alignment=1 //1居中对齐,0为居右
WordApp. Selection.Font.Bold=true
WordApp. Selection.Font.Size=20

WordApp. Selection.TypeText("我的标题");
WordApp. Selection.MoveRight(wdCharacter);　　　　//光标右移字符
WordApp.Selection.TypeParagraph()　　　　　　　　　//插入段落 相当于br
WordApp. Selection.Font.Size=12 
WordApp. Selection.TypeText("副标题"); //分行插入日期 
WordApp.Selection.TypeParagraph()　　　　　　　　　//插入段落



var myTable=myDoc.Tables.Add (WordApp.Selection.Range, 8,7) //8行7列的表格
var aa = "我的列标题"

for (i= 0;i<7;i++)
{
with (myTable.Cell(1,i+1).Range)
{
font.Size = 12;
InsertAfter(aa);
ColumnWidth =4;
ParagraphFormat.Alignment =1;  //设置对齐方式 水平对齐 
}
}

for (i =0;i<7;i++)
{
for (n =0;n<7 ;n++)
{

with (myTable.Cell(i+2,n+1).Range)
{
font.Size = 12; 
InsertAfter("bbbb");
ParagraphFormat.Alignment =1;  //设置对齐方式 水平对齐

}
}
}
myDoc .saveAs("d:\\gc.doc"); //保存word


</script>