QUAND "Sheets(str).Copy after:=Sheets(Sheets.Count) " refuse de s'effectuer...

Au secours,

J'ai un programme VBA qui marchait jusqu'à hier.

Maintenant quand je le lance le sablier s'afficha mais à la fin pas de resultat.

J'ai essayé de déboguer quand j'entre dans un procédure voir plus bas:

           MsgBox "Je suis avant"
           Sheets(str).Copy after:=Sheets(Sheets.Count)
           MsgBox "Je suis après"

Il m'affiche bien "je suis avant"  MAIS PAS  "je suis après". Il me semble donc que l'instruction
Sheets(str).Copy after:=Sheets(Sheets.Count) n'est pas effectuée...

Que faire ? Aidez moi svp...

salut je pense que cela doit marcher
 dim p as integer 
dim str as string 
str = "nomfeuille"      
MsgBox "Je suis avant"
p = Worksheets.Count
Sheets(str).Copy after:=Worksheets(p)
           MsgBox "Je suis après"

 Drikce 06

Merci pour ta reponse. En fait j'y ai pensé pour ca ya pas de pb,

les variables sont définies comme il faut,

je voulais juste savoir s'il n'ya pas de compasant particuliers à télécharger genre .dll

non normalement sa fonctionne telquel

 Drikce 06

rien a charger...
vérifie le nom de ta feuille, et désactive toute éventuelle gestion d'erreur (On error ...)



Renfield
Admin CodeS-SourceS - MVP Visual Basic