Remove Entire subtotal row will be deleted

[Guest]

Hi I have been using a script that removes subtotals from worksheets, then
updates data, then adds in subotal again. It had been working. I then updated
the macro script as I required extra columns in for the subtotalling. now I
receive the message "Entire subtotal row will be deleted." is there a way of
supressing this message so the macro script will run without monitoring?
Many THanks in advance for any help. Noel

 

[Guest]

Any chance you could post the code?

 

[Guest]

Hi
code is
Range("A1").Select 'Start of Sheet
ActiveSheet.Outline.ShowLevels RowLevels:=2 'compress
ActiveCell.Offset(12, 0).Range("A1").Select 'moves to the first cell
of the subtotal list
Selection.End(xlDown).Select 'moves to the end of the list
Selection.RemoveSubtotal 'removes the subtotal
Range("a1").Select



I have noticed that in other files I do not have this error. So now I'm
think it might be an tool-->options setting

 

[Guest]

Hi

I used the good old "displayalerts" code to stop the message.

Thanks for your help.
Noel