影片直播app原始碼，VBA 之Interior 物件設定底色

影片直播app原始碼，VBA 之Interior 物件設定底色

1.ColorIndex 索引顏色值

Sub 索引顏色值()
    For i = 1 To 56
        Cells(i, 1).Interior.ColorIndex = i
        Cells(i, 2) = i
    Next i
    
    For i = 1 To 56
        Cells(i, 3).Interior.ColorIndex = i
        Cells(i, 3).Interior.ColorIndex = xlNone
        Cells(i, 4) = i
    Next i
End Sub

2.Color 結合QBColor早期顏色值

Sub 早期顏色值()
    For i = 0 To 15
        Cells(i + 1, 1).Interior.Color = QBColor(i)
        Cells(i + 1, 2) = i
    Next i
    
    For i = 0 To 15
        Cells(i + 1, 3).Interior.Color = QBColor(i)
        Cells(i + 1, 3).Interior.Color = xlNone
        Cells(i + 1, 4) = i
    Next i
End Sub

 3.Color 結合RGB顏色值

Sub 三原色顏色值()
    Cells(2, 4).Interior.Color = RGB(255, 0, 0)
    
    Cells(3, 4).Interior.Color = RGB(255, 0, 0)
    Cells(3, 4).Interior.Color = xlNone
End Sub

 以上就是 影片直播app原始碼，VBA 之Interior 物件設定底色，更多內容歡迎關注之後的文章