Stopping Message boxes

[dukeofscouts]

I have to macros that I use very often, both of these codes cause excel to display message boxes to be displayed. One is from a SAVE command, the other from a copy/paste command structure.

I presume there is a way to turn these messages off, or write into the VBA to trick excel into thinking that I clicked "OK". Could you please give me some insight?

Thank you in advance,
D.O.S.

 

[Tom Urtis]

Could you please give me some insight?

Sure...but first can you please give us some code?

If you post your code, you can get a response suggestion germane to your existing situation. Not clear if you are using a BeforeSave event, or change events, or independent macros, or what.

 

[Smitty]

I agree with Tom that you need to post some code, but one thing you can use is:

Application.DisplayAlerts = False

at the beginning of your code (remembering to set it back to True at the end, because Excel won't).

Note that will suppress all messages, hence Tom's request to see your code.

HTH,

 

[dukeofscouts]

1)
...
chdir "C:\users\user\documents\homefiles"
Activeworkbook.saveas Filename:= _
"c:\users\user\documents\home files\Planning.xlsm", fileformat:= _
xlopenxmlworkbookmacroenabled, createbackup:=False
...

2)
range("b31:ab57").select
selection.copy
range("b2:d4").select
selection.PasteSpecial Paste: xlPastevalues, operation:=xlnone, skipblanks _
:=False, Transpose:= False

 

[dukeofscouts]

Thank You Smitty, just test that code out, works exactly as I had hoped.

 

[Smitty]

Note that you can lose the chdir part - It doesn't do anything in your case, and you can eliminate the select statements:

Range("B31:AB57").Copy
    Range("B2").PasteSpecial xlPasteValues