Use cell contents as range value

[Craig]

How do I substitute the value contained in Main!A263 for the "A57" below?

Sub Macro1()

Sheets("Main").Select
Range("A57").Select

End Sub

A57 represents today's date in column A on the main sheet and its location is computed in a263

Thanks in advance!
Craig

[yjoshi]

Sub copy_value()
Sheets("Main").Select
Range("A57").Value = Range "A263").Value
End Sub

hope this helps

[yjoshi]

Sub copy_value()

Range("a2").Copy
Range("a5").PasteSpecial (xlPasteValues)
End Sub

[Craig]

This reply doesn't work. It places A57 in the cell A57.

Sub copy_value()
Sheets("Main").Select
Range("A57").Value = Range ("A263").Value
End Sub

The contents of A263 is A57

Thanks for the help!
Craig

[yjoshi]

What is that did not work???

I presumed that you want to paste whatever is the calculated value in cell A263 into cell A57.
(that is what i could read from the text)


Sorry if i have messed it up, but can you tell what is expected ??

[Craig]

This macro is used on different worksheets to return the user to the main page on the row that corresponds with todays date. The cell I want to become active is A57 on the main page. I do not want to replace the value. There are 262 rows and when the user comes back to the "main" sheet he is only interested in the data in that row.
Thanks!
Craig
Sorry for being so confusing

[yjoshi]

Sub active_today()
Worksheets("Main").Range("A57").Select
End Sub

Hope this is what you expect

[Craig]

Sub active_today()
Worksheets("Main").Range("A57").Select
End Sub

produces error and doesn't run
Thanks,
Craig

[yjoshi]

Sorry for that!!!

I tried it from immidiate window and it worked.

BTW, try this

Private Sub CommandButton1_Click()
Application.Goto Reference:="Main!R55C1"
End Sub


Also attached the sheet

[yjoshi]

here is the file!

May be i got up from the wrong side of the bed today