Sheets or sheets : telle est la question ?

Version imprimable

16/01/2008, 10h38
MeHo_

Sheets or sheets : telle est la question ?
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:

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:

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.:roll:
16/01/2008, 10h46
myrddin772

Salut MeHO_

essaie de remplacer ton "sheets" par un "worksheets"...
16/01/2008, 10h47
MeHo_

J ai testé mais ça donne la meme erreur :(

essaie ce code là

Code:

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

16/01/2008, 11h04
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....
16/01/2008, 11h23
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 ]
16/01/2008, 11h50
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