Bonjour,

Voila j'ai un petit problème que je n'arrive pas à résoudre car il est aléatoire.

Je m'explique: j'ai un code qui me fait un tas de calcul de stats en cascade.
Quand je le lance certaine fois j'ai un message d'erreur:

"erreur 1004: temps d'exécution, erreur sur la méthode '_CodeName' de l'objet 'WorkSheet' "

Voila le code ou se produit l'erreur:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Public Sub BoucleSem()
'creer une feuille pour le graf sem
    Dim Feuille As Worksheet
 
    wbkPN.Worksheets.Add before:=Worksheets(3)
    ActiveSheet.Name = "Graf Sem"
 
    Set Feuille = wbkPN.Worksheets("Graf Sem")
    Feuille.[_CodeName] = "shtGrafSem"
 
End Sub

Avez vous une idée du problème? Pourquoi ca ne le fait pas tout le temps?

Merci de votre aide.