View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Macro to copy current cell

Hi

The example line I posted will copy the activecell in sheet2 cell A1
ActiveCell.Copy Sheets("Sheet2").Range("A1")

There is nothing on the clipboard now that's why you get the error
Tell us exactly what you want to do and we can change the macro for you



--
Regards Ron de Bruin
http://www.rondebruin.nl



wrote in message oups.com...
I tried your suggestion to use Active Cell, but now I get an error on
ActiveSheet.Paste. I'm basically, coping cell contents from one
spreadsheet to another based on the row I'm in. Here's a few of the
lines.

Workbooks.Open Filename:= _
"C:\Documents and Settings\Administrator\My
Documents\CustomSafety\010184641.xls"
Range("A11:B11").Select
Windows("Cust.xls").Activate
ActiveCell.Copy Sheets("CustomerList").Range("A1")
Windows("010184641.xls").Activate
ActiveSheet.Paste
Range("C11").Select
Windows("Cust.xls").Activate
Range("B6").Select
Application.CutCopyMode = False
Selection.Copy
Windows("010184641.xls").Activate
ActiveSheet.Paste

Thanks for replying.

Michele