|
ActiveSheet.Paste (error)
I have performed this recorded macro several times even this week. Now
consistently I get this paste error! Can anyone see why that would happen! Sub Macro5() ' ' Macro5 Macro ' Macro recorded 8/2/2007 by ' ' Keyboard Shortcut: Ctrl+k ' ActiveCell.FormulaR1C1 = "1625 SOUTH FEDERAL HWY POMPANO BEACH, FL 33062" ActiveCell.Offset(-2, 1).Range("A1").Select ActiveSheet.Paste (Fails Here) ActiveCell.Offset(1, 1).Range("A1:B1").Select Selection.Copy ActiveCell.Offset(-1, 2).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(1, 0).Rows("1:2").EntireRow.Select Application.CutCopyMode = False Selection.Delete Shift:=xlUp ActiveCell.Offset(2, 0).Range("A1").Select End Sub |
ActiveSheet.Paste (error)
what did you copy before you ran the macro?
"Puzzled" wrote: I have performed this recorded macro several times even this week. Now consistently I get this paste error! Can anyone see why that would happen! Sub Macro5() ' ' Macro5 Macro ' Macro recorded 8/2/2007 by ' ' Keyboard Shortcut: Ctrl+k ' ActiveCell.FormulaR1C1 = "1625 SOUTH FEDERAL HWY POMPANO BEACH, FL 33062" ActiveCell.Offset(-2, 1).Range("A1").Select ActiveSheet.Paste (Fails Here) ActiveCell.Offset(1, 1).Range("A1:B1").Select Selection.Copy ActiveCell.Offset(-1, 2).Range("A1").Select ActiveSheet.Paste ActiveCell.Offset(1, 0).Rows("1:2").EntireRow.Select Application.CutCopyMode = False Selection.Delete Shift:=xlUp ActiveCell.Offset(2, 0).Range("A1").Select End Sub |
| All times are GMT +1. The time now is 10:26 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com