Supprimer la boîte de dialogue lors de l'utilisation de VBA pour enregistrer une macro contenant un fichier Excel (.xlsm) en tant que non macro contenant le fichier (.xlsx)

Comment puis-je supprimer la boîte de dialogue qui dit que "les macros Visual Basic sera supprimé si vous enregistrez le fichier dans ce format. Êtes-vous sûr que vous voulez utiliser ce format?" (voir photo ci-dessous).

Essentiellement, je suis en train d'utiliser une macro pour enregistrer un .fichier xlsm comme une .xslx fichier?. J'ai essayé tous les la boîte de dialogue de suppression de code je peux le trouver, et il n'est pas de travail.

Voici mon code:

Private Sub SaveWithNoMacros()
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Application.EnableEvents = False
    ActiveWorkbook.SaveAs Filename:="Clean Workbook With No Macros.xlsx", _  
       FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    Application.EnableEvents = True
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
 End Sub

Voici le dialogue:

Supprimer la boîte de dialogue lors de l'utilisation de VBA pour enregistrer une macro contenant un fichier Excel (.xlsm) en tant que non macro contenant le fichier (.xlsx)

Comme vous pouvez l'imaginer, j'ai besoin de convertir un lot de classeurs et préférerait ne pas avoir à le faire manuellement.

-D.

Effectuez l'une des réponses, ici le travail? J'ai eu une situation similaire récemment. Il peut être OS:X gère différemment de windows pour displayalerts.
Bonne suggestion. N'avais pas pensé à la copie, les feuilles un nouveau, le nettoyage classeur et de l'épargne. C'est un peu un hack, mais je pourrais tout mettre en œuvre. Merci encore.

OriginalL'auteur D. Woods | 2013-10-11