Excel VBA入门

Excel VBA入门

---

VBA的作用：

• 实现EXCEL没有提供的功能。

• 处理数据时提高工作效率，完成一些批量化，自动化的工作。

VBA学习方法：

• VBA只看是学不会的，必须多思考多动手练习，才能事半功倍，打开您的EXCEL一起来吧！

‍

1.如何打开VBA

打开一个Excel文件，鼠标右键工作表，选择“查看代码”、Alt F11、鼠标点击菜单栏“开发工具”，点击“Visual Basic”,这三种方法都可以打开VBA编辑界面VBE：‍

2.VBE界面

从上到下，从左到右依次为：菜单栏、工具栏、工程资源管理器、代码窗口、属性窗口、立即窗口、本地窗口：

3.VBA常用的程序结构

我们录制一个宏了解一下VBA的程序结构，从录制的宏可以了解到VBA一般程序是：Sub 程序名()开始，End Sub结束。（VBA还有其它程序这里暂不介绍）：‍

4.VBA的对象、属性、方法

a.‍VBA的对象：VBA的对象其实就是我们操作的具体方法、属性的Excel中支持的对象，Excel中的几个常用对象表示方法：

b.VBA属性：VBA属性就是VBA对象所具有的特点， 表示某个对象的属性的方法是：对象.属性=属性值，如下例更改Sheet1的名字：

c.‍VBA的方法：VBA的方法是作用于VBA对象上的动作，如下例新建工作表：

5.常量、变量、数据类型

a.常量：在程序运行中其存储的值不会改变的，声明常量的值需要Const  语句如：

Const 常量名 As 数据类型 = 常量的值

b.变量：在程序运行中其值是可以改变，声明变量可以使用Dim语句如：Dim 变量名     As 数据类型

c.数据类型：

6.程序流程控制多行if 语句

if...elseif...end if 、Select Case...Case...End Case(可以在VBE界面双击函数名F1查看帮助)F5运行以下代码：                

a.多行IF语句：根据当天为星期几来输入相对应的内容，以下代码保存后关闭EXCEL后再打开观察下有什么不同：  

 

b.Select Case情况语句：输入字符判断是字母、数字、其它：

7.VBA常用循环结构

已知处理量及工时，用常用的循环求得每天效率： 

a. For...Next：

Sub test()

Dim i As Integer

For i = 2 To 7

    Cells(i, 4) = Cells(i, 2) / Cells(i, 3)

Next

       End Sub

b. Do While...Loop，While条件成立时开始循环：

Sub test()

Dim i As Integer

i = 2

Do While Cells(i, 1) <> ''        

    Cells(i, 4) = Cells(i, 2) / Cells(i, 3)

    i = i 1

Loop

       End Sub

c. Do Until...Loop，Until条件成立时停止循环：

Sub test()

Dim i As Integer

i = 2

Do Until Cells(i, 1) = ''         

    Cells(i, 4) = Cells(i, 2) / Cells(i, 3)

    i = i 1

Loop

       End Sub

   8.VBA实战

a. 用For循环完成九九乘法表：

b. 一筐鸡蛋：1个1个拿，正好拿完。2个2个拿，还剩1个。3个3个拿，正好拿完。4个4个拿，还剩1个。5个5个拿，还差1个。6个6个拿，还剩3个。7个7个拿，正好拿完。8个8个拿，还剩1个。9个9个拿，正好拿完。问筐里最少有多少鸡蛋？（10000个鸡蛋内），用For循环和IF判断将答案输出到Sheet1的A列：

c. 有1、2、3、4个数字，能组成多少个互不相同且无重复数字的三位数？都是多少？用For循环将答案输出到Sheet1的A列：

d.用For循环在Excel中新建1-12月的Sheet表：

e.打造灵活的超链接Shell函数，下例需自定义打开API函数文件个数（文件在本电脑的D盘）：

.END.





‍




‍