Bon attention je vais poser une question qui peux=20
parraitre b=EAte:
J'ai dans un formulaire un joli bouton Annuler qui ex=E9cute=20
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique=20
sur ce bouton et qu'il n'y a rien =E0 anuler on se retrouve=20
avec un joli message d'erreur "La commande ou=20
action 'Annuler' n'est pas disponible pour l'instant". Y a=20
t il un moyen de ne plus voir ce message ?
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
Pierre CFI [mvp]
bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
bonjour
dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
--
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
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans le message de news: 9b6e01c3eb10$1c349cc0$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
Ryo
Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
Private Sub Annuler_Click()
DoCmd.RunCommand acCmdUndo
End Sub
La en tout cas y'as pas de MsgBox, maintenant oui j'ai un
MsgBox dans Private Sub Num_NotInList(NewData As String,
Response As Integer) mais je pense pas (enfin j'espère)
que ce soit lui qui géne cette partie marchant
parfaitement.
-----Message d'origine-----
bonjour
dans une ligne un peu plus bas, tu dois avoir MsgBox.....
enléve cette ligne
--
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
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans
le message de news: 9b6e01c3eb10$1c349cc0
$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
Damien Mermoz
Salut,
il suffit de capturer cette erreur Private Sub Annuler_Click() on error goto annuler_err
DoCmd.RunCommand acCmdUndo
annuler_exit: Exit Sub
annuler_err: If Err.Number = 2046 Then Exit Sub Else MsgBox Err.Number & vbCrLf & vbCrLf & Err.Description End If Resume annuler_exit
end sub
A + Damien.
"Ryo" a écrit dans le message de news:969001c3eb1d$42e10d10$ Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
Salut,
il suffit de capturer cette erreur
Private Sub Annuler_Click()
on error goto annuler_err
DoCmd.RunCommand acCmdUndo
annuler_exit:
Exit Sub
annuler_err:
If Err.Number = 2046 Then
Exit Sub
Else
MsgBox Err.Number & vbCrLf & vbCrLf & Err.Description
End If
Resume annuler_exit
end sub
A +
Damien.
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:969001c3eb1d$42e10d10$a301280a@phx.gbl...
Private Sub Annuler_Click()
DoCmd.RunCommand acCmdUndo
End Sub
La en tout cas y'as pas de MsgBox, maintenant oui j'ai un
MsgBox dans Private Sub Num_NotInList(NewData As String,
Response As Integer) mais je pense pas (enfin j'espère)
que ce soit lui qui géne cette partie marchant
parfaitement.
-----Message d'origine-----
bonjour
dans une ligne un peu plus bas, tu dois avoir MsgBox.....
enléve cette ligne
--
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
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans
le message de news: 9b6e01c3eb10$1c349cc0
$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
il suffit de capturer cette erreur Private Sub Annuler_Click() on error goto annuler_err
DoCmd.RunCommand acCmdUndo
annuler_exit: Exit Sub
annuler_err: If Err.Number = 2046 Then Exit Sub Else MsgBox Err.Number & vbCrLf & vbCrLf & Err.Description End If Resume annuler_exit
end sub
A + Damien.
"Ryo" a écrit dans le message de news:969001c3eb1d$42e10d10$ Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
Gilbert
Bonjour Personnellement j'utilise :
Private Sub Cmd_Annuler_Click() If Me.Dirty Then Me.Undo End Sub
Cordialement
Gilbert
"Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
Bonjour
Personnellement j'utilise :
Private Sub Cmd_Annuler_Click()
If Me.Dirty Then Me.Undo
End Sub
Cordialement
Gilbert
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans le message de news:
9b6e01c3eb10$1c349cc0$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
Private Sub Cmd_Annuler_Click() If Me.Dirty Then Me.Undo End Sub
Cordialement
Gilbert
"Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
Private Sub Cmd_Annuler_Click() If Me.Dirty Then Me.Undo End Sub
Cordialement
Gilbert
"Ryo" a écrit dans le message de news:
9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
Private Sub Cmd_Annuler_Click()
If Me.Dirty Then Me.Undo
End Sub
Cordialement
Gilbert
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans
le message de news:
9b6e01c3eb10$1c349cc0$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
Private Sub Cmd_Annuler_Click() If Me.Dirty Then Me.Undo End Sub
Cordialement
Gilbert
"Ryo" a écrit dans le message de news:
9b6e01c3eb10$1c349cc0$ Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
Pierre CFI [mvp]
.../... j'avais dit uniquement la ligne avec msgbox dans cette sub, ni les autres lignes, ni dans les autres 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 "Ryo" a écrit dans le message de news: 969001c3eb1d$42e10d10$ Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
.
.../...
j'avais dit uniquement la ligne avec msgbox dans cette sub, ni les autres lignes, ni dans les autres 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
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans le message de news: 969001c3eb1d$42e10d10$a301280a@phx.gbl...
Private Sub Annuler_Click()
DoCmd.RunCommand acCmdUndo
End Sub
La en tout cas y'as pas de MsgBox, maintenant oui j'ai un
MsgBox dans Private Sub Num_NotInList(NewData As String,
Response As Integer) mais je pense pas (enfin j'espère)
que ce soit lui qui géne cette partie marchant
parfaitement.
-----Message d'origine-----
bonjour
dans une ligne un peu plus bas, tu dois avoir MsgBox.....
enléve cette ligne
--
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
"Ryo" <anonymous@discussions.microsoft.com> a écrit dans
le message de news: 9b6e01c3eb10$1c349cc0
$a001280a@phx.gbl...
Bon attention je vais poser une question qui peux
parraitre bête:
J'ai dans un formulaire un joli bouton Annuler qui exécute
DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique
sur ce bouton et qu'il n'y a rien à anuler on se retrouve
avec un joli message d'erreur "La commande ou
action 'Annuler' n'est pas disponible pour l'instant". Y a
t il un moyen de ne plus voir ce message ?
.../... j'avais dit uniquement la ligne avec msgbox dans cette sub, ni les autres lignes, ni dans les autres 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 "Ryo" a écrit dans le message de news: 969001c3eb1d$42e10d10$ Private Sub Annuler_Click() DoCmd.RunCommand acCmdUndo End Sub La en tout cas y'as pas de MsgBox, maintenant oui j'ai un MsgBox dans Private Sub Num_NotInList(NewData As String, Response As Integer) mais je pense pas (enfin j'espère) que ce soit lui qui géne cette partie marchant parfaitement.
-----Message d'origine----- bonjour dans une ligne un peu plus bas, tu dois avoir MsgBox..... enléve cette ligne
-- 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 "Ryo" a écrit dans le message de news: 9b6e01c3eb10$1c349cc0
$
Bon attention je vais poser une question qui peux parraitre bête: J'ai dans un formulaire un joli bouton Annuler qui exécute DoCmd.RunCommand acCmdUndo, l'ennui c'est que si on clique sur ce bouton et qu'il n'y a rien à anuler on se retrouve avec un joli message d'erreur "La commande ou action 'Annuler' n'est pas disponible pour l'instant". Y a t il un moyen de ne plus voir ce message ?
