VBA入门基础

是不用IDEA的office中有内置，开发工具打开方式

1. 开发工具打开方式：在Excel界面使用快捷键Alt+F11
2. office2010版本以上：点击文件–选项–自定义功能区–自定义功能区–勾选开发工具–确定
   

二、 VBA编写代码

1. 打开VBA编辑器：开发工具 > Visual Basic
   

2. 编写第一个代码
   

   Sub 第一次编写()
   	ThisWorkbook.Sheets(1).Cells(1, 1) = "这是第一次编写代码"
   End Sub
   

3. 代码讲解

   Sub：宏过程，代表他是一个宏过程，要有开始和结尾
   第一次编写()：宏过程调用名，可以随意编写，但要记得是啥
   ThisWorkbook.Sheets(1).Cells(1, 1) = "这是第一次编写代码"：宏过程内容，被Sub··· End Sub包围，被第一次编写引用
   
   ThisWorkbook：当前工作簿
   Sheets(下标)：下面的Sheets下标
   Cells（坐标）：工作簿中的内容
   

4. 引用宏过程
   

三、 VBA案例

Sub 分拆工作表()  '开始宏工程命名为分拆工作表'

    Dim sh As Worksheet  '定义名为sh的工作表'

    Dim MyBook As Workbook '定义名为MyBook的工作簿'

    Set MyBook = ActiveWorkbook  '设置MyBook为当前工作簿'

    For Each sh In MyBook.Sheets '循环MyBook的工作簿中的工作表并装载到变量（sh）'
        '循环第一次也就是第一个工作表sheet，下一个就是第二个工作表sheet，有多少个执行多少次'

        sh.Copy  '复制工作表到工作簿'

        ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sh.Name, FileFormat:=xlNormal '将工作簿另存为EXCEL默认格式

        ActiveWorkbook.Close '关闭保存的工作簿'

        Next '循环下一个工作表sheet'

    MsgBox "文件已经被分拆完毕!"   '执行完成弹出消息窗口'

End Sub '结束宏工程'