Update to 14.4.5 (141003) stopped running one of my macros

RichardLW

New Member
Joined
Jun 8, 2008
Messages
25
I've been running this macro since Office 2011 for mac came out, and after updating today, it won't run on one workbook (another almost identical sheet continues to work with the same command). The command it stops at is where it has a range copied and moves over one column to paste the values of the other columns. I tried telling it to paste in F9:K340, which is where it goes, but that didn't help.

I need to post my weekly inventory and really don't want to re-do the macro.

move_weeks Macro
'
Range("L7").Select
Selection.Copy
Range("K7").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("P9:P340").Select
Selection.Copy
Range("AM9").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("G9:L340").Select
Application.CutCopyMode = False
Selection.Copy
Range("F9").Select
ActiveSheet.PasteSpecial Format:=3, Link:=1, DisplayAsIcon:=False, _
IconFileName:=False

Range("L9:L340").Select
Selection.ClearContents
ActiveWindow.ScrollRow = 9
Range("U9:U340").Select
Selection.Copy
Range("AM9").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlAdd, SkipBlanks:= _
False, Transpose:=False
Range("W8:W340").Select
Application.CutCopyMode = False
Selection.Copy
Range("U8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("Y8:Y340").Select
Application.CutCopyMode = False
Selection.Copy
Range("W8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AA8:AA340").Select
Application.CutCopyMode = False
Selection.Copy
Range("Y8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AC8:AC340").Select
Application.CutCopyMode = False
Selection.Copy
Range("AA8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AE8:AE340").Select
Application.CutCopyMode = False
Selection.Copy
Range("AC8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AG8:AG340").Select
Application.CutCopyMode = False
Selection.Copy
Range("AE8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AI8:AI340").Select
Application.CutCopyMode = False
Selection.Copy
Range("AG8").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("AI8:AI340").Select
Application.CutCopyMode = False
Selection.ClearContents
ActiveWindow.ScrollColumn = 6
Range("L9").Select
End Sub
 

Excel Facts

Enter current date or time
Ctrl+: enters current time. Ctrl+; enters current date. Use Ctrl+: Ctrl+; Enter for current date & time.
Hi,

Does it fail even if no other Excel workbooks are open and no manual changes are made to the active workbook?

I ask because all recorded macros use assumptions about which books, sheets and cells are active based on what you selected at the time of the recording. If on playback you open another workbook of change a worksheet it can be thrown off course.
 
Upvote 0
I kept playing with it and checking to make sure there were no merged cells or other differences, but nothing. Then I changed it to only include up to line 335, and it worked. I can't find anything wrong with cells after those, but they are blank (for the moment), so I'm good.

I always (for 18 years-first on Windows versions) run it with a half dozen open sheets, as there are multiple things I have to lookup and this process is the second step on each of two sheets (although the other runs 1300 lines).

For now I'm good. But I guess it is some little gremlin that got in, like a simple sheet I was emailing last week when I saw it was 37 MB. I copied it and pasted to another sheet and sent 56 kb.
 
Upvote 0

Forum statistics

Threads
1,215,063
Messages
6,122,935
Members
449,094
Latest member
teemeren

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top