Give this a try,

Private Sub Worksheet_Change(ByVal Target As Range)
Range ("C1").Select
ActiveCell.Offset(1, 0).Range("A1").Select
End If
End Sub
That should work, I am on an Island in the Pacific Right now and the
computer here doesn't have excel

i SEE. no that did not work, either. Where can I learn of this VBA that you
speak of?


damorrison wrote:
Give this a try,

Private Sub Worksheet_Change(ByVal Target As Range)
Range ("C1").Select
ActiveCell.Offset(1, 0).Range("A1").Select
End If
End Sub
That should work, I am on an Island in the Pacific Right now and the
computer here doesn't have excel


--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200510/1

Hi Eternal_Cat

Where can I learn of this VBA that you speak of?

See David McRitchie's introductory notes at:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

See also David's Tutorials page at:

http://www.mvps.org/dmcritchie/excel....htm#tutorials

The VBA tutorials appear just below the half way point of that page.

Consider, also, purchasing a book: one that might serve your purpose, and
which receives frequent recommendation in the NG, is
John Walkenbach's 'Excel VBA Programming For Dummies':

http://www.j-walk.com/ss/books/bookxl27.htm

---
Regards,
Norman



"eternal_cat via OfficeKB.com" <u14645@uwe wrote in message
news:56654ae98bd18@uwe...
i SEE. no that did not work, either. Where can I learn of this VBA that you
speak of?


damorrison wrote:
Give this a try,

Private Sub Worksheet_Change(ByVal Target As Range)
Range ("C1").Select
ActiveCell.Offset(1, 0).Range("A1").Select
End If
End Sub
That should work, I am on an Island in the Pacific Right now and the
computer here doesn't have excel


--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200510/1