1、首先插入一个模块
2、定义Function:Function 拼接( ByVal Target As Range ) As String
3、在Function中编写代码
Dim v_Cell As Range
For Each v_Cell In Target
拼接 = 拼接 & v_Cell
Next
4、在单元格中使用自定义公式就可以了,如:=拼接('A4:C4')
在第一期中,我列出了自己学习VBA的三种主要方式:1、看别人现成的代码
2、以Debug的方式研究Office的对象结构
3、遇到解决不了的问题,上网咨询
其中:1、看别人现成的代码,如果看不懂,可以按F1打开帮助系统查看帮助,或者是上网查询解释
2、以Debug的方式研究,需要我们掌握Debug(即:调试)的方式方法
3、可以比较宽泛的搜索,也可以上ExcelHome等网站进行咨询
准备代码:
这一期,我们以九九乘法表为例,重点讲述如何使用VBA中的代码调试的功能。首先,我们准备好九九乘法表的代码:
我们可以选择调试其中任何一段代码,或者调试双For循环的。
设置断点:
首先解释一下断点。
还是拿出我们讲循环的时候说的例子:我们在上班的时候,循环的检查自己还有没有未完成的工作,并一件件的去完成这些工作。
那断点是什么呢?假如时间停住,就会对我们当前的工作状态有一个快照。我们在这个快照里,可以看到:
1、当前的日期、时间
2、今天的工作清单,包括我们已经完成的,我们正在进行的,我们还未完成的
3、每一项工作的内容是什么(当然在快照里,我们可能更关注当前工作的内容)
4、当前工作完成的进度
5、其他……而对应到VBA程序里,我们可以查看程序中每个变量的