Renvoyer vers une autre feuille en fonction d'une conditions ce
Résolu/Fermé
jim81818
jim81818
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
jim81818
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
A voir également:
- Renvoyer vers une autre feuille en fonction d'une conditions ce
- Renvoyer vers une autre feuille en fonction d'une conditions ce ✓ - Forum - Excel
- Excel renvoi vers une autre feuille ✓ - Forum - Excel
- Fonction SI renvoie vers une autre fonction SI ✓ - Forum - Excel
- Extraction et renvoi vers feuille ✓ - Forum - Excel
- Word faire un renvoi vers une figure - Guide
4 réponses
ccm81
9 déc. 2017 à 17:14
- Messages postés
- 10293
- Date d'inscription
- lundi 18 octobre 2010
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
9 déc. 2017 à 17:14
Bonjour
Il faudra certainement passer par une macro
http://www.cjoint.com/c/GLjqnUR72gB
Cdlmnt
Il faudra certainement passer par une macro
http://www.cjoint.com/c/GLjqnUR72gB
Cdlmnt
via55
9 déc. 2017 à 17:28
- Messages postés
- 13603
- Date d'inscription
- mercredi 16 janvier 2013
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
9 déc. 2017 à 17:28
Bonjour
Il faut passer par une macro, exemple de macro à mettre dans le worksheet de la feuille concernée : ALT+F11 pour ouvrir l'éditeur VBA puis double clic sur le nom de la feuille dans l'arborescence, copier et coller la macro dans la page blanche, modifier la référence de la cellule de choix et le nom de la feuille à selectionner et fermer l'éditeur
Cdlmnt
Via
Il faut passer par une macro, exemple de macro à mettre dans le worksheet de la feuille concernée : ALT+F11 pour ouvrir l'éditeur VBA puis double clic sur le nom de la feuille dans l'arborescence, copier et coller la macro dans la page blanche, modifier la référence de la cellule de choix et le nom de la feuille à selectionner et fermer l'éditeur
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("B3")) Is Nothing Then 'B3 est la cellule de choix If Target.Value = "OUI" Then Sheets("Feuil1").Select 'Feuil1 est le nom de la feuille à sélectionner si OUI End If End Sub
Cdlmnt
Via
jim81818
9 déc. 2017 à 18:57
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
9 déc. 2017 à 18:57
bonjour;
j'ai bien modifié mais sa ne marche pas
merci
j'ai bien modifié mais sa ne marche pas
merci
via55
9 déc. 2017 à 19:04
- Messages postés
- 13603
- Date d'inscription
- mercredi 16 janvier 2013
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
9 déc. 2017 à 19:04
Poste un exemple de ton fichier su mon partage.fr fais créer un lien que tu copies et reviens coller ici
ccm81
Modifié le 9 déc. 2017 à 19:52
- Messages postés
- 10293
- Date d'inscription
- lundi 18 octobre 2010
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
Modifié le 9 déc. 2017 à 19:52
Option Explicit
Const celOuiNon As String = "B3"
Const fOui As String = "Feuil2"
Const celCible As String = "A1"
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range(celOuiNon)) Is Nothing Then
If Target.Value = "oui" Then
Sheets(fOui).Select
ActiveSheet.Range(celCible).Select
End If
End If
End Sub
RQ. Attention ici j'ai mis "oui" en minuscules, si dans ton fichier c'est "OUI" en majuscules, tu modifies
Cdlmnt
jim81818
9 déc. 2017 à 20:43
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
- Messages postés
- 10293
- Date d'inscription
- lundi 18 octobre 2010
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
9 déc. 2017 à 20:43
Merci beaucoup à vous, vous m'avez sauver je vous souhaite une bonne soirée
a très bientôt
a très bientôt
jim81818
9 déc. 2017 à 19:57
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
9 déc. 2017 à 19:57
Bonjour via55
c'est la même chose que ccm81 a envoyé, sauf que moi quand on sélectionne "non" je veux qu'il se passe rien, juste quand c'est "oui"
thank's
c'est la même chose que ccm81 a envoyé, sauf que moi quand on sélectionne "non" je veux qu'il se passe rien, juste quand c'est "oui"
thank's
via55
9 déc. 2017 à 20:39
- Messages postés
- 13603
- Date d'inscription
- mercredi 16 janvier 2013
- Statut
- Membre
- Dernière intervention
- 23 mai 2022
9 déc. 2017 à 20:39
C'est bien ce que fait la macro de ccm81 (que je salue amicalement au passage) ou la mienne mais tu n'as pas du l'adapter correctement à ton fichier, c'est pour cela que je te demandais ton fichier, sans le voir on ne peut pas dire ce qui cloche
jim81818
9 déc. 2017 à 20:45
- Messages postés
- 28
- Date d'inscription
- jeudi 7 décembre 2017
- Statut
- Membre
- Dernière intervention
- 17 décembre 2017
9 déc. 2017 à 20:45
mon probléme c'etait ma liste déroulante, j'ai du la supprimer et la recréer pour que sa marche
merci infiniment a vous deux
merci infiniment a vous deux
9 déc. 2017 à 18:39
c'est bien ca que je veux mais moi je veux juste que c'est (oui) il sélectionne la feuille 1 et si c'est (non) il fait rien
peux tu me dire comment modifier le programme car je suis pas vraiment futé en programmation