Excel : correspondance entre deux cases
Résolu/Fermé
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
-
9 févr. 2010 à 10:56
Farfadet88 Messages postés 6293 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 - 9 févr. 2010 à 11:58
Farfadet88 Messages postés 6293 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 - 9 févr. 2010 à 11:58
A voir également:
- Excel : correspondance entre deux cases
- Liste déroulante excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Word et excel gratuit - Guide
- Mise en forme conditionnelle excel - Guide
8 réponses
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
9 févr. 2010 à 11:45
9 févr. 2010 à 11:45
Petit souci de serveur. Je n'arrive pas à mettre le fichier sur cijoint.
Suis mes instructions:
appuyes simultanément sur alt+F11
Visual basic s'ouvre
double clique sur thisworkbook a gauche dans l'onglet "projet"
dans la fenêtre qui s'ouvre, colle la macro suivante:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = 1 Then Target.Value = Sheets("liste").Range("b1").Value
If Target.Value = 2 Then Target.Value = Sheets("liste").Range("b2").Value
If Target.Value = 5 Then Target.Value = Sheets("liste").Range("b3").Value
If Target.Value = 20 Then Target.Value = Sheets("liste").Range("b4").Value
If Target.Value = 60 Then Target.Value = Sheets("liste").Range("b5").Value
End Sub
Ferme VBA
Normalement ça marche
Suis mes instructions:
appuyes simultanément sur alt+F11
Visual basic s'ouvre
double clique sur thisworkbook a gauche dans l'onglet "projet"
dans la fenêtre qui s'ouvre, colle la macro suivante:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = 1 Then Target.Value = Sheets("liste").Range("b1").Value
If Target.Value = 2 Then Target.Value = Sheets("liste").Range("b2").Value
If Target.Value = 5 Then Target.Value = Sheets("liste").Range("b3").Value
If Target.Value = 20 Then Target.Value = Sheets("liste").Range("b4").Value
If Target.Value = 60 Then Target.Value = Sheets("liste").Range("b5").Value
End Sub
Ferme VBA
Normalement ça marche
Doudou95
Messages postés
1561
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
30 avril 2019
275
9 févr. 2010 à 11:04
9 févr. 2010 à 11:04
Tu veux ça à une colonne en particulier?
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
9 févr. 2010 à 11:06
9 févr. 2010 à 11:06
Merci beaucoup pour ta réponse,
Euh, sur une autre feuille je veux la liste de
1. Vacances
2. Congé
3. Cours
...
Et sur une autre feuille c'est où je remplirai en mettant que 1, 2, 3,... et ca me marquera ce que c'est.
Euh, sur une autre feuille je veux la liste de
1. Vacances
2. Congé
3. Cours
...
Et sur une autre feuille c'est où je remplirai en mettant que 1, 2, 3,... et ca me marquera ce que c'est.
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
9 févr. 2010 à 11:20
9 févr. 2010 à 11:20
Ca marquera ce que c'est où?
Doudou95
Messages postés
1561
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
30 avril 2019
275
9 févr. 2010 à 11:18
9 févr. 2010 à 11:18
j'ai un peu de jcontinue d'essayer d'voir après miam
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
9 févr. 2010 à 11:19
9 févr. 2010 à 11:19
Ok c'est genti, ça doit pas etre impossible quand même, j'en ai vraiment besoin de savoir ça, c'est pour le travail.. et je trouve rien sur le net..
Bon appetit =)
Bon appetit =)
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
9 févr. 2010 à 11:20
9 févr. 2010 à 11:20
Il va falloir fonctionner par macro VBA
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
>
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
9 févr. 2010 à 11:21
9 févr. 2010 à 11:21
Mais on fait comment?
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
>
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
9 févr. 2010 à 11:25
9 févr. 2010 à 11:25
Alors la voilà.
Copie tout ce qui est en gras
appuye sur alt+F11 (Visual basic s'ouvre)
Double clique sur thisworkbook dans l'aonglet de gauche
Colle la macro dans la feuille qui s'ouvre
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = 1 Then Target.Value = sheets ("feuil1").range ("a1").value
If Target.Value = 2 Then Target.Value = sheets ("feuil1").range ("a2").value
If Target.Value =3 Then Target.Value = sheets ("feuil1").range ("a2").value
End Sub
A la place de a1 tu mets la case ou se trouve vacances, a la place de a2, la case ou se trouve etc etc
Copie tout ce qui est en gras
appuye sur alt+F11 (Visual basic s'ouvre)
Double clique sur thisworkbook dans l'aonglet de gauche
Colle la macro dans la feuille qui s'ouvre
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = 1 Then Target.Value = sheets ("feuil1").range ("a1").value
If Target.Value = 2 Then Target.Value = sheets ("feuil1").range ("a2").value
If Target.Value =3 Then Target.Value = sheets ("feuil1").range ("a2").value
End Sub
A la place de a1 tu mets la case ou se trouve vacances, a la place de a2, la case ou se trouve etc etc
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
>
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
9 févr. 2010 à 11:30
9 févr. 2010 à 11:30
Euh, j'ai collé ce code, mais après je dois noté ou ma liste ? sur quelle feuille ?
Moi je voudrai par exemple :
Feuille 1
Collonne a : la liste des numéros (car ils ne se suivent pas)
Collonne b : la description
Feuille 2
J'aurai un tableau où je devrai insérer les chiffres et ça me marquera la description.
Moi je voudrai par exemple :
Feuille 1
Collonne a : la liste des numéros (car ils ne se suivent pas)
Collonne b : la description
Feuille 2
J'aurai un tableau où je devrai insérer les chiffres et ça me marquera la description.
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
>
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
9 févr. 2010 à 11:32
9 févr. 2010 à 11:32
Dans ce cas le code sera différent.
Je te propose de faire tout ton tableau, de me le faire passer sur cijoint.fr en format excel 2003 et je te le renvoie après avoir créé la macro
Je te propose de faire tout ton tableau, de me le faire passer sur cijoint.fr en format excel 2003 et je te le renvoie après avoir créé la macro
Doudou95
Messages postés
1561
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
30 avril 2019
275
9 févr. 2010 à 11:22
9 févr. 2010 à 11:22
c'est ce que je crains je peux aider par le VB mais en formule je voulais passer par mise en forme conditionnelle mais on ne peut pas entre deux pages
wkaimissy
Messages postés
49
Date d'inscription
dimanche 30 novembre 2008
Statut
Membre
Dernière intervention
15 février 2011
9 févr. 2010 à 11:24
9 févr. 2010 à 11:24
Aidez moi s'il vous plait. Je ne m'y connais vraiment rien en tout ça, alala
Doudou95
Messages postés
1561
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
30 avril 2019
275
9 févr. 2010 à 11:46
9 févr. 2010 à 11:46
Ca fait ça pour tout le classeur?
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
9 févr. 2010 à 11:47
9 févr. 2010 à 11:47
oui
Doudou95
Messages postés
1561
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
30 avril 2019
275
9 févr. 2010 à 11:48
9 févr. 2010 à 11:48
Cool bg jconnaissais pas thx au passage
9 févr. 2010 à 11:50
Mais,
Si je veux rajouter des choses dans la liste ça marche pas.. j'ai essayer de rajouter 1 ça marche pas =(
9 févr. 2010 à 11:51
9 févr. 2010 à 11:52
ajoute une ligne
If Target.Value = 60 Then Target.Value = Sheets("liste").Range("b5").Value
à la place de 60 met la valeur que tu désires rentrer
à la place de b5 mets la case dans laquelle se trouve la valeur à afficher
9 févr. 2010 à 11:52
Merci encore.
Salutations et à bientot
9 févr. 2010 à 11:56