Macro code for pasting the cell.

[bubbles2010]

Hello. I am a new user. I was trying to copy the sum from sheet1 to sheet2 in the same work book with macro. I was using this code:
Range(Sheets(1).Rows(36), Sheets(1).Rows(36)).Copy Destination:=Sheets(2).Range("A36")

It works fine. The only problem is it is copying the formula, but not the actual value. I know how to reference using excel equation, but I don't want to do that. I want to use VB code.
Thank you so much.

 

[id107]

I'm sure that there are more ways to do it, but here are two:

Sub firstoption()
    With Sheets(2).Rows(36)
        .Value = Sheets(1).Rows(36).Value
    End With
End Sub

Sub secondoption()
    Sheets(1).Rows(36).Copy
    Sheets(2).Rows(36).PasteSpecial Paste:=xlValues
End Sub

 

[Scott Huish]

I wouldn't use the With for only 1 line of code:

Sub test()
Sheets(2).Rows(36).Value = Sheets(1).Rows(36).Value
End Sub