Need to GOTO a calculated cell reference

[jeff]

Hi,

Not too big a stretch. Assuming you're entering
your daily income/expenses into the same cells
each day, and you want to post that total/net to
the right of your Day number you could try this
little macro attached to a command button. It
copies the value in "C25" to the next cell to the
right of the currently selected cell. So, if it's
the 5th, select that Cell, and click the button.

Other variations abound. YOu could post the date
and let code decide which cell to put it in, etc.

Have fun.
jeff


Sub GoPost()
Range("C25").Copy
ActiveCell.Select
ActiveSheet.Paste Destination:=ActiveCell.Offset(0, 1)
End Sub

-----Original Message-----
I'm trying to create a household expenses/income sheet.

I'm entering the day's income and expenditure figures and
totalling them at the bottom of my worksheet. I want to
be clever and then post the balance of these totals to a
cell at the right hand side of my sheet which referes to
the day of the month for that balance. i.e. I have on the
right cells numbered 1 to 31 and I want to GOTO the cell
for the day of the month and paste there my balance. I am
able using the ADDRESS function to create the text value
of the cell reference for the cell into which I want to
paste my balance. I can't seem to use GOTO to take the
text value and use it to go to the correct cell ready to
paste my value.

Has anyone got any good ideas how I can achieve this? Or

am I trying to be too smart here?