Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1
dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et
lui demande de saisir un mot
Je veux que la mot saisie aille se copier dans la colonne A dans la
ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre,
l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer
dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que
l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Cordialement.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uxdwmLFPGHA.1132@TK2MSFTNGP10.phx.gbl...
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans
une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui
demande de saisir un mot
Je veux que la mot saisie aille se copier dans la colonne A dans la ligne
correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre,
l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans
la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que
l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Sou PULL
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Merci pour cette réponse Daniel.
Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle
cellules doit activer la demande InputBox soit dans mon cas la présence
du chiffre 1 en colonne Q ?
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Daniel
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Chaque fois que tu saisis quelque chose dans une cellule, la macro se
déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien
ne s'exécute.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
%23cg1WjFPGHA.2320@TK2MSFTNGP11.phx.gbl...
Merci pour cette réponse Daniel.
Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules
doit activer la demande InputBox soit dans mon cas la présence du chiffre
1 en colonne Q ?
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Sou PULL
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire
et du coup il faut que passe en colonne 18 maintenant donc tout est OK
Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est
possible de faire apparaître à la place de la InputBox une liste où
l'utilisateur aurait juste à cliquer sur le nom puis à valider pour
qu'il se produise le même effet, à savoir la copie du texte ainsi
sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se
déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien
ne s'exécute.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
%23cg1WjFPGHA.2320@TK2MSFTNGP11.phx.gbl...
Merci pour cette réponse Daniel.
Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules
doit activer la demande InputBox soit dans mon cas la présence du chiffre
1 en colonne Q ?
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Daniel
Regarde le classeur : http://cjoint.com/?dbpgFuNqCq Daniel "Sou PULL" a écrit dans le message de news:
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Regarde le classeur :
http://cjoint.com/?dbpgFuNqCq
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
O6SxpUTPGHA.2924@TK2MSFTNGP11.phx.gbl...
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire
et du coup il faut que passe en colonne 18 maintenant donc tout est OK
Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est
possible de faire apparaître à la place de la InputBox une liste où
l'utilisateur aurait juste à cliquer sur le nom puis à valider pour
qu'il se produise le même effet, à savoir la copie du texte ainsi
sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se
déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17),
rien ne s'exécute.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
%23cg1WjFPGHA.2320@TK2MSFTNGP11.phx.gbl...
Merci pour cette réponse Daniel.
Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle
cellules doit activer la demande InputBox soit dans mon cas la présence
du chiffre 1 en colonne Q ?
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Regarde le classeur : http://cjoint.com/?dbpgFuNqCq Daniel "Sou PULL" a écrit dans le message de news:
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Sou PULL
Parfait Daniel, c'est excatement ce que je voulais !!! Une dernière question, est-il possible d'apporter les deux améliorations suivante :
- Conditionner l'apparition de la fenêtre à la saisie d'un chiffre spécifique (dans mon cas le chiffre 5
-Une fois le texte cliqué dans la Listbox, demander une validation [OK] ou [Annuler] avec un message genre "textechoisi" engendre une seconde question "etes vous sur ?"
Merci d'avance
Soupull.
Regarde le classeur : http://cjoint.com/?dbpgFuNqCq Daniel "Sou PULL" a écrit dans le message de news:
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Parfait Daniel, c'est excatement ce que je voulais !!! Une dernière
question, est-il possible d'apporter les deux améliorations suivante :
- Conditionner l'apparition de la fenêtre à la saisie d'un chiffre
spécifique (dans mon cas le chiffre 5
-Une fois le texte cliqué dans la Listbox, demander une validation [OK]
ou [Annuler] avec un message genre "textechoisi" engendre une seconde
question "etes vous sur ?"
Merci d'avance
Soupull.
Regarde le classeur :
http://cjoint.com/?dbpgFuNqCq
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
O6SxpUTPGHA.2924@TK2MSFTNGP11.phx.gbl...
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire
et du coup il faut que passe en colonne 18 maintenant donc tout est OK
Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est
possible de faire apparaître à la place de la InputBox une liste où
l'utilisateur aurait juste à cliquer sur le nom puis à valider pour
qu'il se produise le même effet, à savoir la copie du texte ainsi
sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se
déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17),
rien ne s'exécute.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
%23cg1WjFPGHA.2320@TK2MSFTNGP11.phx.gbl...
Merci pour cette réponse Daniel.
Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle
cellules doit activer la demande InputBox soit dans mon cas la présence
du chiffre 1 en colonne Q ?
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Parfait Daniel, c'est excatement ce que je voulais !!! Une dernière question, est-il possible d'apporter les deux améliorations suivante :
- Conditionner l'apparition de la fenêtre à la saisie d'un chiffre spécifique (dans mon cas le chiffre 5
-Une fois le texte cliqué dans la Listbox, demander une validation [OK] ou [Annuler] avec un message genre "textechoisi" engendre une seconde question "etes vous sur ?"
Merci d'avance
Soupull.
Regarde le classeur : http://cjoint.com/?dbpgFuNqCq Daniel "Sou PULL" a écrit dans le message de news:
Merci beaucoup Daniel, en effet, j'ai inséré une colonne supplémentaire et du coup il faut que passe en colonne 18 maintenant donc tout est OK Milles Merci.
Pendant que j'y suis, maintenant que cela marche, est-ce qu'il est possible de faire apparaître à la place de la InputBox une liste où l'utilisateur aurait juste à cliquer sur le nom puis à valider pour qu'il se produise le même effet, à savoir la copie du texte ainsi sélectionné dans la colonne A
Merci
Soupull
Chaque fois que tu saisis quelque chose dans une cellule, la macro se déclenche. Si la cellule modifiée n'est pas en colonne Q (colonne 17), rien ne s'exécute. Daniel "Sou PULL" a écrit dans le message de news: %
Merci pour cette réponse Daniel. Comment dois-je "paramétrer" ce code ? Où indiquer à Excel quelle cellules doit activer la demande InputBox soit dans mon cas la présence du chiffre 1 en colonne Q ?
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Sou PULL
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même
feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion
de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la
première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range)
If Target.Column <> 19 Then Exit Sub
UserForm1.show
Range("B" & Target.Row) = Var
UserForm2.show
If Target.Column <> 24 Then Exit Sub
Range("A" & Target.Row) = Var
End Sub
Soupull
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Cordialement.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uxdwmLFPGHA.1132@TK2MSFTNGP10.phx.gbl...
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans
une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui
demande de saisir un mot
Je veux que la mot saisie aille se copier dans la colonne A dans la ligne
correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre,
l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans
la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que
l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Daniel
Regarde le classeur : http://cjoint.com/?dbwj0vemm6 Daniel "Sou PULL" a écrit dans le message de news:
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Regarde le classeur :
http://cjoint.com/?dbwj0vemm6
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uZDoByUPGHA.3896@TK2MSFTNGP15.phx.gbl...
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même
feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de
la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la
première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range)
If Target.Column <> 19 Then Exit Sub
UserForm1.show
Range("B" & Target.Row) = Var
UserForm2.show
If Target.Column <> 24 Then Exit Sub
Range("A" & Target.Row) = Var
End Sub
Soupull
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Cordialement.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uxdwmLFPGHA.1132@TK2MSFTNGP10.phx.gbl...
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1
dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et
lui demande de saisir un mot
Je veux que la mot saisie aille se copier dans la colonne A dans la
ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre,
l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer
dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que
l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Regarde le classeur : http://cjoint.com/?dbwj0vemm6 Daniel "Sou PULL" a écrit dans le message de news:
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Sou PULL
Daniel, je n'ai qu'une chose à dire....Tu es un Saint !!! Merci beaucoup pour ce dernier exemple qui va beaucoup m'aider dans la mise en place de mon travail !!!
Cordialement
Soupull
Regarde le classeur : http://cjoint.com/?dbwj0vemm6 Daniel "Sou PULL" a écrit dans le message de news:
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Merci d'avance...
Soupull
Daniel, je n'ai qu'une chose à dire....Tu es un Saint !!!
Merci beaucoup pour ce dernier exemple qui va beaucoup m'aider dans la
mise en place de mon travail !!!
Cordialement
Soupull
Regarde le classeur :
http://cjoint.com/?dbwj0vemm6
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uZDoByUPGHA.3896@TK2MSFTNGP15.phx.gbl...
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même
feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de
la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la
première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range)
If Target.Column <> 19 Then Exit Sub
UserForm1.show
Range("B" & Target.Row) = Var
UserForm2.show
If Target.Column <> 24 Then Exit Sub
Range("A" & Target.Row) = Var
End Sub
Soupull
Bonjour.
Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 17 Then Exit Sub
Range("A" & Target.Row) = InputBox("Entrez un mot")
End Sub
Cordialement.
Daniel
"Sou PULL" <soupull@wanadoo.fr> a écrit dans le message de news:
uxdwmLFPGHA.1132@TK2MSFTNGP10.phx.gbl...
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1
dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et
lui demande de saisir un mot
Je veux que la mot saisie aille se copier dans la colonne A dans la
ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre,
l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer
dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que
l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
Daniel, je n'ai qu'une chose à dire....Tu es un Saint !!! Merci beaucoup pour ce dernier exemple qui va beaucoup m'aider dans la mise en place de mon travail !!!
Cordialement
Soupull
Regarde le classeur : http://cjoint.com/?dbwj0vemm6 Daniel "Sou PULL" a écrit dans le message de news:
Comment faire pour pouvoir utiliser cette macro 2 fois dans la même feuilles. J'aurais en fait besoins que le UserForm s'ouvre en focntion de la saisie d'info dans deux colonne séparé. Avec çe qui suit seul la première UserForm fonctionne :
Private Sub Worksheet_change(ByVal Target As Range) If Target.Column <> 19 Then Exit Sub UserForm1.show Range("B" & Target.Row) = Var UserForm2.show If Target.Column <> 24 Then Exit Sub Range("A" & Target.Row) = Var End Sub
Soupull
Bonjour. Mets cette macro dans le code de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 17 Then Exit Sub Range("A" & Target.Row) = InputBox("Entrez un mot") End Sub
Cordialement. Daniel "Sou PULL" a écrit dans le message de news:
Bonjour je souhaite réaliser la chose suivante :
Lorsque que l'utilisateur de ma feuille de calcul saisie le chiffre 1 dans une cellule de la colonne Q, une fenêtre genre popup s'affiche et lui demande de saisir un mot Je veux que la mot saisie aille se copier dans la colonne A dans la ligne correspondante. Exemple : chiffre 1 saisie en Q7 ouvre la fenêtre, l'utilisateur saise : "Coagucheck", le mot "Coagucheck" va se placer dans la cellule A7.
Est-ce réalisable par une macro qui serait "permanente" et que l'utilisateur n'aurait pas besoins de déclencher par un bouton ?
Quel code pour créer des popup lié à une telle action ?
