VBA基本情況介紹
選擇當前活動的工作簿:
此工作簿。使活動
如果選擇另壹個工作簿，請確保它是打開的，並且不要忘記添加後綴“”。xls "，例如:
Windows("Totol.xls ")。使活動
選擇壹個工作表:
表(“余額”)激活。
選擇單元格:
範圍(" A1 ")。挑選
選擇連續單元格:
範圍(" A1:G8 ")。挑選
選擇不連續的單元格:
範圍(“A1，B6，D9”)。挑選
範圍(“A1，B6:B10，D9”)。挑選
在單元格之間移動:
ActiveCell。偏移(13，14)。挑選
選擇。偏移量(-3，-4)。挑選
範圍(“G8”)。偏移量(-3，-4)。挑選
註意:您可以定義壹個變量並用offset實現它，例如:
varFreightRowsCount = Range(" a 1 ")current region . rows . count。
ActiveCell。Offset(varFreightRowsCount，0)。挑選
選擇整個工作表:
細胞。挑選
選擇當前單元格所在的區域(遇到空行/空列時將停止):
range(" a 1 ")current region . select。
選擇壹行或壹列:
行數(" 1 ")。挑選
列(“A”)。挑選
或者:
ActiveCell。整個流程。選擇
ActiveCell。整個列。選擇
選擇相鄰的行/列:
列(“A:C”)。挑選
行數(" 1:5 ")。挑選
選擇不相鄰的行/列(註意:與選擇相鄰的行/列不同，使用“範圍”而不是“列/行”:)
範圍(“A:A，C:C，E:F”)。挑選
範圍(" 1:1，5:6，9:9 ")。挑選
選擇當前活動單元格，直到最後壹個非空單元格:
範圍(" A1 "，範圍(" A1 ")。End(xlDown))。挑選
範圍(ActiveCell，ActiveCell。End(xlDown))。挑選
選擇當前活動單元格，直到第壹個非空單元格:
範圍(“A32”，範圍(“A32”)。End(xlUp))。挑選
範圍(ActiveCell，ActiveCell。End(xlUp))。挑選
選擇第壹個非空單元格右側的當前活動單元格。(註:“xlTORight”而不是“xlRight”)
範圍(" A1 "，範圍(" A1 ")。End(xltoRight))。挑選
範圍(ActiveCell，ActiveCell。End(xltoLeft))。挑選
選擇第10個單元格右側的當前活動單元格。
範圍(“A2”，範圍(“A2”)。偏移量(0，10))。挑選
範圍(ActiveCell，ActiveCell。偏移量(0，10))。挑選
選擇第10個單元格左側的當前活動單元格。
蘭奇(“A20”)，蘭奇(“A20”)。偏移量(0，-10))。挑選
範圍(ActiveCell，ActiveCell。偏移量(0，-10))。挑選
選擇當前活動單元格，直到第10個單元格。
範圍(“a2”，範圍(“a2”)。Offset(10，0))。挑選
範圍(ActiveCell，ActiveCell。Offset(10，0))。挑選
選擇當前活動單元格，直到第10個單元格。
範圍(" A1 ")。結束(xlDown)。偏移量(1，0)。挑選
選擇行中的第壹個空單元格:
範圍(" A1 ")。End(xltoRight)。偏移量(0，1)。挑選
改變面積大小(從A1:B5到A1:D10):(註:改變面積不是向外擴展，而是重新定義。即“選擇。調整大小(10，4)。選擇“代替”選擇。調整大小(5，2)。選擇”。
Excel宏不能記錄移動到當前行第壹個單元格的動作(即按“Home”鍵的動作)，但下面的語句可以做到:
ActiveCell。偏移量(0，-ActiveCell。列+ 1)。挑選
移動到當前列的第壹個單元格:
ActiveCell。偏移量(-ActiveCell。行+ 1，0)。挑選
如果只有壹個條件和壹個操作，可以使用下面的語句:
如果選擇。值& gt那麽10
選擇。偏移量(1，0) = 100
如果…就會結束
或者更簡單:
如果選擇。值& gt10然後選擇。偏移量(1，0) = 100
如果有兩個條件和兩個動作，可以使用下面的語句:
如果選擇。值& gt那麽10
如果選擇。那麽Value = 12
選擇。偏移量(1，0) = 100
如果…就會結束
選擇。Offset(1，0) = 20
如果…就會結束
當有雙重條件(共存條件)和壹個動作時，可以使用下面的語句:
如果選擇。值= 10和選擇。偏移量(0，1)。那麽值= 20
選擇。偏移量(1，0) = 100
如果…就會結束
當有雙重條件(可選條件)和壹個動作時，可以使用下面的語句:
如果選擇。值= 10或選擇。偏移量(0，1)。那麽值= 20
選擇。偏移量(1，0) = 100
如果…就會結束
當只有壹個條件和兩個動作時，可以使用下面的語句:
如果選擇。值& gt那麽10
選擇。偏移量(1，0) = 100
其他
選擇。Offset(1，0) = 0
如果…就會結束
當有多個條件並且每個條件遵循不同的操作時，可以使用以下語句:
如果選擇。那麽值= 1
選擇。Offset(1，0) = 10
ElseIf選擇。那麽值= 2
選擇。Offset(1，0) = 20
ElseIf選擇。那麽值= 3
選擇。Offset(1，0) = 30
ElseIf選擇。那麽值= 4
選擇。Offset(1，0) = 40
ElseIf選擇。那麽值= 5
選擇。Offset(1，0) = 50
如果…就會結束
當您必須測試許多條件時，您可以使用Select Case語句來代替If Then..埃爾瑟夫。語法如下:
子測試()
選擇案例選擇。價值
案例是& gt= 85
選擇。Offset(0，1) = "A "
案例是& gt= 75
選擇。Offset(0，1) = "B "
案例是& gt= 65
選擇。Offset(0，1) = "C "
案例是& gt= 50
選擇。Offset(0，1) = "D "
其他情況
選擇。Offset(0，1) = "F "
結束選擇
末端接頭
此語句的含義是，如果所選單元格的值大於85，則右邊單元格的值為“a”...如果所選單元格的值小於50，則右邊單元格的值為“f”。