![]() |
#1
|
|||
|
|||
![]() I have 3 Excel tables. Table 1 (SummerCompTable) includes all the records found in tables 2 (POYCompTable) and 3 (ScratchCompTable). Table 1 is used to edit the records and has a column that indicates where each record in table 1 belongs. On completion of editing I need to copy edit table records to table 2, 3 or to both. To get started I created the following macro: Code:
Sub Macro4() Range("SummerCompTable").Select 'Editing table Selection.Range("A1:C1").Select 'Cols to be copied Selection.Copy Range("POYCompTable").Select 'Table 2 Selection.ListObject.ListRows.Add (1) 'New line at top of table Selection.Range("A1:C1").Select 'Tried Range("A1") but paste still fails Application.ActiveSheet.Paste 'Fails with run time error 1004 - error message "Paste method of Worksheet class failed" 'Selection.PasteSpecial 'This doesn't work either End Sub Any suggestions? Last edited by macropod; 05-06-2013 at 04:13 PM. Reason: Added code tags |
Tags |
error1004, failure, paste |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Paste special an Excel range into Outlook as an Excel Worksheet | charlesh3 | Excel Programming | 3 | 02-04-2013 04:33 PM |
![]() |
ghumdinger | Outlook | 1 | 08-11-2012 02:20 PM |
![]() |
yonasan | Excel Programming | 3 | 06-12-2012 11:08 PM |
![]() |
gbaker | Excel Programming | 11 | 06-06-2012 05:23 AM |
![]() |
bennypryde | Office | 1 | 01-05-2012 03:33 PM |