excel使用elseif流程簡寫if函式巢狀條件的方法
工具/原料
excel2013
更多經驗請關注,如果幫到了你,請在上方給個投票謝謝支援。好人一生平安。
先頂後看年薪百萬,如果幫到了你,幫忙給個好評,這對小編很重要,萬分感謝。
方法/步驟
首先我們開啟一個工作樣表作為例子。
開啟vba編輯視窗,使用alt+f11快捷組合鍵或在開發者工具標籤中點選vb快捷按鈕,進入。
我們設計一個程式碼,比如滿足崗位工資100的為紅色,崗位工資300的為藍色,崗位工資900的為綠色。這樣我們寫下如下程式碼。
Sub 顏色()
For i = 6 To 13
t = Sheets(1).Cells(i, 7).Value '取得資料
If t = 100 Then
Sheets(1).Cells(i, 7).Select
Selection.Font.ColorIndex = 3
End If
If t = 300 Then
Sheets(1).Cells(i, 7).Select
Selection.Font.ColorIndex = 5
End If
If t = 900 Then
Sheets(1).Cells(i, 7).Select
Selection.Font.ColorIndex = 4
End If
Next
End Sub
上面的程式碼其實是在迴圈執行並每次都對值做了3次判斷,雖然計算機執行速度快,大家感覺不到差異,但是我們可以對其進行修改。來達到優化程式碼的目的。
這裡需要使用到elseif函式。簡寫程式碼如下:
Sub 顏色()
For i = 6 To 13
t = Sheets(1).Cells(i, 7).Value '取得資料
If t = 100 Then
c = 3
ElseIf t = 300 Then
c = 5
ElseIf t = 900 Then
c = 4
Else: c = 0
End If
Sheets(1).Cells(i, 7).Select
Selection.Font.ColorIndex = c
Next
End Sub
這裡可以解釋一下函式的執行方法,首先是迴圈語句for歷遍sheet1表格中G列6-13行資料。並每次對其取值進行判斷,最關鍵的是對字型顏色進行變數定義,這樣可以簡化程式碼中選擇單元格和進行字型顏色變更的多次操作。
注意事項
謝謝你的投票。
如果你有各種需要,可以私信我,我會想辦法幫你解決。謝謝。