Bonjour à tous,

j'ai un probleme à propos d'un On Error Goto avec ce code suivant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Application.DisplayAlerts = False
Application.EnableEvents = False
 
For Each Nm In nclasseur.Names
 
 
         On Error GoTo erreur1
        If classeur.Worksheets("DT CC").Range(Nm.Name).HasFormula = True Then
        Else:
        classeur.Worksheets("Feuil1").Range(Nm.Name).Value = nclasseur.Worksheets("Feuil1").Range(Nm.Name).Value
 
        End If
 
erreur1:
 
Next Nm
 
Application.EnableEvents = True
Application.DisplayAlerts = True
En gros je voudrais que lorsque il y a une erreur dans le If ou dans le Else, ca ne fasse rien et que ca passe au Nm suivant pour finir la boucle.

J'utilise pour la premieère fois un On error goto donc je dois surement mal l'utiliser. Par exemple faut-il le déclarer dans les variables?

Merci de votre aide toujours aussi précieuse.

Tioch