我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的劳动效率，而且可以提高数据处理的准确度。我推出的VBA系列教程共九套和一部VBA汉英手册，现在已经全部完成，希望大家利用、学习。

如果您只是一般的职场VBA需求，可以打包选择7.1.3.9教程+汉英手册，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的典型案例讲解。这四套教程内容掌握后足以处理一般工作中的问题，实际写代码的时候再辅助代码汉英手册，足矣！如果您想进一步提高，就需要选择高级阶段的教程了。

VBA是面向对象编程的语言，博大精深。很多朋友咨询VBA的学习方法，我会陆续给大家讲解一些我的经验，大家可以慢慢体会。今日的内容是:如何学习VBA_3.2.11:VBA对系统预设的干预

【分享成果，随喜正能量】人生有四苦：一是看不透。看不透人际中纠结，争斗后隐伤，看不透喧嚣中平淡，繁华后的宁静。二是舍不得。舍不得曾经的精彩，不逮的岁月，舍不得居高时的虚荣，得意处的掌声。三是输不起。输不起一段情感之失，输不起一截人生之败。四是放不下。放不下已经走远的人与事，放不下早已尘封的是与非。。

3.2.11 VBA对系统预设的干预

当我们逐渐深入地学习VBA,肯定不会满足于系统的一些预设功能，比如删除文件，系统一般要求用户选中文件后按下DELETE,或者是选中文件后右键；比如另存为文件，一般我们点击文件菜单，选中“另存为”后，输入文件名；再比如当我们按下快捷键后可以实现赋值粘贴的功能，这些都是系统的预设。

这个社会是追求个性的社会，我们可以利用VBA来实现自己条件下干预这种预设，但是要注意，当离开我们自己的条件时务必要恢复系统的预设，再次强调当离开我们自己的条件时务必要恢复系统的预设。

在《VBA代码解决方案》中我们会学习到GetOpenFilename方法，这种方法将显示标准的内置“打开”对话框，用于选择某个文件。

可以学习到时使用GetSaveAsFilename方法，显示标准的内置“另存为”对话框备份文件，这种方法可以获取备份文件的文件名和保存路径。

可以学习到OnKey方法，这种方法是十分重要的，可以有效地屏蔽工作表的复制功能。当我们并不希望用户对工作表中的数据进行复制粘贴操作，不想让人轻易地获得自己的数据时，那我们可以把所有的复制功能都屏蔽掉。

Sub mynz_47_1() '47 如何利用VBA代码，屏蔽EXCEL工作表的复制功能

Set CmdCtrls = Application.CommandBars.FindControls(ID:=19)

For Each Cmd In CmdCtrls

Cmd.Enabled = False

Next

Application.CellDragAndDrop = False

Application.OnKey ("^c"), ""

End Sub

Sub mynz_47_2() '47 如何利用VBA代码，屏蔽EXCEL工作表的复制功能

Set CmdCtrls = Application.CommandBars.FindControls(ID:=19)

For Each Cmd In CmdCtrls

Cmd.Enabled = True

Next

Application.CellDragAndDrop = True

Application.OnKey ("^c")

End Sub

再次强调一下需要大家注意：当离开我们自己的条件时务必要恢复系统的预设。这一点要作为我们写代码的基本功。

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：