not tested but see if this approach does what you want:

Sub CopyPasteFormulas()
Dim rng As Range
Dim rng2 As Range

'worksheet & range where formulas located
'change as require
Set rng = ThisWorkbook.Worksheets("Sheet1").Range("C4:E8")

'destination workbook / worksheet & range
'change as required
Set rng2 = Workbooks("Book2").Worksheets("Sheet1").Range("C4: E8")

rng.Copy

rng2.PasteSpecial _
Paste:=xlPasteFormulas, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False

Application.CutCopyMode = False
End Sub
--
jb


"Robert Crandal" wrote:

I have a workbook title "Book1" which contains formulas
on Sheet1. If I highlight all these formulas and paste them
into Sheet1 of "Book2", then the formulas in Book2 will
contain references to "Book1".

How can I paste everything into "Book2" without all those
references to "Book1" in the formulas???

thank u


.