vba 設(shè)置條件格式 vba條件選擇語句?
vba條件選擇語句?If條件語句講解VB中的選擇結(jié)構(gòu)語句有多種,選擇結(jié)構(gòu)是根據(jù)給定的條件,選擇執(zhí)行一個分支的算法結(jié)構(gòu)。選擇結(jié)構(gòu)在VB實際編程中都經(jīng)常應(yīng)用,所以深刻理解并且熟練掌握就顯得非常重要了。If
vba條件選擇語句?
If條件語句講解
VB中的選擇結(jié)構(gòu)語句有多種,選擇結(jié)構(gòu)是根據(jù)給定的條件,選擇執(zhí)行一個分支的算法結(jié)構(gòu)。
選擇結(jié)構(gòu)在VB實際編程中都經(jīng)常應(yīng)用,所以深刻理解并且熟練掌握就顯得非常重要了。
If 選擇語句
第一種形式:
If 條件1 Then
第二種形式:
If 條件1 Then
else
...
end if
第三種形式:
If 條件1 Then
t語句塊1
ElseIf 條件2 Then
t語句塊2
ElseIf 條件3 Then
t語句塊3
ElseIf 條件4 Then
t語句塊4
ElseIf 條件5 Then
t語句塊5
ElseIf 條件6 Then
t語句塊6
ElseIf 條件7 Then
t語句塊7
ElseIf 條件8 Then
t語句塊8
......
ElseIf 條件n Then
t語句塊n
else
語句塊
End If
在 If 語句的“If語句塊”和“Else語句塊”中還可以包含 If 語句。如:
…….
If 條件1 Then
t…..
tIf 條件2 Then
tt…..
tElse
tt….
tEnd If
t…...
Else
t…..
tIf 條件3 Then
tt…..
tElse
tt….
tEnd If
t…….
End If
例:下面的程序用于判斷輸入數(shù)據(jù)的奇偶性及所在的區(qū)間。
Private Sub cmd1_Click( )
Dim int1 As Integer, int2 As Integer
int1Cint(txt1.T
excel怎么用宏批量處理條件格式?
把你要設(shè)置該條件格式的文件都放在一個目錄,然后在該目錄下新建一個工作薄,并打開,按ALT F11打開VBA編輯器,,在左邊列表欄點擊鼠標右鍵插入一個模塊,粘貼以下代碼到右邊窗口,
保存然后執(zhí)行該代碼. 這個目錄下所有exc:文件為exc:
Sub Macro1()
Dim Fil::xlC:xlNotB:str1, Formula2:str2
.FormatConditions(1) 3
End With
Next
End With
End If
FileName Dir
Loop While FileName
End If
End Sub
如果能下載附件 ,直接把這個文件放到你要設(shè)置條件格式的目錄中,執(zhí)行Macro1 宏.