位置导航 —毕业论文范文本科论文

格式类有关论文范本,与利用VBA实现大批文格式整理相关专升本毕业论文开题报告

本论文为格式类有关论文查重 免费,关于利用VBA实现大批文格式整理相关专升本毕业论文开题报告,可用于格式论文写作研究的大学硕士与本科毕业论文开题报告范文和优秀学术职称论文参考文献资料下载。免费教你怎么写格式及按钮及文件方面论文范文。

按照传统的方法,我们只能一一打开Word文档,按规定的格式对标题和段落进行格式化处理.这样做显然效率太低.如果使用VBA录制宏,给Word加入多文件处理的相关代码,便可实现对同一目录中的Word文件进行自动整理.本文以Word2010为例.

录制格式替换的宏

1.打开Word程序,按Ctrl+H,调出“查找和替换”对话框,点击“更多”,勾选“使用通配符”;

2.在“查找内容”中输入*(意思为任何内容),点击“格式”,选“样式”,在“查找样式”中选“正文”(图1);

3.在“替换为”中输入^&(意思为查找到的内容),点击“格式”,选“字体”,在此设置新的字号,如5号字(图2);

4.点击“格式”,选“段落”,设置好新的行距,例如1.5倍行距(图3);

5.不要关闭对话框,点击Word主窗口中的“视图”选项卡,点“宏”按钮下的三角形按钮,选“录制宏”,点击“确定”(图4);


这篇论文url http://www.eduxue.com/benkelunwen/060286555.html

6.点击“查找和替换”对话框中的“全部替换”,点击“确定”;

7.点“宏”按钮下的三角形按钮,选“停止录制”.

加入多文件处理

1.点“宏”按钮,选择刚录制的宏(如宏1),点击“编辑”;

2.在第一行“Sub宏1()”后,加入代码如下:

Application.ScreenUpdating等于False

DimmyPasAsString,myPathAsString,iAsInteger,myDocAsDocument

WithApplication.FileDialog(msoFileDialogFolderPicker)

.Title等于"选择目标文件夹"

If.Show等于-1Then

myPath等于.SelectedItems(1)

Else

ExitSub

EndIf

EndWith

myPas等于InputBox("请输入打开****:")

Setfso等于CreateObject("Scripting.FileSystemObject")

SetoFolder等于fso.GetFolder(myPath)


如何写格式硕士学位论文
播放:27472次 评论:6850人

DimoSubFolder,oFile

利用VBA实现大批文格式整理参考属性评定
有关论文范文主题研究: 关于格式的论文范文资料 大学生适用: 学院论文、专科论文
相关参考文献下载数量: 54 写作解决问题: 写作资料
毕业论文开题报告: 论文提纲、论文前言 职称论文适用: 论文发表、职称评副高
所属大学生专业类别: 写作资料 论文题目推荐度: 免费选题

ForEachoFileInoFolder.Files

SetmyDoc等于Documents.Open(FileName:等于oFile.Path,Passworddocument:等于myPas)

3.在最后一行EndSub前加入代码如下:

myDoc.Save

myDoc.Close

SetmyDoc等于Nothing

Next

Application.ScreenUpdating等于True

格式

关于利用VBA实现大批文格式整理的在职毕业论文范文
格式类有关论文范本
整理

按F5键,运行程序,选择Word文件所在文件夹,点击“确定”,若没有打开****,就直接点击“确定”.

(注:使用时,不能打开要整理的文件.)

参考文献:

自考本科如何考研

农学本科毕业论文

本科论文答辩内容

本科毕业论文摘要

本科论文综述

物理本科

电大函授本科

网络自考本科

电力本科论文

自考本科一年考几次

word版本利用VBA实现大批文格式整理全文下载

热门阅读