Se sh1.Range("A" & RowNum : "O" & RowNum).interior.color = rgb (127,187,199)
for a linha real da sua macro, você tem um erro de digitação
sh1.Range("A" & RowNum : "O" & RowNum)
deve ser sh1.Range("A" & RowNum & ":" & "O" & RowNum)
O cólon :
precisa ser concatenado como todo o resto, já que faz parte da string de intervalo