Sub 属性()

Debug.Print Sheet1.Name
Debug.Print Sheet1.Range("b7").Value

End Sub

'VBA对象属性的赋值

Sub 属性赋值()
Sheet2.Name = "效率"
Sheet2.Range("a1") = "hello vba"
End Sub

Sub 选择方法()
Range("a1:a10").Select
'注：如果单元格区域前没有写工作表名，则默认为活动工作表
End Sub

Sub 复制方法()
Sheet1.Range("a1:a10") = 1   '将1写入表一的a1:a10区域
Sheet1.Range("a1:a10").Copy Sheet2.Range("a1")   '将表一的a1:a10区域的值复制到表2的a1
End Sub

Sub 删除方法()
Sheets(3).Delete
End Sub

'1.常量：常量是定义了之后就不做变化了。
'  常量定义格式：Const 常量名= 常量表达式
Sub 常量()
Const pi = 3.145926
End Sub


'2.变量:在定义之后还能再次赋值
'变量定义格式：Dim 变量 As 变量类型


Sub 变量()
Dim a As Integer
a = 100
End Sub

'3.常量变量应用
Sub 应用()
Const pi = 3.1415926
Dim a As Integer
a = 200
Debug.Print pi * a
End Sub

'3.注意事项
    'A.VBA允许使用未定义的变量，默认是变体变量(Variant)
    'B.变量的强制声明：Option Explicit


'4.变量名的命名规则
    '以字母开头
    '不能用保留字
    '不超过 255 个字符。
    '同一范围内必须是唯一