vba2010 select 語句用法備忘

2022-09-17 18:30:16 字數 586 閱讀 6167

sub select用法()

a = cells(3, "r")

select case a      select case  比較表示式

case is < 1      小於、大於、不等於 用case is > < <> value   表示

cells(3, "s") = 1    條件成立執行的語句

case is < 2.5

cells(3, "s") = 2

case 3          判斷等於某個值  用 case  value  表示

cells(3, "s") = 3

case 4 to 6

cells(3, "s") = 4

case 7 to 10, is < 8    判斷範圍用   case 下限  to  上限   表示,多個條件用","分開   條件為或關係,多條件感覺不好用!

cells(3, "s") = 9

case else

cells(3, "s") = 1111

end select          select 語句結束時不要忘記  end select

end sub

vba 跳出for迴圈 VBA的基本語句

塊 的形式的vba語句比完整一行的 功能和適用性方面更強。二選一 if 條件表示式 then 條件表示式返回true時要執行的操作和計算 else 條件表示式返回false時要執行的操作和計算 end if 多選一 if 條件表示式 then 條件表示式返回true時要執行的操作和計算 elseif...

VBA 錯誤分支語句

宣告 筆記 於我要自學網 excel vba基礎教程 授課講師 曾賢志 例子 當錯誤的時候繼續執行下去 統計學生的總分,若有未考,則不統計總分 如圖 on error resume next 該行 作用是當錯誤的時候繼續執行下去 for i 2 to 8 cells i,4 cells i,3 ce...

vba 判斷語句

if 條件then 語句1語句2 語句nend ifif activesheet.name sheet1 then activesheet.move after sheets worksheets.count end ifif 條件 then 如果條件為真時要執行的語句 else 如果條件為假時要執...