Résultat de recherche
Résolu/Fermé
Marlj
Messages postés
58
Date d'inscription
mercredi 29 juin 2011
Statut
Membre
Dernière intervention
12 mars 2020
-
19 mars 2015 à 20:01
marlj - 23 mars 2015 à 19:07
marlj - 23 mars 2015 à 19:07
A voir également:
- Résultat de recherche
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Lexer resultat - Télécharger - Sport
- Resultat foot - Télécharger - Vie quotidienne
- Résultat loto bulgarie autriche azerbaïdjan ✓ - Forum Loisirs / Divertissements
- Recherche adresse - Guide
1 réponse
via55
Messages postés
14502
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
9 décembre 2024
2 736
19 mars 2015 à 21:26
19 mars 2015 à 21:26
Bonsoir
Une possibilité avec une simple fonction personnalisée à condition que la feuille Commande soit la 1ere du classeur et les feuilles semaines les 2eme et suivantes
Une fois la fonction mise dans un module de l'éditeur VBA, dans la feuille Commande, avec le n° en colonne A, si tu veux en colonne F2 par exemple les noms des feuilles contenant la commande en A2 il suffit de mettre la formule =onglets(A2)
Si les semaines suivantes la commande A2 est encore servie, il faudra réactualiser la formule en F2 pour mettre à jour
Cdlmnt
Une possibilité avec une simple fonction personnalisée à condition que la feuille Commande soit la 1ere du classeur et les feuilles semaines les 2eme et suivantes
Function onglets(plage As Range) com = plage.Value For n = 2 To Sheets.Count If Application.WorksheetFunction.CountIf(Sheets(n).Range("A:A"), com) > 0 Then retour = retour & Sheets(n).Name & ", " End If Next onglets = retour End Function
Une fois la fonction mise dans un module de l'éditeur VBA, dans la feuille Commande, avec le n° en colonne A, si tu veux en colonne F2 par exemple les noms des feuilles contenant la commande en A2 il suffit de mettre la formule =onglets(A2)
Si les semaines suivantes la commande A2 est encore servie, il faudra réactualiser la formule en F2 pour mettre à jour
Cdlmnt
23 mars 2015 à 19:07