VBA - Farvelæg rækker baseret på værdi

Jeg har brugt denne kode,
hvor baggrundsfarven på en range skifter alt efter valg af Alternativknap

Dim Variabel As Integer
Dim Red As Byte
Dim Green As Byte
Dim Blue As Byte

'OptX = navn på alternativ knap
'OptX.value = Alternativknap valgt

            If Opt0.Value = True Then Variabel = 1
            If Opt1.Value = True Then Variabel = 2
            If Opt2.Value = True Then Variabel = 3
            If Opt3.Value = True Then Variabel = 4


'Hvid baggrundsfarve

            If Variabel = 1 Then               
                Red = 255
                Green = 255
                Blue = 255
            End If


'Grøn baggrundsfarve

            If Variabel = 2 Then               
                Red = 204
                Green = 255
                Blue = 204
            End If


'Gul baggrundsfarve

            If Variabel = 3 Then               
                Red = 255
                Green = 255
                Blue = 153
            End If


'Rød baggrundsfarve

            If Variabel = 4 Then               
                Red = 255
                Green = 0
                Blue = 0
            End If


' Vælg range

            Range(ActiveCell.Offset(0, 0),                     
            ActiveCell.Offset(0, 19)).Select

' Sæt range baggrundsfarve

            Range(ActiveCell.Offset(0, 0),   
            ActiveCell.Offset(0,19)).Interior.Color =
            RGB(Red, Green, Blue)


Mvh Jens