批量更改多个word文件中的数据? 10
我有6000多个word文件。每个word表格中有日期:xxxx,数量:xxxx等,如何快速把这些数据全部改为0000?谢谢高手指点。...
我有6000多个word文件。每个word表格中有 日期:xxxx,数量:xxxx 等,如何快速把这些数据全部改为0000?谢谢高手指点。
展开
5个回答
展开全部
用宏命令可以解决,大概的步骤如下:
(1)先打开一个文档,单击“工具”→“宏”→“录制新宏”命令,出现宏的对话框,单击“确定”按钮。
(2)单击“文件”→“打开”,选择要修改数据的文件,将其打开。
(3)单击“编辑”→ “替换”命令,在查找替换框中将所有的日期、数量替换为0000。
(4)然后单击“文件”→“另存为”命令,将文件另存到另外一个文件夹中,最后关闭文件。
(5)单击“工具”→“宏”→“停止录制”命令,完成上述步骤
(6)对新录制的宏命令进行一定的修改,使它能对多个文件进行批量修改和保存。方法是:
单击“工具”→“宏”→“宏”命令,选择刚才录制的宏的名称,单击“编辑”按钮。打开Visual Basic编辑器,对宏进行一些修改。主要的修改地方有以下几个方面:
① 将刚才录制的宏的文件打开路径修改为你的文件夹的路径,例如“E:\123\old”,修改替换数据后的文件保存的路径,如“E:\123\new”
② 给宏命令添加一个for循环,例如,for i=6300,6300是你的文件数量,这是告诉宏修改6300个文件就结束
③ 其他的地方酌情修改,例如是否忽略报错,是否忽略数字的格式等
(7)最后一步就是在Visual Baisic编辑器中按F5键执行宏,六千多个文件一会儿就可以修改完毕。
注意,这样的操作需要懂一些简单的VB中有关逻辑循环执行的知识,如果逻辑循环修改正确的话,你只要按一次F5键执行就可以了。。。不然的话就要将六千多个文件逐个打开,逐个执行这样的宏命令操作,相当于按六千多次的F5
(1)先打开一个文档,单击“工具”→“宏”→“录制新宏”命令,出现宏的对话框,单击“确定”按钮。
(2)单击“文件”→“打开”,选择要修改数据的文件,将其打开。
(3)单击“编辑”→ “替换”命令,在查找替换框中将所有的日期、数量替换为0000。
(4)然后单击“文件”→“另存为”命令,将文件另存到另外一个文件夹中,最后关闭文件。
(5)单击“工具”→“宏”→“停止录制”命令,完成上述步骤
(6)对新录制的宏命令进行一定的修改,使它能对多个文件进行批量修改和保存。方法是:
单击“工具”→“宏”→“宏”命令,选择刚才录制的宏的名称,单击“编辑”按钮。打开Visual Basic编辑器,对宏进行一些修改。主要的修改地方有以下几个方面:
① 将刚才录制的宏的文件打开路径修改为你的文件夹的路径,例如“E:\123\old”,修改替换数据后的文件保存的路径,如“E:\123\new”
② 给宏命令添加一个for循环,例如,for i=6300,6300是你的文件数量,这是告诉宏修改6300个文件就结束
③ 其他的地方酌情修改,例如是否忽略报错,是否忽略数字的格式等
(7)最后一步就是在Visual Baisic编辑器中按F5键执行宏,六千多个文件一会儿就可以修改完毕。
注意,这样的操作需要懂一些简单的VB中有关逻辑循环执行的知识,如果逻辑循环修改正确的话,你只要按一次F5键执行就可以了。。。不然的话就要将六千多个文件逐个打开,逐个执行这样的宏命令操作,相当于按六千多次的F5
追问
我的每个文件的名称都不一样,怎样修改参数呢?
追答
你参考一下用宏命令批量修改文件格式的代码。。。它是指定搜索一个文件夹,用变量代表文件的名称,相当于直接穷举这个文件夹内的所有文件,只要文件是在这个文件夹内就会自动打开。例如,网络上列举的一个用宏命令批量更改word文档类型的代码,识别文件部分是这样写的:
Dim name As String '意思是给文件名定义一个变量,这个变量名为name,所有的文件都可以是这个名字
name = "01" 文件从第一个开始
ChangeFileOpenDirectory "E:\VB_SOUCE\lib\" 打开E盘这个路径下的文件
For i = 1 To 2124 '这个文件夹里面的文件数是2124
………………
宏命令执行的时候,会自动选择的,所以不用考虑文件名的问题
展开全部
用程序打开并遍历Word文档中的Table对象,然后重置对应的单元格的值。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
试试 文件批量处理百宝箱V8.0 主界面中的批替换功能,选择doc类型,将6千多文件通过自动读取或添加等方式加载入文件列表中,然后单击批替换设置,在新的窗体中,勾选使用通配符,然后在查找框中输入:(日期:)(*,),替换为框中输入:\1 0000,单击新增入列表;然后在查找框中输入:(数量:)(*,),替换为框中输入:\1 0000,单击新增入列表。最后单击执行即可。 注意:作用范围为全文,不是只替换表格中的对应内容哟。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
word文档批量处理大师软件是这方面的专业软件,功能很多,超强,推荐!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
请程序员做个程序,,,,,,当然,如果你能找到某个软件就不需要了,,,,一般来说都会找的到,,,你去百度搜比如 批量替换软件 ,,,注意病毒哦
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询