VBA是操控OFFICE各应用程序（Word、Excel、PPT等）的一门语言，WPS Office办公软件套装和Microsoft Office办公软件套装均支持VBA语言的运行。适用于完成重复的、有规律的、工作量较大的任务，我们可以把快捷键、鼠标点按拖拽、函数等操作称为常规操作，VBA是当之无愧的另类操作，它通过代码可以实现所有的常规操作。用常规操作就可以轻松完成的工作任务,是没必要使用VBA的。VBA适合完成常规操作实现起来费时、费力的工作，是用来提高工作效率的。建议使用Office办公软件感觉有些累的小伙伴都来接触一下VBA，掌握有一定的VBA基础知识的时候，可以大量搜集整理可以实现各种功能的代码，实现能够看懂代码，并对其进行优化调整，积累自己的功能代码库，在实际工作需要时，即时调用，这时候肯定会觉得VBA真香。下面我们就一起来用VBA实现一个常规操作：
A1：C5单元区域输入“8888”
一、启动VBA编辑器（VBE ）
1、快捷键：Alt+F11
2、通过开发工具——VB编辑器
二、写入VBA代码
1、插入——模块——写入代码 插入（或双击）模块后，右侧的空白位置就是编写代码的地方。
2、写入代码
Sub 输入数字()
Range("A1:C5") = "8888"
End Sub
Range("A1:C5") = "8888" 表示单元格区域A1到C5的值等于8888 Range("A1:C5")表示单元格区域，也可以表示某一个单元格，如： Range("A1") ，等于后面的值为数字时可以不加引号，若是字符需加英语标点符号" "。
三、测试运行
直接点击“运行”按钮或按快捷键F5
四、工作簿中的所有工作表批量导出单独的文件
Sub 工作表批量导出为工作簿() Application.ScreenUpdating = False '屏幕不更新 Dim i As Integer '定义i的数据类型为整型（整数） Dim j As Integer '定义j的数据类型为整型（整数） Dim str As String '定义str的数据类型为字符型（文本） j = Worksheets.Count 'j=工作簿中工作表的总数 For i = j To 1 Step -1 Worksheets(i).Copy '复制工作表 str = ActiveWorkbook.Sheets(1).Name '定义工作簿名称为当前工作表名称 ActiveWorkbook.SaveAs Filename:="D:\AA\" & str & ".xlsx" '导出到指定路径，可以修改，必须是当前存在的路径，str为文件名 ActiveWorkbook.Close savechanges:=True '保存并关闭工作簿， Next Application.ScreenUpdating = True '允许屏幕更新End Sub
'后面的文字为注释，复制到编辑器中可以直接使用。
今天就写到这里吧，有人喜欢的话，我将继续努力写一版完整的简单易上手的VBA教程。