Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Difficulty with copy and paste
Once again, I am trying to do something simple. I can get it to work with
macros, but when I modify the code, it doesn't seem to want to work anymore. I am trying to copy a given range (A4:H4) and paste it to a cell that can change. Here is the code I am using: Dim copy_range As Range Call cell_setup 'this is where cell_range is properly defined (it works in the later code fine) ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Select Application.CutCopyMode = False 'something the macro made Selection.Copy copy_range.Paste I would think this would work: ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Copy copy_range.Paste but... it doesn't seem to want to I get a "Run-time error '1004':Application-defined or object-defined error" |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Difficulty with copy and paste
It looks like this:
Set copy_range = Worksheets("Purchase Requisition") _ ..Range(cell_range.Offset(cell_count, 7)) Needs to be changed to: Set copy_range = Worksheets("Purchase Requisition") _ ..Cells(cell_range.Offset(cell_count, 7)) "baconcow" wrote: Once again, I am trying to do something simple. I can get it to work with macros, but when I modify the code, it doesn't seem to want to work anymore. I am trying to copy a given range (A4:H4) and paste it to a cell that can change. Here is the code I am using: Dim copy_range As Range Call cell_setup 'this is where cell_range is properly defined (it works in the later code fine) ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Select Application.CutCopyMode = False 'something the macro made Selection.Copy copy_range.Paste I would think this would work: ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Copy copy_range.Paste but... it doesn't seem to want to I get a "Run-time error '1004':Application-defined or object-defined error" |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Difficulty with copy and paste
I don't know, after looking closer, I think you also have Parentheses in the
wrong place. Maybe Set copy_range = Worksheets("Purchase Requisition") _ ..Range(cell_range).Offset(cell_count, 7) "baconcow" wrote: Once again, I am trying to do something simple. I can get it to work with macros, but when I modify the code, it doesn't seem to want to work anymore. I am trying to copy a given range (A4:H4) and paste it to a cell that can change. Here is the code I am using: Dim copy_range As Range Call cell_setup 'this is where cell_range is properly defined (it works in the later code fine) ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Select Application.CutCopyMode = False 'something the macro made Selection.Copy copy_range.Paste I would think this would work: ' create new row Set copy_range = Worksheets("Purchase Requisition").Range(cell_range.Offset(cell_count, 7)) Range("A4:H4").Copy copy_range.Paste but... it doesn't seem to want to I get a "Run-time error '1004':Application-defined or object-defined error" |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Difficulty with copy and paste
In the end, I could only get it to work with this code:
Set copy_range = Worksheets("Purchase Requisition") _ ..Range(cell_range.Offset(cell_count, 0), cell_range.Offset(cell_count, 7)) Range("A4:H4").Copy copy_range.Select ActiveSheet.Paste It seemed to want the entire range, from one end to the other, as opposed to just the first cell I wanted to paste it to, like the Macro had. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can't Copy and Paste or Paste Special between Excel Workbooks | Excel Discussion (Misc queries) | |||
Automating copy/paste/paste special when row references change | Excel Programming | |||
help w/ generic copy & paste/paste special routine | Excel Programming | |||
Excel cut/Paste Problem: Year changes after data is copy and paste | Excel Discussion (Misc queries) | |||
Copy and Paste macro needs to paste to a changing cell reference | Excel Programming |