"Tom Ogilvy" wrote in message
...
don't copy.

bk.worksheets(1).Range("A1").Formula = _
bk2.worksheets(3).Range("B9").formula

--
Regards,
Tom Ogilvy

"Dariotto" wrote in message
...
Hi, I'm trying to use Clipboard from VBA in Excel 2000.
I can paste a single cell from the Clipboard using DataObject and
related
methods (MSForms 2.0 obj library) but I can't manage a range of cells.
After selecting and copy a range of cells from Excel to the Clipboard,
with
Clipboard Viewer I can see only one text string (from the last cell) and
no
formulas.

Should I try with WinAPI calls??? I searched Internet and I've found a
tool
(API Viewer) to look at the declares statement of a DLL, i.e.:
Declare Function GetClipboardData Lib "user32" (ByVal wFormat As Long)
As
Long
but I've never used it before.
I'd like to do a macro that can check if the Clipboard contains a range
from
Excel and then make an "exact copy" of all the range formulas into a new
worksheet / workbook without formula address changes.
Thank you for any suggestion ????




Is there a similar "shortcut" to copy Book1.Sheet1 to ActiveWorkbook.Sheet1
?

Record Macro came up with:
Windows("Book1").Activate
Cells.Select
Selection.Copy
ThisWorkbook.Sheets("Sheet1").Activate ActiveSheet.Paste