Just use this:
With Application.ErrorCheckingOptions .BackgroundChecking = False .EvaluateToError = False .TextDate = False .NumberAsText = False .InconsistentFormula = False .OmittedCells = False .UnlockedFormulaCells = False .ListDataValidation = False End With
If you use the code above, it disables this future forever for all excel documents.
But if you want to do this only for your excel document (not for everyone), do the following:
'''''''''''''''' IN A MODULE ''''''''''''''''''' Public AE_BackgroundChecking As Boolean Public AE_EvaluateToError As Boolean Public AE_TextDate As Boolean Public AE_NumberAsText As Boolean Public AE_InconsistentFormula As Boolean Public AE_OmittedCells As Boolean Public AE_UnlockedFormulaCells As Boolean Public AE_ListDataValidation As Boolean Public AE_EmptyCellReferences As Boolean '''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''' IN WORKBOOK OPEN EVENT ''''''''''''' AE_BackgroundChecking = Application.ErrorCheckingOptions.BackgroundChecking AE_EvaluateToError = Application.ErrorCheckingOptions.EvaluateToError AE_TextDate = Application.ErrorCheckingOptions.TextDate AE_NumberAsText = Application.ErrorCheckingOptions.NumberAsText AE_InconsistentFormula = Application.ErrorCheckingOptions.InconsistentFormula AE_OmittedCells = Application.ErrorCheckingOptions.OmittedCells AE_UnlockedFormulaCells = Application.ErrorCheckingOptions.UnlockedFormulaCells AE_ListDataValidation = Application.ErrorCheckingOptions.ListDataValidation AE_EmptyCellReferences = Application.ErrorCheckingOptions.EmptyCellReferences With Application.ErrorCheckingOptions .BackgroundChecking = False .EvaluateToError = False .TextDate = False .NumberAsText = False .InconsistentFormula = False .OmittedCells = False .UnlockedFormulaCells = False .ListDataValidation = False .EmptyCellReferences = False End With '''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''' IN WORKBOOK CLOSE EVENT ''''''''''''' Application.ErrorCheckingOptions.BackgroundChecking = AE_BackgroundChecking Application.ErrorCheckingOptions.EvaluateToError = AE_EvaluateToError Application.ErrorCheckingOptions.TextDate = AE_TextDate Application.ErrorCheckingOptions.NumberAsText = AE_NumberAsText Application.ErrorCheckingOptions.InconsistentFormula = AE_InconsistentFormula Application.ErrorCheckingOptions.OmittedCells = AE_OmittedCells Application.ErrorCheckingOptions.UnlockedFormulaCells = AE_UnlockedFormulaCells Application.ErrorCheckingOptions.ListDataValidation = AE_ListDataValidation Application.ErrorCheckingOptions.EmptyCellReferences = AE_EmptyCellReferences '''''''''''''''''''''''''''''''''''''''''''''''''''''''
Mahdi jazini
source share