sélectionner une feuille par son nom

[pjacq]

Bonjour à tous..

Je travaille sur un classeur avec une feuille pour chaque mois ( 801 à 812, puis 901 à 910.. ) et je voudrais pouvoir récupérer mois par mois une donnée bien précise.

Je comptais donc utiliser une variable que j'incrémente à chaque boucle pour appeler la feuille correspondante.

Pouvez vous m'aider svp?

Merci d'avance

 

[Guest]

Re : sélectionner une feuille par son nom

Bonjour,

sheets("8" & format(i,"00"))

Où i va de 1 à 12
A+

 

[pierrejean]

Re : sélectionner une feuille par son nom

bonjour pjacq

et bienvenue sur XLD

quelque chose comme

For n = 1 To 12
 nomfeuille = "8" & Format(n, "00")
 Sheets(nomfeuille).Select
 .....
Next n

Edit : Salut hasco 🙂🙂
toujours un plaisir de te croiser

 

[pjacq]

Re : sélectionner une feuille par son nom

Merci beaucoup..

Quelle rapidité !!

Je vais devenir un peu plus gourmand...

Au début de ma requete...j'aimerais ouvrir une boite de dialogue pour demander
- à partir de quel mois je veux travailler.
- un champ particulier à rechercher

( le but de la requete étant de chercher ce fameux champ dans les différents mois et de reporter ( par mois ) quelques infos associées à ce champ.. )

Merci encore pour vos précieuses informations.

 

[pjacq]

Re : sélectionner une feuille par son nom

Et pour finir de poser mon problème, pour chaque feuille ( donc mois ), je souhaite faire une recherche suivant le champ renseigné dans ma boite de dialogue, et d'extraire des données pour les mettre dans un autre classeur ( déjà créé en début de macro ).

Cela donnerait ( même si cela ne marche pas ) :

For n = 1 To 12
mois = "8" & Format(n, "00")
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(R3C2,'[Barème .xls]mois'!R5C2:R100C16,10,FALSE)
.....
Next n

Une valeur numérique marche dans la formule, mais pas la variable "mois"

Merci d'avance pour votre aide

 

[pierrejean]

Re : sélectionner une feuille par son nom

Re
La fonction VLOOKUP ne te donnera qu'un seul resultat
Il serait plus judicieux de regarder du coté de Find et FindNext
Mais pour etre a l'aise il serait bon d'avoir une copie de ton fichier avec le minimum pour etudier le probleme (et sans données confidentielles bien entendu !!)

 

[pjacq]

Re : sélectionner une feuille par son nom

Voici ci joint ce que je cherche à obtenir...

Merci d'avance

 

[pierrejean]

Re : sélectionner une feuille par son nom

Re

Vois si cela te convient

 

[pjacq]

Re : sélectionner une feuille par son nom

C'est beau la maitrise !!!! Merci !!

Si j'ai bien compris, tu contournes le pb du nom de la feuille en utilisant son index...j'y avais pensé mais je m'étais dit qu'il faudrait alors éviter d'insérer des feuilles au milieu....
Mais no pb ca me va bien....

As tu considéré le fait que je veuille positionner le mois de départ de l'étude...
en gros commencer au 903..ou même sur un mois de l'année dernière....

Autre chose... est il possible dans ta liste de choix de faire apparaitre un champ vide...histoire de ne pas afficher de prix...??

Je vais essayer de comprendre un peu plus tes macros....

Merci encore

 

[pjacq]

Re : sélectionner une feuille par son nom

Petite question de compréhension...

A quoi sert la partie suivante :

If Left(Sheets(n).Name, 1) = "9" Then
For m = 10 To Sheets(n).Range("A65536").End(xlUp).Row
On Error Resume Next
coll.Add Sheets(n).Range("A" & m), CStr(Sheets(n).Range("A" & m))
On Error GoTo 0
Next m
End If

Merci d'avance

 

[pierrejean]

Re : sélectionner une feuille par son nom

Re

non je n'avais pas considéré un de debut mois parcequ'il n'apparaissait pas dans ta demande

Le voici (avec aussi un mois de fin)
Il y a egalement un vide dans la validation du nom de produit
Tu peux ajouter des feuilles mois pourvu que la formation du nom soit toujours la même .Il est preferable qu'elles soient classées dans l'ordre mais ce n'est pas obligatoire
tu peux egalement ajouter des produits dans toutes ou certaines feuilles
C'est le retour vers la feuille Feuil2 qui met a jour les listes de validation

reponse a ta question:
Il s'agit de faire une liste complete de tous les produits qui apparaissent dans tes feuilles

 

[pjacq]

Re : sélectionner une feuille par son nom

Merci pour ton aide...

Comment fonctionne la macro pour la génération de la liste?
A l'ouverture du fichier?
Je n'arrive qu'à la lancer pas à pas...et vu la taille des données à regarder, ce n'est plus tout à fait aussi rapide que le fichier partagé..

Merci d'avance

 

[pierrejean]

Re : sélectionner une feuille par son nom

Re

La liste est créee a l'activation de la Feuil2
Il est certain que si elle est tres longue il peut y avoir interet a ne la mettre a jour que sur demande
J'ai essayé de mettre un bouton pour la declencher mais tres curieusement dans ce cas il y a un bug sur la mise en place de la validation
je te propose donc de ne faire la mise a jour que par l'excution manuelle de la sub liste
par ailleurs je cherche l'explication de ce bug

 

[pjacq]

Re : sélectionner une feuille par son nom

Merci encore...

J'ai bien avancé aujourd'hui et j'ai même eu un moment où cela a marché nickel...
J'ai voulu être perfectionniste, car lorsque je choisissais de ne rien mettre comme produit, le tableau me renvoyait quand meme des infos. J'ai donc ajouté un test sur cette cellule produit..et hop plus perturbations...

J'étais content de moi...mais lorsque j'ai voulu remodifier les dates, je n'ai plus accès à une liste defilante, mais plutot à une chaine de caractère correspondant aux valeurs de la variable mliste....
J'ai repris vos textes marco, et toujours le meme resultat...

Avez vous une idée de ce qui cloche?
Merci d'avance

 

[pierrejean]

Re : sélectionner une feuille par son nom

Re

Sans le fichier ,difficile a dire

Pour le bouton et grace a youki(Bj) voila la bonne version
(il s'agissait de modifier la valeur TakeFocusOnClick de true a False)
j'ai modifié pour que les noms des mois n'apparaissent plus si C10 est vide