Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si
doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette
journée de solidarité pour nos anciens )
XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de
façon à ne pas les voir quand on utilise le menu Outils/Macros.
Dans un userform, je désire faire appel à une de ces procédures en invoquant
son nom.
Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie"
Evidemment, si je passe cette Private Sub en Function, ça marche !
.......... mais la fonction ( qui n'en est pas une puisque ne retournant pas
de valeur dans ce cas ) est alors disponible dans la liste des fonctions
!!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir
besoin de la changer en fonction ?
J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
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
garnote
Bonjour Pounet,
Un exemple qui semble fonctionner :
Dans un module standard : Private Sub Alterne() MsgBox "Bonjour." End Sub
Code associé au bouton CommandButton1 d'un UserForm : Private Sub CommandButton1_Click() Application.Run ("Alterne") End Sub
Serge
"Pounet95" a écrit dans le message de news: 465a77d7$0$25936$
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette journée de solidarité pour nos anciens ) XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de façon à ne pas les voir quand on utilise le menu Outils/Macros. Dans un userform, je désire faire appel à une de ces procédures en invoquant son nom. Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie" Evidemment, si je passe cette Private Sub en Function, ça marche ! .......... mais la fonction ( qui n'en est pas une puisque ne retournant pas de valeur dans ce cas ) est alors disponible dans la liste des fonctions !!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir besoin de la changer en fonction ? J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
Merci de votre réponse
Pounet95
Bonjour Pounet,
Un exemple qui semble fonctionner :
Dans un module standard :
Private Sub Alterne()
MsgBox "Bonjour."
End Sub
Code associé au bouton CommandButton1 d'un UserForm :
Private Sub CommandButton1_Click()
Application.Run ("Alterne")
End Sub
Serge
"Pounet95" <grumlardold@wanadoo.fr> a écrit dans le message de news: 465a77d7$0$25936$ba4acef3@news.orange.fr...
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette
journée de solidarité pour nos anciens )
XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de
façon à ne pas les voir quand on utilise le menu Outils/Macros.
Dans un userform, je désire faire appel à une de ces procédures en invoquant
son nom.
Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie"
Evidemment, si je passe cette Private Sub en Function, ça marche !
.......... mais la fonction ( qui n'en est pas une puisque ne retournant pas
de valeur dans ce cas ) est alors disponible dans la liste des fonctions
!!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir
besoin de la changer en fonction ?
J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
Dans un module standard : Private Sub Alterne() MsgBox "Bonjour." End Sub
Code associé au bouton CommandButton1 d'un UserForm : Private Sub CommandButton1_Click() Application.Run ("Alterne") End Sub
Serge
"Pounet95" a écrit dans le message de news: 465a77d7$0$25936$
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette journée de solidarité pour nos anciens ) XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de façon à ne pas les voir quand on utilise le menu Outils/Macros. Dans un userform, je désire faire appel à une de ces procédures en invoquant son nom. Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie" Evidemment, si je passe cette Private Sub en Function, ça marche ! .......... mais la fonction ( qui n'en est pas une puisque ne retournant pas de valeur dans ce cas ) est alors disponible dans la liste des fonctions !!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir besoin de la changer en fonction ? J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
Merci de votre réponse
Pounet95
Pounet95
Merci Serge, Bien qu'ayant déjà aperçu cette syntaxe, je ne l'avais jamais employée. C'est chose faite et c'est ce que je cherchais. Bonne journée ( pluvieuse sur Région Parisienne )
Pounet "garnote" a écrit dans le message de news:
Bonjour Pounet,
Un exemple qui semble fonctionner :
Dans un module standard : Private Sub Alterne() MsgBox "Bonjour." End Sub
Code associé au bouton CommandButton1 d'un UserForm : Private Sub CommandButton1_Click() Application.Run ("Alterne") End Sub
Serge
"Pounet95" a écrit dans le message de news: 465a77d7$0$25936$
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette journée de solidarité pour nos anciens ) XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de façon à ne pas les voir quand on utilise le menu Outils/Macros. Dans un userform, je désire faire appel à une de ces procédures en invoquant son nom. Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie" Evidemment, si je passe cette Private Sub en Function, ça marche ! .......... mais la fonction ( qui n'en est pas une puisque ne retournant pas de valeur dans ce cas ) est alors disponible dans la liste des fonctions !!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir besoin de la changer en fonction ? J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
Merci de votre réponse
Pounet95
Merci Serge,
Bien qu'ayant déjà aperçu cette syntaxe, je ne l'avais jamais employée.
C'est chose faite et c'est ce que je cherchais.
Bonne journée ( pluvieuse sur Région Parisienne )
Pounet
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
edGioOPoHHA.4872@TK2MSFTNGP03.phx.gbl...
Bonjour Pounet,
Un exemple qui semble fonctionner :
Dans un module standard :
Private Sub Alterne()
MsgBox "Bonjour."
End Sub
Code associé au bouton CommandButton1 d'un UserForm :
Private Sub CommandButton1_Click()
Application.Run ("Alterne")
End Sub
Serge
"Pounet95" <grumlardold@wanadoo.fr> a écrit dans le message de news:
465a77d7$0$25936$ba4acef3@news.orange.fr...
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si
doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à
cette
journée de solidarité pour nos anciens )
XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private
de
façon à ne pas les voir quand on utilise le menu Outils/Macros.
Dans un userform, je désire faire appel à une de ces procédures en
invoquant
son nom.
Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie"
Evidemment, si je passe cette Private Sub en Function, ça marche !
.......... mais la fonction ( qui n'en est pas une puisque ne retournant
pas
de valeur dans ce cas ) est alors disponible dans la liste des fonctions
!!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir
besoin de la changer en fonction ?
J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???
Merci Serge, Bien qu'ayant déjà aperçu cette syntaxe, je ne l'avais jamais employée. C'est chose faite et c'est ce que je cherchais. Bonne journée ( pluvieuse sur Région Parisienne )
Pounet "garnote" a écrit dans le message de news:
Bonjour Pounet,
Un exemple qui semble fonctionner :
Dans un module standard : Private Sub Alterne() MsgBox "Bonjour." End Sub
Code associé au bouton CommandButton1 d'un UserForm : Private Sub CommandButton1_Click() Application.Run ("Alterne") End Sub
Serge
"Pounet95" a écrit dans le message de news: 465a77d7$0$25936$
Nota : Ceci est un re-post car je ne vois mon envoi de 7:50 ( désolé si doublon )
Bonjour à toutes et tous, ( contributeurs du forum et contributeurs à cette journée de solidarité pour nos anciens ) XL2000, Windows XP ou Windows2000
Dans un module standard existent plusieurs procédures déclarées Private de façon à ne pas les voir quand on utilise le menu Outils/Macros. Dans un userform, je désire faire appel à une de ces procédures en invoquant son nom. Or j'ai le message "Erreur de compilation : Sub ou Fonction non définie" Evidemment, si je passe cette Private Sub en Function, ça marche ! .......... mais la fonction ( qui n'en est pas une puisque ne retournant pas de valeur dans ce cas ) est alors disponible dans la liste des fonctions !!!!
Comment puis-je accéder à ma procédure à partir du userform sans avoir besoin de la changer en fonction ? J'ai tenté Call <nom sub> mais sans succès. Syntaxe ???