'VBA对象'注意：测试中，如果有多对 sub... ... end sub，想要测试那对 sub 内的代码，只需要将光标选中在那里就可以执行代码了。
'VBA中的对象其实就是我们操作的
具有方法（你可理解为一种行为，即目标具有的一些行为，如创建，删除，修改等）、
属性（即目标身上的一些个特征，如名字，长宽，颜色等）的
excel中支持的
对象
'Excel中的几个常用对象表示方法
'1、工作簿
' Workbooks 代表工作簿集合（有点儿英文基础的都知道加了 S 的表示复数有多个的意思，在这里表是一个集合），所有的工作簿,
Workbooks(N)，表示已打开的第N个工作簿 （这里的 N 就是一个序号，表示第几个工作薄）
' Workbooks ('工作簿名称')，能以序号来确定一个工作薄，更能以一个工作薄的名称到确定的了。
' ActiveWorkbook 正在操作的工作簿，或着理解为激活的 或 活动着工作薄
' ThisWorkBook '代码所在的工作簿，注意：是代码所在的工作薄
'2、工作表
' 'Sheets('工作表名称')，看了上面的，难道你还不懂这个，不要认人小看了你
'Sheet1 表示第一个插入的工作表,Sheet2表示第二个插入的工作表....
'Sheets(n) 表示按排列顺序，第n个工作表
'ActiveSheet 表示活动工作表，光标所在工作表
'worksheet 也表示工作表，但不包括图表工作表、宏工作表等。
'3、单元格
'cells 所有单元格，如果有一天，你写一个脚本是：cells.value='OK', 那你这一张表所有的 65535 行 256 列 都会被填充为 “OK” 字符，当然不包括两边的双引号，但是，写代码时却是要有的。
'Range ('单元格地址') ，如 Range('a1') 就表示 A1 这个单元格
'Cells(行数,列数)，这里同样是表示一个单元格，方法不一样而矣，Cells(1,1) 也表示 A1 单元格，里面的数字就是让你数数算出来的。
'Activecell 正在选中或编辑的单元格，活动的或已经被选中的单元格，你懂的吧，不懂你可以问。
'Selection 正被选中或选取的单元格或单元格区域，这个跟上面那个类似，但多少会有些差异，它表示 已经被选择的区域.... ....而上面的是一个单元格被选中被激活
=============================================
'一、VBA属性
'VBA属性就是VBA对象所具有的特点或特征
'表示某个对象的属性的方式是
'对象.属性=属性值
不要忘了 对象 和 属性 之间的那个 点哦
还有一个你必须死记的知识点：那个 '=' 不是等于的意思，是 ”被赋值 或 被修改 或 被填充“ 的意思。只需要记这一个，其它的能理解 会套用就行
Sub ttt()
Range('a1').Value = 100 '表示单元格 A1 的 值是 100，那然后你知道 Value 就是 值 的意思，的 就是那个 点，学 VBA 不需要英文，只需要耐心就可以了。
End Sub
*****************************************************
Sub ttt1()
Sheets(1).Name = '工作表改名了' '那那那，这个你应该也知道了吧，这表示，表集合中排序1号的表 的名称是 '工作表改名了'。
End Sub
Sub ttt2()
Sheets('Sheet2').Range('a1').Value = 'abcd' '相对于上一个例子 这个不是用序号，而是用的工作表名来选择或激活这个 “sheet2' 工作表的。
End Sub
*******************************************************
Sub ttt3()
Range('A2').Interior.ColorIndex = 3 '这里表示，单元格 A2 内部字体的颜色是 VBA 定义好的 序号是 3 的颜色，好像是 红色
'为此我跟度娘借了一张 VBA 定义的一个颜色表，LOOK
End Sub
'二 、VBA方法（再提示，你可以理解为 一种行为或一个动作）
'VBA方法是作用于VBA对象上的动作
'表示用某个方法作用于VBA的对象上，可以用下面的格式：
Sub ttt4()
牛排.做 熟的程度:=七成熟 '看看，多平凡，多多白话多直白，可能之间的符号你还不理解，不用理解，套用之，因为我也不理解，规定的吗，干吗要理解。
Range('A1').Copy Range('A2') '意思是在 A1 单元格选择复制，粘贴到单元格 A2里。
End Sub
*******************************************************
Sub ttt5()
Sheet1.Move before:=Sheets('Sheet3') '表示移动 sheet1 表 到 sheet3 的前面
End Sub
==========================================
'VBA中的代码的基本结构与组成部分，简介一下，君莫怕怕
'VBA语句
'一、宏程序语句
'运行后可以完成一个功能
Sub test() '开始语句
Range('a1') = 100
End Sub '结束语句
'二、函数程序语句
'运行后可以返回一个值
Function shcount()
shcount = Sheets.Count
End Function
'三、在程序中应用的语句
Sub test2()
Call test
End Sub
Sub test3()
For x = 1 To 100 'for next 循环语句
Cells(x, 1) = x
Next x
End Sub
联系客服
