VBA pour compter les onglets
Bonjour à tous et encore merci pour l'aide que vous apportez à des néophytes comme moi,
Encore une fois je fais appel à vous car j'ai un problème avec un code, dans le fichier joint j'ai insérer un code pour compter les onglets et les lister sur la1ère feuille, quand je clique, ça m'affiche bien la liste mais ça me met une erreur au lieu du nombre de feuille.
Par ailleurs serait-il possible de copier la fiche vierge dès qu'elle est ouverte.
Merci d'avance..
Cordialement.
Bougnasse.
PS: J'ai oublié de préciser j'utilise excel 2013 à la maison et 2003 au travail
Bonjour,
l'on peu voir ton code ?
Bonsoir,
j'ai fait une erreur, je croyais qu'il était dans le fichier joint mais je me suis tromper de fichier je remet le bon.
Bonsoir,
Mauvaise utilisation des différents modules...
Il faut prendre l'habitude de mettre les procédures standard dans un module standard, et réserver les modules d'objets (feuilles, classeur...) aux évènementielles. Une procédures autre qu'évènementielle peut fort bien figurer dans un tel module : c'est justifié si elle n'est utilisée que par des procédures dudit module...
AutoOpen est à remplacer par l'évènementielle Workbook_Open (là dans ThisWorkbook).
De même tes évènementielles identiques dans chaque feuille, sont à supprimer et remplacer par une seule dans ThisWorkbook qui fera la même chose...
NB- Et si tu indentais correctement ton code, ce serait de nature à m'inciter à faire les corrections
Cordialement.
Déjà abandonné !
Pas trop volumineux, revoilà ton fichier toiletté...
Converti en .xlsm : sa taille diminue tout de suite de moitié.
Les macros sont concentrées dans Module1, ThisWorkbook et la feuille __Liste.
(au fait les espaces en début de nom, c'est juste ce qu'il faut pour se générer des erreurs à répétition... (j'ai mis des caractères visibles !)
La fonction fonctionne, et peut fonctionner n'importe où dans ton classeur.
J'ai fusionné la constitution de la liste des feuilles et leur tri dans le classeur, en changeant un tout petit peu les méthodes. La procédure est lancée par ton bouton sur la feuille __Liste.
J'ai ajouté un déplacement automatique vers les feuilles à partir de la liste dans __Liste : la sélection d'un nom dans la liste conduit à la feuille...
Et comme il faut pouvoir revenir : en se positionnant sur la cellule A1 dans toutes les autres feuilles, on revient sur __Liste (moyen simple sans ajouter quoi que ce soit).
La liste est nommée : LstF
Tu sais tout !
Bonsoir,
Non je n'ai pas abandonné, mais malade passé la journée au lit sous la couette.
je te remercie pour ton aide, mais dans l'état où je suis je n'ai pas du tout envie de regarder ça maintenant.
Dès que je vais mieux je jette un œil et recontacte sur le site si il ya un problème.
Merci encore et à bientôt.
Bougnasse.
Ok ! Rétablis-toi au mieux... Bonne journée.