>How about:
>

>loExcel.range([A1]).Select
>

>not tested at all

Thanks, it worked. I just noticed, that Excel grid lines are not visible if I'm using different color for the cell (in my case I use blue). I'm thinking, may be it would look nicer, if I add borders for each cell?

I've recorded macro and got

With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeRight)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With

Sounds like a lot to set borders...