Excel的VBA简单宏编程Excel是一个经典的数据分析工具，包含许多内置函数，但实际上可能更复杂。 另一方面，Excel宏编程提供了自定义函数的功能。 正好有个老师要帮忙分析数据，我学习了。 以下是我的学习笔记。 本人使用的是excel2013。 有出入的地方可以参考。
获取文章目录Excel中VBA简单宏编程1、准备工作2、VBA编程2.1模块声明2.2变量声明和赋值2.3if-else结构2.4循环结构2.5比较运算符2.6注释3、常用功能3.1表数据3.2副本单元格，并获取原单元格列
1、打开准备工作开发工具箱(excel主选项卡默认没有开发工具选项卡) ) )。
文件-选项-自定义功能区- -
此时，主选项卡上有开发工具项目
点击进入vba编辑的visual basic进入
右键单击VBA项目-插入-模块
将显示如下图所示的编辑文件
我可以在这里写vba代码。
2、VBA编程2.1模块声明类似于程序。 模块需要以下主程序的入口：模块宣言
Sub sname ()，结束子
2.2变量宣言和赋值宣言的形式如下。
Dim ‘变量名’as‘变量类型’
例如
Dim i As Integer Dim str As String
赋值形式如下。
i=3
str=“hello world！"
直接等号赋值
数据类型定义符号注释字符串String整数数值Integer-32768~32767长整数数值Long-2147483648~2147483647单精度浮点数值Single精度6倍精度浮点数值Double精度14日期型Date布尔型Boolean变形
公共|私有枚举变量名称
成员1[=常量表达式1]
成员1[=常量表达式1]
最终编号
例如：
公共枚举工作日
星期天
星期一
星期二
星期三
星期四
星期五
星期六
最终编号
2.3if-else结构If Thenemsp； emsp； else ifthenemsp； emsp； Elseemsp； emsp； End If 2.4循环结构Do While emsp； emsp； LoopFor i=0 To 100 Step 1emsp； emsp； Next i跳出for循环，可以使用Exit For
2.5比较运算符名称运算符等于=小于等于=大于等于=字符串匹配Like2.6注释VBA中的单行注释用单引号'表示
3、常用功能3.1获取表格数据，获取第I行第j列单元格数据
sheets(‘表名’).Cells(i ) I，j ).Value获取第I行的数据
Sheets ('表名').Rows(i ) I )获取第j列
Sheets ('表名').Columns(j ) j )检索一个
range(a1:b60 ) ) 3.2元的单元格列宽sheets(name_1).cells (I，k ).copy sheets (name _ result ).cells (I )， k ).pastespecialxlpastecolumnwidths 3.3单元格，行或列颜色sheets(name_1).rows(I ).interior.colorindex=3'sheets ) j ).interior.colorindex=3'sheets ) name_1).cells )，I，colorindex=3'sheets ) )。
3.4获取表中的有效列数和有效行数irows1=sheets(name_1).used range.rows.counticolumns1=sheets ) name_1).used range.columnnn