Evaluate

很早以前，就认识了你，只是，不大在意你的存在与意义。

近来常用了你，才知道你确实帮了很多忙。

例如，在引用一些函数时，用VBA来找替代的公式或者函数，非常难，

那直接运用你就行的了。

其实，还是先来看下你的原来面貌吧。

Evaluate 方法

将一个 Microsoft Excel 名称转换为一个对象或者一个值。

expression_r   对于 Application 对象可选，对于 Chart

1. 'GetNum 这个自定义函数，不只用于隐藏、显示和清除三种联系方式，还用于网站及其它
2. http://club.excelhome.net/source/plugin/mc_colorcode/images/jssc_shrink.gifFunction GetNum(Str As Variant, 种类 As Integer) '当这里的种类选择数字1时，保留数字；为2时，保留字母；否则保留汉字
3. http://club.excelhome.net/source/plugin/mc_colorcode/images/jssc_none.gifDim RegEx As Object
4. http://club.excelhome.net/source/plugin/mc_colorcode/images/jssc_none.gifSet Re

要想一下子就替换掉很多个WORD文档中的内容，我们得使用VBA的办法才能实现，下面是方法，请过目。

　　一、前期准备

　　下面是具体操作步骤。

　　Ａ，首先将需要批量替换的多个Word文档放在同一文件夹下面。

　　Ｂ，新建一空白Word文档，右击空白工具栏，单击“控件工具箱”，就可以看到屏幕上调出的控件工具箱。

　　Ｃ，在控件工具箱上单击“命令按钮”，文档中就放置了一个按钮了。

　　Ｄ，双击该按钮，进入VB代码编写模式，将以下代码复制进去。

　　二、命令按钮的代码

　　Private Sub CommandButton1_Click()
　　Application.ScreenUpdating = False
　　Dim myPas As String, myPath As String, i As Integer, myDoc As Document
　　With Application.FileDialog(msoFileDialogFolderPicker)
　　    .Title = '选择目标文件夹'
　　    If .Show = -1 Then
 　　     myPath = .SelectedItems(1)
　　    Else
 　　     Exit Sub
　　&

①正则表达式的概述

　　正则表达式原本是形式语言理论中的概念，与编译器的构造有密切的联系。但是作为一个应用软件的用户，我们没有必要去细究正则表达式的严格定义和处理方法。本文将从实用的角度出发，阐述引入正则表达式的目的、正则表达式的命令格式，以及如何利用正则表达式完成一些实际的文本处理工作。

　　我们在处理文本时，经常会遇到一些具有某种特定格式，或者说满足某种规则的文本。比如，一个无符号的整数由一连串的数字构成，而一个Email地址的格式则是“用户名@主机名”，其中用户名是一串字母或数字，主机名则是由若干个由“.”分隔的字母数字串。正则表达式就是用来指定这种规则的。如果某个字符串满足正则表达式指定的规则，则称该字符串为正则表达式的一个“匹配串”。

　　②正则表达式的构成

　　为了方便理解，让我们先来看看大家比较熟悉的数学表达式，“(x+3)*2+y”是一个典型的数学表达式。一个数学表达式由若干个“项”组成，“项”与“项”之间用加号或减号相连；这里“(x+3)*2”和“y”分别是两个项。每个项又由若干个“因子”组成，因子之间用乘号或除号相连；这里第一个项有两个因子“(x+3)”

如果需要在工作表中添加图形对象，可以使用AddShape方法，如下面的代码所示。

1. 

FileSystemObject对象位于File System对象模型的最高层，并且是该层次中惟一可以在外部创建的对象，也就是说它是惟一能使用New关键字的对象。
FileSystemObject对象有许多用来操作文件系统的方法和属性。下面先看一个例子，如下面的代码：

Volatile 方法

用于将用户自定义函数标记为易失性函数，无论何时在工作表的任意单元格中进行计算时，易失性函数都必须重新进行计算。非易失性函数只在输入变量改变时才重新计算，若不用于计算工作表单元格的用户自定义函数中，则此方法无效。

expression_r   必需。该表达式返回一个 Application 对象。

Volatile  

在模块第一行：
public myArr as string
就行了，这样myArr就是全局变量！

模块里用 public  声明就可以吧.