如何用excel为多个word文件建立索引目录
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了如何用excel为多个word文件建立索引目录相关的知识,希望对你有一定的参考价值。
1、新建Excel工作簿,在工作表中依次输入文件夹内的Word文件名。
2、打开文件夹,按下shift键右键单击文件,找到复制为路径命令,并单击。
3、依次复制文件的路径到Excel工作簿内,和相应的文件名相对应。
4、在C列使用HYPERLINK函数创建链接,公式为:=HYPERLINK(B2,"打开"&A2)
5、公式解析:HYPERLINK函数是用来创建超链接的函数,第一参数是打开文件的路径,第二个参数的意思是超链接显示的名称。经过如此设置,就能为多个Word文件创建索引目录,即使不在同一个文件夹也适用于这个方法。
6、使用这个方法也是有效的提高效率,对文件的归纳整理很有帮助。
参考技术A 请在EXCEL表中建立多个word文件的目录,逐一选择文件目录的单元格,按CTRL+K作超连接,指定该单元格对应连接的WORD文件即可。本回答被提问者和网友采纳如何用java生成word
用APPACHE的POI生成word文档.怎么做啊!
如果电脑里装的有WORD,可以通过JS新建一个WORD,并把页面文件拷贝进去。我这有操作Excel的,word的差不多。
<input type="button" onclick="javascript:method1('tableExcel');" value="导入到EXCEL">
<SCRIPT LANGUAGE="javascript">
function method1(tableid) //整个表格拷贝到EXCEL中
var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//创建AX对象excel
var oWB = oXL.Workbooks.Add();
//获取workbook对象
var oSheet = oWB.ActiveSheet;
//激活当前sheet
var sel = document.body.createTextRange();
sel.moveToElementText(curTbl);
//把表格中的内容移到TextRange中
sel.select();
//全选TextRange中内容
sel.execCommand("Copy");
//复制TextRange中内容
oSheet.Paste();
//粘贴到活动的EXCEL中
oXL.Visible = true;
//设置excel可见属性
function method2(tableid) //读取表格中每个单元到EXCEL中
var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//创建AX对象excel
var oWB = oXL.Workbooks.Add();
//获取workbook对象
var oSheet = oWB.ActiveSheet;
//激活当前sheet
var Lenr = curTbl.rows.length;
//取得表格行数
for (i = 0; i < Lenr; i++)
var Lenc = curTbl.rows(i).cells.length;
//取得每行的列数
for (j = 0; j < Lenc; j++)
oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText;
//赋值
oXL.Visible = true;
//设置excel可见属性
function getXlsFromTbl(inTblId, inWindow)
try
var allStr = "";
var curStr = "";
//alert("getXlsFromTbl");
if (inTblId != null && inTblId != "" && inTblId != "null")
curStr = getTblData(inTblId, inWindow);
if (curStr != null)
allStr += curStr;
else
alert("你要导出的表不存在!");
return;
var fileName = getExcelFileName();
doFileExport(fileName, allStr);
catch(e)
alert("导出发生异常:" + e.name + "->" + e.description + "!");
function getTblData(inTbl, inWindow)
var rows = 0;
//alert("getTblData is " + inWindow);
var tblDocument = document;
if (!!inWindow && inWindow != "")
if (!document.all(inWindow))
return null;
else
tblDocument = eval(inWindow).document;
var curTbl = tblDocument.getElementById(inTbl);
var outStr = "";
if (curTbl != null)
for (var j = 0; j < curTbl.rows.length; j++)
//alert("j is " + j);
for (var i = 0; i < curTbl.rows[j].cells.length; i++)
//alert("i is " + i);
if (i == 0 && rows > 0)
outStr += " \t";
rows -= 1;
outStr += curTbl.rows[j].cells[i].innerText + "\t";
if (curTbl.rows[j].cells[i].colSpan > 1)
for (var k = 0; k < curTbl.rows[j].cells[i].colSpan - 1; k++)
outStr += " \t";
if (i == 0)
if (rows == 0 && curTbl.rows[j].cells[i].rowSpan > 1)
rows = curTbl.rows[j].cells[i].rowSpan - 1;
outStr += "\r\n";
else
outStr = null;
alert(inTbl + "不存在!");
return outStr;
function getExcelFileName()
var d = new Date();
var curYear = d.getYear();
var curMonth = "" + (d.getMonth() + 1);
var curDate = "" + d.getDate();
var curHour = "" + d.getHours();
var curMinute = "" + d.getMinutes();
var curSecond = "" + d.getSeconds();
if (curMonth.length == 1)
curMonth = "0" + curMonth;
if (curDate.length == 1)
curDate = "0" + curDate;
if (curHour.length == 1)
curHour = "0" + curHour;
if (curMinute.length == 1)
curMinute = "0" + curMinute;
if (curSecond.length == 1)
curSecond = "0" + curSecond;
var fileName = "leo_zhang" + "_" + curYear + curMonth + curDate + "_" + curHour + curMinute + curSecond + ".csv";
//alert(fileName);
return fileName;
function doFileExport(inName, inStr)
var xlsWin = null;
if (!!document.all("glbHideFrm"))
xlsWin = glbHideFrm;
else
var width = 6;
var height = 4;
var openPara = "left=" + (window.screen.width / 2 - width / 2)
+ ",top=" + (window.screen.height / 2 - height / 2)
+ ",scrollbars=no,width=" + width + ",height=" + height;
xlsWin = window.open("", "_blank", openPara);
xlsWin.document.write(inStr);
xlsWin.document.close();
xlsWin.document.execCommand('Saveas', true, inName);
xlsWin.close();
</SCRIPT> 参考技术A jacob,相关资料你可以去查找看看
以上是关于如何用excel为多个word文件建立索引目录的主要内容,如果未能解决你的问题,请参考以下文章
求问高手如何用Excel做一个文件夹的目录索引,需要能实时更新的?谢谢了