excel crashing when 'macro' icon is hit

[ssquirrel]

I have a set of macros I run in the course of preparing a weekly report. The first macro is used to clear out unneeded columns from a database dump (I can't control the outfeed and get more columns than I need). I run the same macro on 4 different sets of data, each output from a separate divison of my business. I revised the first macro 2 weeks ago to include the a find+replace. I used the macro (and the set) last week in creating my reports wthout problem.

This week when I open my file from the database and prepare to launch the macro by hitting the 'show macros' icon on the developer tab, excel crashes "Microsoft excel has stopped working...". I've restarted my pc, and repeated steps numerous times with same result.

Any ideas why? I was going to paste the macro in the post but can't get that far without a crash.

 

[NeonRedSharpie]

Well you shouldn't need to enable macros to view the code. You can just hit alt+F11 and it will pull up the macro editor. It sounds like you might have a change event or a calculate event that is looping like woah.

 

[ssquirrel]

Well you shouldn't need to enable macros to view the code. You can just hit alt+F11 and it will pull up the macro editor. It sounds like you might have a change event or a calculate event that is looping like woah.

Sub IMS2SPACEMODEL()
'
' IMS2SPACEMODEL Macro
' take xls or csv, pull relevant columns to clipboard to be pasted into space model
'
' Keyboard Shortcut: Ctrl+i
'
Columns("B:E").Select
Selection.Delete Shift:=xlToLeft
Columns("C:F").Select
Selection.Delete Shift:=xlToLeft
Columns("D:I").Select
Selection.Delete Shift:=xlToLeft
Columns("E:F").Select
Selection.Delete Shift:=xlToLeft
Columns("F:H").Select
Selection.Delete Shift:=xlToLeft
Columns("G:G").Select
Selection.Delete Shift:=xlToLeft
Columns("H:I").Select
Selection.Delete Shift:=xlToLeft
Columns("I:L").Select
Selection.Delete Shift:=xlToLeft
Columns("J:J").Select
Selection.Delete Shift:=xlToLeft
Columns("A:M").Select
Range("M1").Activate
Selection.Copy
End Sub
Sub DEEPSKUCONVERSION()
'
' DEEPSKUCONVERSION Macro
'

'
Columns("D:D").Select
Selection.Copy
Columns("E:E").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Sheets("IMS").Select
ActiveWorkbook.Save
End Sub

This is what ALT+F11 allows me to retrieve.

 

[ssquirrel]

I rebuilt my macro, got it to work twice, and now it's crashing excel again.