如果您只是一样平常的职场VBA需求，可以打包选择7.1.3.9教程+汉英手册，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的范例案例讲解。这四套教程内容节制后足以处理一样平常事情中的问题，实际写代码的时候再赞助代码汉英手册，足矣！
如果您想进一步提高，就须要选择高等阶段的教程了。
VBA是面向工具编程的措辞，博大精湛。很多朋友咨询VBA的学习方法，我会陆续给大家讲解一些我的履历，大家可以逐步体会。今日的内容是:如何学习VBA_3.3.1：VBA代码程序运行韶光的优化与视觉效果的兼顾
【分享成果，随喜正能量】一个人的气质，并不在容颜和身材，而是所经历过的往事，是内在留下的印迹，令人深奥深厚而安谧。以是，优雅是一种阅历的凝聚；淡然是一段人生的沉淀。韶光会让一颗灵魂，变得越来越动人。掌握自己的脾气，做一个有教化的人。。
在学习过程中，我们要同时思考几个问题，这也是我们学习过程中的提高。
3.3.1 VBA代码程序运行韶光的优化与视觉效果的兼顾在《VBA代码办理方案》第二册的85讲到89讲，我讲了程序优化的问题，其实在这些章节中，我也一贯在讲视觉和程序运行韶光的兼顾问题。我在做程序的时候，每每看重的是前者，而不是后者，为什么呢？实在VBA带给我们的便是实用，真正哀求做到节约韶光每每是那些大型程序考虑的范畴。正如我在讲到VBA地位时的比喻，那些大型程序是城市与城市之间的高铁啊、火车啊、飞机啊，而VBA只是连接车站到家之间的汽车、电动车，当你考虑大型数据处理时最好要借助大型程序，如Python、PHP、GO、JAVA等等，从严格意义上讲，VBA不能称之为一种独立的措辞体系，只是寄生于OFFICE的一条寄生虫，但你不要鄙视它，这部分交通运行不顺畅，也会引起城市的拥堵，事情效率的低下。以是，我们在事情中紧张考虑的是视觉的效果，其次才是韶光的节约。如何做到视觉的愉悦呢？下面我就来就一段实际的程序和大家分享。本日的程序读者也可以作为一个工具利用。
需求：建立一个事情薄1，写入代码，代码实行首先打开其余一个指定事情薄2，把个中事情表sheet1中A,B列的内容写入数组，然后关闭事情薄2，回到事情薄1，把数组数据保存到事情表1的CD列中。
这个案例在实际事情中会常常用到，或者类似的运用非常多，大家可以记住下面的代码。
要利用到的知识点：
1 事情薄的打开；
2 数据写入数组；
3 数组数据的导出。
本日我利用到了《方案》第三册第113讲的内容，将一个事情薄中事情表的数据写入数组，然后导出，看下面的代码截图：
代码：
Sub mynzkk()
Dim a(5000, 2)
Workbooks.Open Filename:=ThisWorkbook.Path & "\事情表.xlsx" '打开一个指定存储数据的事情薄
Workbooks("事情表.xlsx").Activate '让数据的事情表处在激活状态
MsgBox ("数据已经打开，是否连续？") '判断是否连续
Sheets("SHEET1").Select
k = 0
i = 1
'数组，并赋值
Do While Cells(i, 1) <> ""
k = k + 1
Cells(i, 1).Select
a(k, 1) = Cells(i, 1) '写入数组
a(k, 2) = Cells(i, 2)
i = i + 1
Loop
Workbooks("事情表.xlsx").Close '关闭数据事情薄
Workbooks("事情簿1.xlsm").Activate '让主程序的事情薄处在激活状态
Sheets("SHEET1").Select
[C1:D65536].Clear '打消原有数据
MsgBox ("下面将写入数据，请确认！
")
For i = 1 To k
Cells(i, 3).Select
Cells(i, 3) = a(i, 1)
Cells(i, 4) = a(i, 2)
Next
MsgBox ("OK!")
End Sub
代码讲解：上述代码中，为了照顾到视觉，我加了四条语句如下所示：
目的：
1 让程序的运行可视，操作者可以随时知道程序运行到了哪里。
2 让运用这个程序的人有个主动的觉得，彷佛是自己在操控着程序的运行。这也是从生理上来媚谄程序的利用者。实在不加这些都是可以的。
程序文件：
韶光与视觉.xlsm我20多年的VBA实践履历，全部浓缩不才面的各个教程中：
