Cable Forum - View Single Post

absthechatter · 16-01-2007, 02:12

I have a Macro, to copy two columns and paste in, further to the left;

Next lngLoop
Sheets("CCReport").Activate
Columns("E:F").Select
Application.CutCopyMode = False
Selection.Cut
Columns("B:B").Select
Selection.Insert Shift:=xlToRight
Range("B2").Select
Selection.Delete Shift:=xlToLeft
Selection.Delete Shift:=xlToLeft

Range("B1").Select
Selection.Delete Shift:=xlToLeft
Selection.Delete Shift:=xlToLeft

This works absoloutely fine on my home computer (Office 2003), but whenever I try it at work (Office 2000), I get the information cannot be pasted because the cut area and paste area are not the same size (Run-time error '1004'.

Is this just a problem with earlier versions of Excel, or is there a way i can fix it so it runs on my work computer.

Many thanks

Abs

16-01-2007, 02:12	#1
absthechatter Inactive Join Date: Dec 2004 Posts: 310	Macro question in Excel I have a Macro, to copy two columns and paste in, further to the left; Next lngLoop Sheets("CCReport").Activate Columns("E:F").Select Application.CutCopyMode = False Selection.Cut Columns("B:B").Select Selection.Insert Shift:=xlToRight Range("B2").Select Selection.Delete Shift:=xlToLeft Selection.Delete Shift:=xlToLeft Range("B1").Select Selection.Delete Shift:=xlToLeft Selection.Delete Shift:=xlToLeft This works absoloutely fine on my home computer (Office 2003), but whenever I try it at work (Office 2000), I get the information cannot be pasted because the cut area and paste area are not the same size (Run-time error '1004'. Is this just a problem with earlier versions of Excel, or is there a way i can fix it so it runs on my work computer. Many thanks Abs