把html的表格导入到excel,word中
2010-04-27 17:12
337 查看
<script language="javascript">
function tableToWord() {
try
{
var oWD = new ActiveXObject("Word.Application");
var oDC = oWD.Documents.Add("",0,1);
var oRange =oDC.Range(0,1);
var sel = document.body.createTextRange();
sel.moveToElementText(theObjTable);
sel.select();
sel.execCommand("Copy");
oRange.Paste();
oWD.Application.Visible = true;
}
catch(e)
{
alert("您的电脑没有安装Microsoft Word软件!")
return false
}
}
function tableToExcel() {
window.clipboardData.setData("Text",document.all('theObjTable').outerHTML);
try
{
var ExApp = new ActiveXObject("Excel.Application")
var ExWBk = ExApp.workbooks.add()
var ExWSh = ExWBk.worksheets(1)
ExApp.DisplayAlerts = false
ExApp.visible = true
}
catch(e)
{
alert("您的电脑没有安装Microsoft Excel软件!")
return false
}
ExWBk.worksheets(1).Paste;
}
</script>
<table id=theObjTable>
<tr>
<td>a</td>
<td>b</td>
</tr>
</table>
<input type="button" value="导入到excel" onclick="tableToExcel()">
<input type="button" value="导入到word" onclick="tableToWord()">
function tableToWord() {
try
{
var oWD = new ActiveXObject("Word.Application");
var oDC = oWD.Documents.Add("",0,1);
var oRange =oDC.Range(0,1);
var sel = document.body.createTextRange();
sel.moveToElementText(theObjTable);
sel.select();
sel.execCommand("Copy");
oRange.Paste();
oWD.Application.Visible = true;
}
catch(e)
{
alert("您的电脑没有安装Microsoft Word软件!")
return false
}
}
function tableToExcel() {
window.clipboardData.setData("Text",document.all('theObjTable').outerHTML);
try
{
var ExApp = new ActiveXObject("Excel.Application")
var ExWBk = ExApp.workbooks.add()
var ExWSh = ExWBk.worksheets(1)
ExApp.DisplayAlerts = false
ExApp.visible = true
}
catch(e)
{
alert("您的电脑没有安装Microsoft Excel软件!")
return false
}
ExWBk.worksheets(1).Paste;
}
</script>
<table id=theObjTable>
<tr>
<td>a</td>
<td>b</td>
</tr>
</table>
<input type="button" value="导入到excel" onclick="tableToExcel()">
<input type="button" value="导入到word" onclick="tableToWord()">
相关文章推荐
- 把html的表格导入到excel,word中
- excel(word)文件中的表格如何快速转化为html代码
- 如何将word中的表格导入Excel?
- python读取excel导入word表格
- html 导入到word、excel中
- 如何使用免费控件将Word表格中的数据导入到Excel中
- [导入]将数据导出为Excel、Html、Word
- 使用VBA将Excel数据导入到Word的表格中
- word、excel、网页表格代码表导入到MySQL数据库
- 将word中表格批量导入到Excel
- html jsp 页面 表格保存为word,excel的一个简单办法
- 将HTML表格导入到Excel
- 如何将word一段字符串转为html表格再转为excel格式
- HTML网页表格数据导入Excel
- 如何使用免费控件将word表格中的数据导入到excel中
- Html网页导入Word文档和Excel文档
- 将html导入到excel或word
- html保存表格到word,excel.
- 将 Excel 表格导入 Word
- 导出excel表格,导入excel表格