Word,excel开发指南
New Document
dfsdfds | &dsfds | &sdf; | dsf |
dsf | dsfds | fsdfdsfdsf | dsfs |
dsfds | dsf | dsfd | sfds |
sdf | fdsf |
nextpage
dfsdfds | &dsfds | &sdf; | dsf |
dsf | dsfds | fsdfdsfdsf | dsfs |
dsfds | dsf | dsfd | sfds |
sdf | fdsf |
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title> New Document </title>
<meta name="Generator" content="EditPlus">
<meta name="Author" content="">
<meta name="Keywords" content="">
<meta name="Description" content="">
</head>
<script language="javascript">
function outputWord(elementID,HorV,pagekey){
var sel = document.body.createTextRange(); //var sel = object.createTextRange()创建可操作区域,用来在内从中编辑,sel.select()为全选,sel.execCommand("Copy");执行复制命令
var obj = document.getElementById(elementID);//获取网页对象
sel.moveToElementText(obj); //将sel区域选中到obj对象结尾
sel.select();
sel.execCommand("Copy"); //执行复制命令,将内容放入粘贴板
try{
var wordObj = new ActiveXObject("Word.Application"); //创建Word应用程序对象wordObj
}catch(e)
{
alert("无法调用Office对象,请确保您的机器已安装了Office并已将本系统的站点名加入到IE的信任站点列表中!");
return;
}
var word = wordObj.Documents.Add("",0,1);//不打开模版直接加入内容,创建空白Word文档
//var word = wordObj.documents.open("c:\\ba.doc"); //此处为打开已有的模版,打开已存word文档,会把新内容插入文档最前端
if (HorV!="")
{
//横向打印设置部分
word.PageSetup.LineNumbering.Active = false;
word.PageSetup.Orientation. wdOrientLandscape = 1; //设置为横向打印
word.PageSetup.TopMargin = word.Application.CentimetersToPoints(3.17);
word.PageSetup.BottomMargin = word.Application.CentimetersToPoints(3.17);
word.PageSetup.LeftMargin = word.Application.CentimetersToPoints(2.54);
word.PageSetup.RightMargin = word.Application.CentimetersToPoints(2.54);
word.PageSetup.Gutter = word.Application.CentimetersToPoints(0);
word.PageSetup.HeaderDistance = word.Application.CentimetersToPoints(1.5);
word.PageSetup.FooterDistance = word.Application.CentimetersToPoints(1.75);
word.PageSetup.PageWidth = word.Application.CentimetersToPoints(29.7);
word.PageSetup.PageHeight = word.Application.CentimetersToPoints(21);
word.PageSetup.FirstPageTray = 0;
word.PageSetup.OtherPagesTray = 0;
word.PageSetup.SectionStart = 2;
word.PageSetup.OddAndEvenPagesHeaderFooter = false;
word.PageSetup.DifferentFirstPageHeaderFooter = false;
word.PageSetup.VerticalAlignment = 0;
word.PageSetup.SuppressEndnotes = false;
word.PageSetup.MirrorMargins = false;
word.PageSetup.TwoPagesOnOne = false;
word.PageSetup.BookFoldPrinting = false;
word.PageSetup.BookFoldRevPrinting = false;
word.PageSetup.BookFoldPrintingSheets = 1
word.PageSetup.GutterPos = 0;
word.PageSetup.LayoutMode = 2;
}
word.ShowGrammaticalErrors = false; //屏蔽语法检查
word.ShowSpellingErrors = false; //屏蔽拼写错误
//var oRange = word.Range(0,1);//在word中创建连续区域,打开文档的区域,选中0到1的字符
//oRange.Paste(); //粘贴1:将粘贴板内容存入word选中区域中
wordObj.Selection.Paste();//粘贴2:或者直接粘贴到新建的word中 if (pagekey!="")
{
var selection = wordObj.Selection;//得到打开后word的selection对象
//selection.Font.Size = 10; //设置字体大小
selection.WholeStory(); //ctrl+A 全选操作
selection.Find.ClearFormatting(); //清除格式
selection.Find.Text = pagekey; //指定查找关键字
selection.Find.Forward = true; //向下查找
selection.Find.Wrap = 1;//向下查找
selection.Find.MatchCase = false; //不区分大小写
selection.Find.MatchWholeWord = false; //不匹配整个单词 while (selection.Find.Execute()) //如果找到指定字符串返回真,否则返回false
{
selection.InsertBreak(7);//插入分页符,分页符常量为7,具体可查word api
}
} wordObj .Application.Visible = true;
//word .saveAs("c:\\ba.doc"); //存放到指定的位置注意路径一定要是“\\”不然会报错
wordObj.ActiveWindow.ActivePane.View.Type=3;//设置浏览模式:1--为普通视图,2---大纲视图,3--页面视图, 4---web视图预览模式,5---大纲视图,6---web视图,7---阅读板式
wordObj.Application.close;
wordObj=null;
} function outputExcel(elementID){
var sel = document.body.createTextRange();
var obj = document.getElementById(elementID);
sel.moveToElementText(obj);
sel.select();
sel.execCommand("Copy"); try{
var excelObj = new ActiveXObject("Excel.Application"); //创建Word应用程序对象wordObj
}catch(e)
{
alert("无法调用Office对象,请确保您的机器已安装了Office并已将本系统的站点名加入到IE的信任站点列表中!");
return;
}
var excel = excelObj.Workbooks.Add();//新建excel表
var sheet = excel.ActiveSheet;//设置新加表为当前表
sheet.Paste();
sheet.Cells.NumberFormatLocal = "@"; //设置单元格格式
sheet.Columns("A:D").Select;//选中第A列到第D列,如果只选D列为D:D
excelObj.Selection.ColumnWidth = 50;//设置选中列的宽度
sheet.Rows("1:5").Select;//选中第1行到第5行,如果只选2列为2
excelObj.Selection.RowHeight = 50;//设置选中行的高度
excelObj.Visible = true;
sheet = null;
excel = null;
excelObj = null;
}
</script>
<body>
<div id="prints">
<table width="100%" border="1" id="PrintA">
<tr><td>dfsdfds</td><td>&dsfds</td><td>&sdf;</td><td>dsf</td></tr>
<tr><td>dsf</td><td>dsfds</td><td>fsdfdsfdsf</td><td>dsfs</td></tr>
<tr><td>dsfds</td><td>dsf</td><td>dsfd</td><td>sfds</td></tr>
<tr><td> </td><td>sdf</td><td>fdsf</td><td> </td></tr>
</table>
nextpage
<table width="100%" border="1" id="PrintA">
<tr><td>dfsdfds</td><td>&dsfds</td><td>&sdf;</td><td>dsf</td></tr>
<tr><td>dsf</td><td>dsfds</td><td>fsdfdsfdsf</td><td>dsfs</td></tr>
<tr><td>dsfds</td><td>dsf</td><td>dsfd</td><td>sfds</td></tr>
<tr><td> </td><td>sdf</td><td>fdsf</td><td> </td></tr>
</table>
<input type="button" onclick="javascript:outputWord('prints','','');" value="导出页面指定区域内容到Word"></input>
<input type="button" onclick="javascript:outputExcel('prints');" value="导出页面指定区域内容到Excel"></input>
</div>
</body>
</html>
Word,excel开发指南的更多相关文章
- Java解析OFFICE(word,excel,powerpoint)以及PDF的实现方案及开发中的点滴分享
Java解析OFFICE(word,excel,powerpoint)以及PDF的实现方案及开发中的点滴分享 在此,先分享下写此文前的经历与感受,我所有的感觉浓缩到一个字,那就是:"坑&qu ...
- 微信小程序云开发-云存储-下载并打开文件文件(word/excel/ppt/pdf)
一.wxml文件 1.写文本框,用来获取文件链接. 2.按钮,点击下载文件 <!-- 下载文件(word/excel/ppt/pdf等) --> <view class=" ...
- 微信小程序云开发-云存储-上传文件(word/excel/ppt/pdf)到云存储
说明 word/excel/ppt/pdf是从客户端会话选择文件.使用chooseMessageFile中选择文件. 一.wxml文件 上传按钮,绑定chooseFile <!--上传文件(wo ...
- VSTO开发指南(VB2013版) 第一章 Office对象模型
完美地将visual basic和office 办公软件结合起来.来自微软公司VSTO小组的权威专家所编著. 全书共712页,内容极其全面而深入,猛一看,厚地犹如庞然大物.看完离大神就不远了哦< ...
- 浅谈Excel开发:八 Excel 项目的安装部署
前面几篇文章讲解了Excel开发的几个比较主要的也是比较重要的方面,比如菜单系统,Excel对象模型,自定义函数,RTD函数,异步自定义函数,用户自定义任务面板等,在实际开发中我们还会遇到各种“千奇百 ...
- 浅谈Excel开发:七 Excel 自定义任务窗体
前面花了三篇文章讲解了Excel中的UDF函数,RTD函数和异步UDF函数,这些都是Excel开发中的重中之重.本文现在开始接着第二篇文章的菜单系统开始讲解Excel中可供开发的界面元素,本文要讲解的 ...
- 浅谈Excel开发:一 Excel 开发概述
做Office相关的开发工作快一年多了,在这一年多里,在插件的开发中遇到了各种各样的问题和困难,还好同事们都很厉害,在和他们的交流讨论中学到了很多的知识.目前Office相关的开发资料是比较少 ...
- ASP.NET Word/Excel 权限问题
在部署Word/Excel到服务器的时候,经常会碰到权限问题.例如; Retrieving the COM class factory for component with CLSID {0002 ...
- 企业门户(Portal)项目实施方略与开发指南
<企业门户(Portal)项目实施方略与开发指南> 基本信息 作者: 郑文平 丛书名: 企业大型应用集成丛书 出版社:电子工业出版社 ISBN:9787121211843 上架时间: ...
随机推荐
- S型顺序遍历二叉树(c++实现)
//1.s型顺序访问二叉树,默认先左后右:利用两个栈来实现:如果先右后左的话,改变一下入栈的顺序就行 //2.注意s1 s2插入栈的顺序是不同的 void S_LevelOrderPrint(Tree ...
- lucene 4.0 - Facet demo
package com.fox.facet; import java.io.File; import java.io.IOException; import java.util.ArrayList; ...
- python3学习笔记一(标识符、关键字)
查看Python版本 可以命令窗口,windows使用win+R调出cmd运行框,输入以下命令: python -V 进入python的交互编辑模式,也可查看 D:\Python3.6\Scripts ...
- WAP用户评论简单实现瀑布流加载
wap端经常会遇到产品或者评论的加载,但是分页的体验不是很好,所以选择通过js实现瀑布流加载方式. 第一步:需要动态加载的主要内容,这里需要动态加载的是li标签的内容 <ul class=&qu ...
- 我的第一个react native
虽然react native出来了很久,但是自己一直因为各种原因没有接触学习,中间尝试过一次,但是因为复杂的环境配置而放弃了.现在,终于因为公司的项目不得不去学习了,当然了,再配置开发环境上面,我还是 ...
- Scala函数式对象-有理数
有理数类的表示 实现规范:支持有理数的加减乘除,并支持有理数的规范表示 1.定义Rational 首先,考虑用户如何使用这个类,我们已经决定使用“Immutable”方式来使用Rational对象,我 ...
- java学习——异常处理机制
public class ExceptionDemo2 { public static void main(String[] args) { // TODO Auto-generated method ...
- 使用jquery方法的时候,要注意对象是哪个,否则很容易出错
<!DOCTYPE html><html><head><meta charset="utf-8"><title>W3Cs ...
- OPENDATASOURCE
select top 1 * from OPENDATASOURCE( 'SQLOLEDB', 'Data Source=IP地址;User ID=用户名 ...
- Delphi获取本机的MAC地址
Delphi获取本机的MAC地址: uses NB30; function GetAdaPterInfo(lana: Char): string; var Adapter: TAdapterS ...