2022-11-06 11:41来源：m.sf1369.com作者：宇宇
1、启动windows“控制面板中的”添加或删除程序“窗口。
2、在程序列表中选择好”MicrosoftOffice2010"程序，单击“更改”按钮。
3、选择“添加或删除功能”选项，单击“继续”按钮。
4、单击“Office共享功能”前的展开按钮，将其展开。
5、单击”VisualBasicforApplications“项前面的按钮。
6、在弹出的下拉菜单中选择”从本机运行“，单击继续按钮，然后按照提示操作即可成功安装VBA的帮助文件。完成。
操作方法：选中要操作的数据区域，运行宏即可。见示例文件。
答方法如下
第一步：首先进入我速PDF转换器官网(http://www.11pdf.com/)
第二步：下载安装完成后，打开软件，选择【excel vba 强制转换类型】
第三步：点击或者拖拽你想要转换的批量PDF文件或者点击界面下方【添加文件夹】;输出目录可以选择【原文件目录】或者【自定义目录】，最后点击【开始转换】即可完成转换。
以下是EXCELVNAinster函数的详细用法：
Instr函数
一、题目：
要求编写一段代码，运用Instr函数，在一字符串中查找另一字符串并返回结果。
二、代码：
Sub 示例_1_18()
Dim bssString, yczChar, wz
bssString ="ABpAApCDPBBP"
yczChar = "P"
MsgBox "bssString = "" ABpAApCDPBBP """ & Chr(10) & _
"yczChar= ""P"" 时： " & Chr(10) & Chr(10) & _
"InStr(4, bssString, yczChar, 1) 返回值为 " & _
InStr(4, bssString, yczChar, 1)
wz = Instr(1, bssString, yczChar, 0)
wz = Instr(bssString,yczChar) ' 返回 9。
wz = Instr(1, bssString, "W") ' 返回 0。
End Sub
三、代码详解
1、Sub 示例_1_18()：宏程序的开始语句。宏名为示例_1_18。
2、Dim bssString, yczChar, wz ：变量bssString、yczChar和ws声明为可变型变量。
3、bssString ="ABpAApCDXPBBP" ： 把被搜索的字符串赋给变量bssString。
4、yczChar = "P" ： 把要查找的字符P赋给变量yczChar。
5、MsgBox "bssString = "" ABpAApCDPBBP """ & Chr(10) & _
"yczChar= ""P"" 时： " & Chr(10) & Chr(10) & _
"InStr(4, bssString, yczChar, 1) 返回值为 " & _
InStr(4, bssString, yczChar, 1)： 用消息框显示从第四个字符开始，以文本比较的方式找字符P，返回值为 6（小写 p的位置）。小写 p 和大写 P 在文本比较下是一样的，也就是当函数的最后一个参数为1时，查找不分大小写。把要查找的字符P的位置赋给变量yczChar。式中Chr(10)是换行符。
6、wz = Instr(1, bssString, yczChar, 0) ：从第一个字符开始，以二进制比较的方式查找，返回值为 9（大写 P的位置）。小写 p 和大写 P 在二进制比较下是不一样的，也就是当函数的最后一个参数为0时，查找分大小写。把查找到的字符P的位置赋给变量wz。
7、wz = Instr(bssString, yczChar) ：上一句也可写成这样的，因为缺省的比对方式为二进制比较（最后一个参数可省略）。第一个参数省略默认从第一个字符开始查找。返回值为 9。
8、wz = Instr(1,bssString, ”W”) ：在被搜索的字符串中查找字符W，由于没找到返回值为0。
InStr 函数
返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。
InStr([start, ]string1, string2[, compare])
InStr 函数的语法具有下面的参数：
start 可选参数。为数值表达式，设置每次搜索的起点。如果省略，将从第一个字符的位置开始。如果指定了 compare 参数，则一定要有 start 参数。
string1 必要参数。接受搜索的字符串表达式。
string2 必要参数。被搜索的字符串表达式。
Compare可选参数。指定字符串比较。如果省略 compare，Option Compare 的设置将决定比较的类型。
compare 参数设置为：
常数 值 描述
vbUseCompareOption -1 使用Option Compare 语句设置执行一个比较。
vbBinaryCompare 0 执行一个二进制比较。
vbTextCompare 1 执行一个按照原文的比较。
vbDatabaseCompare 2 仅适用于Microsoft Access，执行一个基于数据库中信息的比较。
一、WORD是文字处理软件，EXCEL是电子表格软件。二者各有所长。
WORD也可以对数据进行简单的计算，但EXCEL更擅长存储、计算和分析数据。
EXCEL提供了分类汇总、分列、数据透视表、合并计算、模拟运算等实用工具，并提供了大量函数用于数据处理，还可以根据数据生成图表，以及基于EXCEL平台的VBA等功能，是一款优秀的数据处理软件。
二、数据存储方式不同。
WORD的表格通过插入和绘制的方法产生，表格类似于图形。而EXCEL数据存储于单元格，单元格由行和列交叉而成，单元格的多少是给定的，不是人为画上去的。在单元格中填写数据，单元格就被激活（被使用）。
在EXCEL函数当中，通常使用A1或R1C1的格式对单元格引用。
写代码编程 可以实现。要做从速，又要12点了！发你的文件来
写代码编程 可以实现
方法如下：
1.首先我们打开一个工作样表作为例子。
2.我们使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Sub UsePassword()
Dim wb As Workbook
Set wb = Application.ActiveWorkbook
wb.Password = InputBox("请输入密码:")
wb.Close
End Sub
3.我们首先声明wb为工作薄对象，并将其赋值为对象应用程序为活动工作薄。这里其实是为了简写所以声明一个变量，可以直接使用对象的password方法进行设置。
4.也就是说Application.ActiveWorkbook.password 与wb.password是等价的。我们使用inputbox来输入密码，并运行下一步保存。
5.这里运行代码会弹出输入框，输入的密码是明文显示，我们点击确定后，Excel工作薄关闭。
6.重新打开该工作薄，弹出输入密码对话框，我们需要输入正确的密码才能打开工作薄进行工作。
7.如果需要解除密码，我们在文件-信息中找到保护工作薄选项，然后点击密码保护去掉其中的密码即可解密。
拓展资料
Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。
在1993年，作为Microsoft Office的组件发布了5.0版之后，Excel就开始成为所适用操作平台上的电子制表软件的霸主。
Microsoft Office是一套由微软公司开发的办公软件套装，它可以在Microsoft Windows、Windows Phone、Mac系列、iOS和Android等系统上运行。
与其他办公室应用程序一样，它包括联合的服务器和基于互联网的服务。从2007版的Office被称为“Office System”而不叫“Office Suite”，反映出它们包括服务器的事实。
Office最初是一个推广名称，出现于1990年代早期，指一些以前曾单独发售的软件的合集。当时主要的推广重点是：购买合集比单独购买要省很多钱。最初的Office版本包含Word、Excel和PowerPoint。
直接粘贴
第1种方法：就是直接粘贴；按【Ctrl+V】就可以把excel表格导入word
粘贴为图片
第2种方法：是粘贴为图片；我们只需要单击鼠标右键，分别点击【选择性粘贴】-【图片】，即可把excel表格导入word，因为是图片格式，所以不会显示不完整，但是有一个缺点：就是数据无法编辑。
粘贴为链接
第3种方法：是粘贴为链接；同样是右键选择【粘贴为数值】，紧接着选中【粘贴链接】选项卡，然后单击【表格对象】，结束确认，即可把excel表格导入word；虽然是图片格式，但是当我们双击图片后，会跳转到数据源，也就是Excel表格，表格里所有数据都是可以编辑。但还有一个缺点，就是有点麻烦。
转换为PDF
第4种方法：是转换为PDF；我们分别点击【文件】-【输出为PDF】，弹出【输出为PDF】对话框，点击输出为PDF，即可将Excel转换成PDF；
紧接着，我们打开PDF文件，分别点击【文件】-【导出PDF为】-【Word】，即可将PDF转换成Excel文件；
这时候，我们已经成功把excel表格导入word了，大家可以看到，excel表格即不会显示不完整，而且所有数据，都是可编辑的；
可以每打印一个等待3秒再打印下一个。
或者先把文件名读到excel表，排序，再按顺序打印。
