G
Gord Dibben
Sub downer()
ActiveCell.Offset(1, 0).Select
End Sub
Sub downer2()
ActiveCell.Offset(1, 0).Interior.ColorIndex = 3
End Sub
Gord Dibben MS Excel MVP
On Thu, 16 Nov 2006 15:52:01 -0800, gk <[email protected]> wrote:
ActiveCell.Offset(1, 0).Select
End Sub
Sub downer2()
ActiveCell.Offset(1, 0).Interior.ColorIndex = 3
End Sub
Gord Dibben MS Excel MVP
On Thu, 16 Nov 2006 15:52:01 -0800, gk <[email protected]> wrote: