Activate sheet 'Stock Transactions' and select the copy location and try the
below macro..

Sub Macro()
Sheets("Pilot Valve Material").Range("A2:E53").Copy _
Sheets("Stock Transactions").Range(ActiveCell.Address)
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Shane" wrote:

I have the following code to get information copied from one sheet to another
What i would like to happen is the cell i highlight and then press the macro
button the information is copied to to that position, and not to keep
defaulting to the one shown in the macro
Is there a peice of code i need to add to overcome this, any help you can
give will be much appreciated

Sheets("Pilot Valve Material").Select
Range("A2:B53").Select
Selection.Copy
Sheets("Stock Transactions").Select
Range("A1597").Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=27
Sheets("Pilot Valve Material").Select
Range("C2:C53").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Stock Transactions").Select
Range("C1597").Select
ActiveSheet.Paste
Sheets("Pilot Valve Material").Select
Range("D2:E53").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Stock Transactions").Select
Range("D1597").Select
ActiveSheet.Paste
End Sub