ActiveSheet.Paste (error)

G

Guest

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Run-time error 1004 paste method of worksheet class failed 3
Can Vba workout if a selection is part of a group? 0
Copying information into another workbook 1
Help me4 2
Run A Macro On Selected Worksheets 2
Macro with sum function 1
Excel Macro to use cells as a autofilter 0
error running a paste macro 1

Top