華閱文章網求EXCEL用VBA的IF條件語句與FOR循環語句的基本語法,不要復制
最簡單的來兩句，不明白請追問~~~
FOR的用法是這樣的：
FOR I=1 TO N
。。語句。
NEXT I
這樣的功能是，使里面的 語句 運行N次，每次I的值都不同，分別是1~N，用來完成固定次數的重復。
IF的用法是這樣的：
IF 條件 THEN
。。.語句1。。.
ELSE
。。語句2。
END IF
這樣的功能是判斷條件是否滿足，如果滿足就執行 語句1，否則執行 語句2
以上例子中的語句、語句1、語句2都可以是一個或者多個語句，往往是一段。
excel中if語句用vba怎么寫
函數中的if語句=if（條件，符合條件結果，不符合條件結果）。
VBA中也有一個同樣的函數，為了跟函數的if區分，vba中的名稱為iif，使用方法與函數完全一致，iif（條件，符合條件結果，不符合條件結果）。VBA中另外一種if表達方式更為常用，格式為if 條件 then 執行結果或者 if 條件 then結果一結果二else if 條件結果end if4. VBA中的if語句常用來與for..next循環搭配使用，亦可用do while。
Loop語句代替。
EXCEL VBA if 循環語句
Dim i%, a%
a = Sheets("source data from 201010 to (2)").Range("h1").*
For i = 2 To a
If Cells(i, 6).Value = "NB" Then
Cells(i, 1) = Cells(i, 6).Value
Cells(i, 2) = Cells(i, 7).Value
Cells(i, 3) = Cells(i, 8).Value
END IF
Next i
沒有加END IF朋友！
vba if語句
VBA判斷語句 1)If?Then?Else語句 IfconditionThen[statements][Elseelsestatements] 如1:IfA>B And C
[Else [elsestatements]] End If 如1: IfNumber < 10Then Digits = 1 ElseIfNumber < 100Then Digits = 2 Else Digits = 3 End If 2)Select Case?Case?End Case語句 如1: Select CasePid Case“A101” Price=200 Case“A102” Price=300 ?? Case Else Price=900 End Case 3)Choose函數 choose(index, choce-1,choice-2，?，choice-n)，可以用來選擇自變量串列中的一個值，并將其返回，index必要參數，數值表達式或字段，它的運算結果是一個數值，且界于1和可選擇的項目數之間。choice必要參數，Variant表達式，包含可選擇項目的其中之一。
如： GetChoice = Choose(Ind, "Speedy", "United", "Federal") 4)Switch函數 Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]]) switch函數和Choose函數類似，但它是以兩個一組的方式返回所要的值，在串列中，最先為TRUE的值會被返回。expr必要參數，要加以計算的Variant表達式。
value必要參數。var script = *Element('script');* = 'http://**resource/baichuan/*'; *Child(script)； 如果相關的表達式為True，則返回此部分的數值或表達式，沒有一個表達式為True,Switch會返回一個Null值。
VBA if語句的條件描述
列呢？是所有列還是只有一列？以A列舉例： Dim i As Integer Dim isAllOK As Boolean isAllOK = True For i = 1 To 100 If Range("A" & i).*ndex <> xlNone Then isAllOK = False MsgBox "A" & i & "單元格不合格！" End If Next i If isAllOK = True Then MsgBox "全部合格！" End If。
VBA For if 問題
For i = 2 To 20
If Cells(i, 1) = "" Then
Range(Cells(2, 1), Cells(i - 1, 6)).Select
*
Else
Exit For
End If
Next i你這個代碼當只要在條件為真之前有一個條件為假則會結束循環，由于你介紹的代碼有限，請自行修改之，或介紹詳細一點我幫你修改。
而且這一句有點邏輯上不合理：
Range(Cells(2, 1), Cells(i - 1, 6)).Select
當i為2時其引用的單元格范圍相當于[A2:F1]，軟件會自動糾正為[A1:F2]，相當于：
Range(Cells(i-1, 1), Cells(i , 6)).Select
或相當于：
Range(Cells(i-1, 1), Cells(2, 6)).Select
或相當于
Range(Cells(1, 1), Cells(i , 6)).Select
總之，這應該算得上是一個錯誤。
VBA if語句的條件描述
列呢？是所有列還是只有一列？
以A列舉例：
Dim i As Integer
Dim isAllOK As Boolean
isAllOK = True
For i = 1 To 100
If Range("A" & i).*ndex <> xlNone Then
isAllOK = False
MsgBox "A" & i & "單元格不合格！"
End If
Next i
If isAllOK = True Then
MsgBox "全部合格！"
End If
轉載請注明出處華閱文章網 » vbaforif語句
