From Active Worksheet Trying to Open another file, cut, paste to original file; works in debug but shortcut fails

kmblush

New Member
Joined
Oct 25, 2013
Messages
1
Hi - I'm old to programming but very new to VBA. I'm using Excel 2010 and have a pretty functional routine. Where I'm running into trouble with opening a 2nd file, copying a column, pasting the column to the original file (from which the code is being executed) and then closing the 2nd file. Everything works just fine in Debug or if I access Macros from the Developer toolbar/ribbon and then select run. The process hangs if I use the defined shortcut. And, by hanging, I mean the 2nd file opens and then all processing stops.

The code snippet where the "stoppage" occurs is:

BlanksName = "c:\users\kathy\documents\Shipping Manifests\AllBlanks-" & MarketName & ".xls"
Set BlanksFile = Workbooks.Open(BlanksName)
BlanksFile.Sheets("Worksheet").Columns("A:A").Copy
BlanksFile.Close
WsSrc.Columns("J:J").Insert shift:=xlToRight

All variables have been previously defined. Any suggestions?

Thanks very much.
 

Forum statistics

Threads
1,082,570
Messages
5,366,364
Members
400,886
Latest member
Fchel

Some videos you may like

This Week's Hot Topics

Top