I'm using the following VBA code to automate moving a row on one sheet to another. About 1/3 of the time, it gives a "run-time error '-2147417848 (80010108)" and then crashes Excel. I cannot find a common reason why. After a crash, I can execute the same code on the same row, and it may or may not work fine the next time.
Can anyone tell why this code below should be unstable?
Sub Move_to_Sheet2 () ' ' Move_to_Sheet2 Macro ' ' Keyboard Shortcut: Ctrl+r ' Rows(ActiveCell.Row).Select Selection.Copy Set Rng = Nothing Sheets("Sheet2").Select Rows("4:4").Select Selection.Insert Shift:=xlDown Sheets("Sheet1").Select Selection.Delete Shift:=xlUp ActiveWorkbook.save End Sub