Bonsoir;
J'utilise un inputbox pour inscrire un texte dans une=20
cellule. Je veux que le texte inscrit ne soit pas effac=E9=20
lorsque j'appuie sur le bouton "annuler" de l'inputbox.
Est-ce possible ? Comment faire ?
Merci de votre aide
dadda
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
ru-th
Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
Salut dadda
Sub TEST()
rep = InputBox("A saisir")
If rep = "" Then Exit Sub
[a1] = rep
End Sub
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 00bf01c398cb$15a69e90$a601280a@phx.gbl...
Bonsoir;
J'utilise un inputbox pour inscrire un texte dans une
cellule. Je veux que le texte inscrit ne soit pas effacé
lorsque j'appuie sur le bouton "annuler" de l'inputbox.
Est-ce possible ? Comment faire ?
Merci de votre aide
dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
-----Message d'origine----- Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
-----Message d'origine-----
Salut dadda
Sub TEST()
rep = InputBox("A saisir")
If rep = "" Then Exit Sub
[a1] = rep
End Sub
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 00bf01c398cb$15a69e90$a601280a@phx.gbl...
Bonsoir;
J'utilise un inputbox pour inscrire un texte dans une
cellule. Je veux que le texte inscrit ne soit pas effacé
lorsque j'appuie sur le bouton "annuler" de l'inputbox.
Est-ce possible ? Comment faire ?
Merci de votre aide
dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
Range("A1") = rep
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le
mot de passe que j'ai fait inscrire en A1 soit supprimé.
C'est ce que je ne veux pas.
Merci.
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
AV
Désolé; la solution proposée ne marche pas pour mon cas.
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") If rep = "" Then Exit Sub Range("A1") = rep End Sub
AV
Désolé; la solution proposée ne marche pas pour mon cas.
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
Désolé; la solution proposée ne marche pas pour mon cas.
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") If rep = "" Then Exit Sub Range("A1") = rep End Sub
AV
Pierre CFI
bonjour normal tu mets à blanc avant d'annuler Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub Range("A1") = rep End Sub
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr a écrit dans le message de news: 093f01c39945$84f5cbc0$
-----Message d'origine----- Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
bonjour
normal tu mets à blanc avant d'annuler
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
<anonymous@discussions.microsoft.com> a écrit dans le message de news: 093f01c39945$84f5cbc0$a301280a@phx.gbl...
-----Message d'origine-----
Salut dadda
Sub TEST()
rep = InputBox("A saisir")
If rep = "" Then Exit Sub
[a1] = rep
End Sub
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 00bf01c398cb$15a69e90$a601280a@phx.gbl...
Bonsoir;
J'utilise un inputbox pour inscrire un texte dans une
cellule. Je veux que le texte inscrit ne soit pas effacé
lorsque j'appuie sur le bouton "annuler" de l'inputbox.
Est-ce possible ? Comment faire ?
Merci de votre aide
dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
Range("A1") = rep
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le
mot de passe que j'ai fait inscrire en A1 soit supprimé.
C'est ce que je ne veux pas.
Merci.
bonjour normal tu mets à blanc avant d'annuler Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub Range("A1") = rep End Sub
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr a écrit dans le message de news: 093f01c39945$84f5cbc0$
-----Message d'origine----- Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
-----Message d'origine----- bonjour normal tu mets à blanc avant d'annuler Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub Range("A1") = rep End Sub
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr a écrit dans le message de news: 093f01c39945$84f5cbc0$
-----Message d'origine----- Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
.Re-bonjour; Merci Thierry,Pierre et alain. La réponse exacte était
déjà donnée par Thierry. Je n'avais pas su l'exploiter. Les réponses de Pierre et alain m'ont ouvert les yeux. Merci à vous tous. dadda
-----Message d'origine-----
bonjour
normal tu mets à blanc avant d'annuler
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
<anonymous@discussions.microsoft.com> a écrit dans le
message de news: 093f01c39945$84f5cbc0$a301280a@phx.gbl...
-----Message d'origine-----
Salut dadda
Sub TEST()
rep = InputBox("A saisir")
If rep = "" Then Exit Sub
[a1] = rep
End Sub
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 00bf01c398cb$15a69e90$a601280a@phx.gbl...
Bonsoir;
J'utilise un inputbox pour inscrire un texte dans une
cellule. Je veux que le texte inscrit ne soit pas effacé
lorsque j'appuie sur le bouton "annuler" de l'inputbox.
Est-ce possible ? Comment faire ?
Merci de votre aide
dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse()
rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
Range("A1") = rep
If rep = "" Then Exit Sub
Range("A1") = rep
End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le
mot de passe que j'ai fait inscrire en A1 soit supprimé.
C'est ce que je ne veux pas.
Merci.
.Re-bonjour;
Merci Thierry,Pierre et alain. La réponse exacte était
déjà donnée par Thierry. Je n'avais pas su l'exploiter.
Les réponses de Pierre et alain m'ont ouvert les yeux.
Merci à vous tous.
dadda
-----Message d'origine----- bonjour normal tu mets à blanc avant d'annuler Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE")
If rep = "" Then Exit Sub Range("A1") = rep End Sub
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr a écrit dans le message de news: 093f01c39945$84f5cbc0$
-----Message d'origine----- Salut dadda
Sub TEST() rep = InputBox("A saisir") If rep = "" Then Exit Sub [a1] = rep End Sub
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"dadda" a écrit dans le message de
news: 00bf01c398cb$15a69e90$ Bonsoir; J'utilise un inputbox pour inscrire un texte dans une cellule. Je veux que le texte inscrit ne soit pas effacé lorsque j'appuie sur le bouton "annuler" de l'inputbox. Est-ce possible ? Comment faire ? Merci de votre aide dadda
.Bonjour thierry;
Désolé; la solution proposée ne marche pas pour mon cas.
Voila mon code :
Sub entrermotdepasse() rep = InputBox("Entrez mot de passe", "MOT DE PASSE") Range("A1") = rep If rep = "" Then Exit Sub Range("A1") = rep End Sub
Il suffit que j'appuie sur le bouton "annuler" pour que le mot de passe que j'ai fait inscrire en A1 soit supprimé. C'est ce que je ne veux pas. Merci.
.Re-bonjour; Merci Thierry,Pierre et alain. La réponse exacte était
déjà donnée par Thierry. Je n'avais pas su l'exploiter. Les réponses de Pierre et alain m'ont ouvert les yeux. Merci à vous tous. dadda
