Discussion :

[MeHo_]

Bonjour tout le monde !!!

J'ai un probleme, j y comprend rien...
J'ai une feuille avec du code VBA et tout mon code fonctionne a merveille.
Chaque année on recréé un fichier pour les commandes de materiels reçues, donc j ai fait un copier/coller de mon code dans une feuille du nouveau fichier (enfin de toute la feuille quoi).

Dans l ancien fichier "Sheets" etait en minuscule (donc sheets) et ça marchait correctement.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If (Not FeuilleExiste(ThisWorkbook, nomPharmacien)) Then
    sheets.Add.Name = nomPharmacien
    sheets(nomPharmacien).Move after:=Worksheets(Worksheets.Count)
End If

Depuis le copier/coller, il est ecrit en majuscule (Sheets) et le probleme c est qu il ne le prend pas en compte.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If (Not FeuilleExiste(ThisWorkbook, nomPharmacien)) Then
    Sheets.Add.Name = nomPharmacien
    Sheets(nomPharmacien).Move after:=Worksheets(Worksheets.Count)
End If

Il me dit une erreur 400 sans me donner d autre explication...

Merci de votre aide


ps : je précise juste que c est pas moi qui spécifie la majuscule ou non, c est VBA qui la met ou non.

[myrddin772]

Salut MeHO_

essaie de remplacer ton "sheets" par un "worksheets"...

[MeHo_]

J ai testé mais ça donne la meme erreur

[myrddin772]

essaie ce code là

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If (Not FeuilleExiste(ThisWorkbook, nomPharmacien)) Then
    Sheets.Add.Name = nomPharmacien
    Sheets(nomPharmacien).Move after:=Worksheets.Item(Worksheets.Count)
End If

[MeHo_]

Bon j ai essayé ton code, ca ne marche pas et a prioris le probleme est que mon nomPharmacien est mal initialisé... alors que comparé a l autre fichier j ai rien touché...

Bref jv faire des testes et vous redit quoi....

[myrddin772]

A vérifier sur ta variable nomPharmacien :

• Qu'elle ne dépasse pas 31 caractères
• Qu'elle n'est pas vide
• Qu'elle ne contient pas un (ou plusieurs) des caractères : / \ * ? [ ou ]

[MeHo_]

Ouep c est bon... merci pour tes derniers conseils.

En faite c etait ça le probleme, dans certaine cas nomPharmacien n etait pas renseigné a cause d un bug dans mon tri a bulle.

Now c est réglé ^_^

merci de votre aide