Compile Error

[VegasNath]

Code: Select all

    Range(("B8:" & iCol & "8"), _
        ("B22:" & iCol & "22"), _
        ("B48:" & iCol & "48"), _
        ("B53:" & iCol & "53"), _
        ("B57:" & iCol & "57"), _
        ("B65:" & iCol & "65")).Interior.ColorIndex = 36

Why does this not work?

[HansV]

It the entire range should be one string:

Code: Select all

    Range("B8:" & iCol & "8," & _
        "B22:" & iCol & "22," & _
        "B48:" & iCol & "48," & _
        "B53:" & iCol & "53," & _
        "B57:" & iCol & "57," & _
        "B65:" & iCol & "65").Interior.ColorIndex = 36

Apart from that, the variable name iCol would traditionally be used for an integer because of the prefix "i", but in this code, it needs to be a string. This is bound to confuse more experienced programmers, so I'd use sCol or strCol instead of iCol.

[VegasNath]

Thanks Hans, works great, and I appreciate the advice.