Déactivé la fonction vérification des erreurs par

[Temjeh]

Bonjour à tous

J'aimerais si possible déactivé la fonction vérification des erreurs par vba car après cette procédure il me met des erreur dans ma feuille.

ActiveCell = TextBox1
ActiveCell.Offset(0, 1).Value = TextBox2
ActiveCell.Offset(0, 2).Value = TextBox3
ActiveCell.Offset(0, 3).Value = TextBox4
ActiveCell.Offset(0, 5).Value = TextBox5
ActiveCell.Offset(0, 6).Value = TextBox6
ActiveCell.Offset(0, 7).Value = TextBox7
ActiveCell.Offset(0, 4).Value = ComboBox1

Si je le décoche alors il reste décocher dans tout mes classeurs!(pas pratique)
Je pensait y mettre dans workbook_open et Befor_close une code.

Merci

Temjeh

 

[CBernardT]

Bonjour Temjeh et le forum,

Essayes avec ce code :

Application.DisplayAlerts = False
ActiveCell = TextBox1
ActiveCell.Offset(0, 1).Value = TextBox2
ActiveCell.Offset(0, 2).Value = TextBox3
ActiveCell.Offset(0, 3).Value = TextBox4
ActiveCell.Offset(0, 5).Value = TextBox5
ActiveCell.Offset(0, 6).Value = TextBox6
ActiveCell.Offset(0, 7).Value = TextBox7
ActiveCell.Offset(0, 4).Value = ComboBox1
Application.DisplayAlerts = True

Cordialement

Bernard

 

[Temjeh]

Merci Bernard mais ce code:
Application.DisplayAlerts = False
Application.DisplayAlerts = True

N'enlève pas les erreurs affichées dans la feuille(petit triangle vert dans les cells en haut à droite). Pour l'instant la seule facon est de décocher l'option.

Merci quand même

Temjeh

 

[ziopizza]

Bonjour Temjeh,CBernardt,

peut étre celui ci,

Application.ErrorCheckingOptions.BackgroundChecking = True' ou False
Salut.
Yves

 

[Temjeh]

Oui merci beaucoup c'est exactement cela ...bravo!

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ErrorCheckingOptions.BackgroundChecking = True
End Sub

Private Sub Workbook_Open()
Application.ErrorCheckingOptions.BackgroundChecking = False
End Sub

A++

Temjeh