Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait
appel à shell32.dll, c'est peut être de là que vient le problème?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème
doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!
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
JB
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème? ) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le prob lème doit être basique, mais mes recherches sur internet restent infructueus es...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait
appel à shell32.dll, c'est peut être de là que vient le problème? ) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le prob lème
doit être basique, mais mes recherches sur internet restent infructueus es...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème? ) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le prob lème doit être basique, mais mes recherches sur internet restent infructueus es...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
XL_Noob
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
Merci
malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en
"Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1178032583.123796.40270@y80g2000hsf.googlegroups.com...
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait
appel à shell32.dll, c'est peut être de là que vient le problème?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le
problème
doit être basique, mais mes recherches sur internet restent
infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
Mon Onc'
bonsoir,
je mettrais ma main à couper que ta macro se trouve dans un module de feuille. N'est-il pas ? As-tu essayé de le placer dans un module standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
bonsoir,
je mettrais ma main à couper que ta macro se trouve dans un module de
feuille. N'est-il pas ? As-tu essayé de le placer dans un module
standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci
malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en
"Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1178032583.123796.40270@y80g2000hsf.googlegroups.com...
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait
appel à shell32.dll, c'est peut être de là que vient le problème?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème
doit être basique, mais mes recherches sur internet restent
infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!
je mettrais ma main à couper que ta macro se trouve dans un module de feuille. N'est-il pas ? As-tu essayé de le placer dans un module standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
JB
Enlever Private:
Sub CommandButton1_Click()
End Sub
JB
On 1 mai, 17:37, "XL_Noob" wrote:
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une foncti on qui fait appel à shell32.dll, c'est peut être de là que vient le problèm e?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsq ue lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Enlever Private:
Sub CommandButton1_Click()
End Sub
JB
On 1 mai, 17:37, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Merci
malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en
"Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1178032583.123796.40...@y80g2000hsf.googlegroups.com...
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une foncti on qui fait
appel à shell32.dll, c'est peut être de là que vient le problèm e?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsq ue lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le
problème
doit être basique, mais mes recherches sur internet restent
infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!- Masquer le texte des messages précédents -
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une foncti on qui fait appel à shell32.dll, c'est peut être de là que vient le problèm e?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsq ue lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
XL_Noob
Aïe!!! Une main en moins... :) =REMPLACER(main_MonOnc ; main_TouteNeuve) ... elle pourrait être appelée à resservir
"Mon Onc'" a écrit dans le message de news:
bonsoir,
je mettrais ma main à couper que ta macro se trouve dans un module de feuille. N'est-il pas ? As-tu essayé de le placer dans un module standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
Aïe!!! Une main en moins... :)
=REMPLACER(main_MonOnc ; main_TouteNeuve) ... elle pourrait être appelée à
resservir
"Mon Onc'" <pkoi@parceke.fr> a écrit dans le message de news:
mn.0c4a7d750ed0539e.48270@parceke.fr...
bonsoir,
je mettrais ma main à couper que ta macro se trouve dans un module de
feuille. N'est-il pas ? As-tu essayé de le placer dans un module standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci
malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en
"Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1178032583.123796.40270@y80g2000hsf.googlegroups.com...
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui
fait
appel à shell32.dll, c'est peut être de là que vient le problème?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque
lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le
problème
doit être basique, mais mes recherches sur internet restent
infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!
Aïe!!! Une main en moins... :) =REMPLACER(main_MonOnc ; main_TouteNeuve) ... elle pourrait être appelée à resservir
"Mon Onc'" a écrit dans le message de news:
bonsoir,
je mettrais ma main à couper que ta macro se trouve dans un module de feuille. N'est-il pas ? As-tu essayé de le placer dans un module standard,
cordialement
XL_Noob a présenté l'énoncé suivant :
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!
XL_Noob
Merci beaucoup, et pardon pour le délai de réponse, je viens de paramétrer outlook pour recevoir les news et je susi pas encore habitué.
Effectivement, là ca marche, mais du coup la macro est visible (quand on fait alt +F8). Enfin, le problème est résolu. Je m'en vais réviser ces histoires de Private / Public. ;)
Encore merci, le muguet virtuel revient donc à JB...
"JB" a écrit dans le message de news:
Enlever Private:
Sub CommandButton1_Click()
End Sub
JB
On 1 mai, 17:37, "XL_Noob" wrote:
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Merci beaucoup, et pardon pour le délai de réponse, je viens de paramétrer
outlook pour recevoir les news et je susi pas encore habitué.
Effectivement, là ca marche, mais du coup la macro est visible (quand on
fait alt +F8). Enfin, le problème est résolu. Je m'en vais réviser ces
histoires de Private / Public. ;)
Encore merci, le muguet virtuel revient donc à JB...
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1178036496.863403.262670@c35g2000hsg.googlegroups.com...
Enlever Private:
Sub CommandButton1_Click()
End Sub
JB
On 1 mai, 17:37, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Merci
malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en
"Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
1178032583.123796.40...@y80g2000hsf.googlegroups.com...
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" <remi_lethiell...@hotmail.com> wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie"
-------------
Option explicit
Sub Marine()
Call Command1_Click()
End Sub
----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui
fait
appel à shell32.dll, c'est peut être de là que vient le problème?) :
-------------------------------------
Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO
Dim pidl As Long
Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque
lancé
"directement".
J'ai un peu honte de faire appel à vous un 1er mai, surtout que le
problème
doit être basique, mais mes recherches sur internet restent
infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien
m'éclairer!- Masquer le texte des messages précédents -
Merci beaucoup, et pardon pour le délai de réponse, je viens de paramétrer outlook pour recevoir les news et je susi pas encore habitué.
Effectivement, là ca marche, mais du coup la macro est visible (quand on fait alt +F8). Enfin, le problème est résolu. Je m'en vais réviser ces histoires de Private / Public. ;)
Encore merci, le muguet virtuel revient donc à JB...
"JB" a écrit dans le message de news:
Enlever Private:
Sub CommandButton1_Click()
End Sub
JB
On 1 mai, 17:37, "XL_Noob" wrote:
Merci malheureusement ca ne marche pas...
Et pourtant lorsque je tape en miniscule "command1_click", VBA traduit en "Command1_Click", ce qui montre qu'il reconnait bien la sub...
"JB" a écrit dans le message de news:
Bonjour,
Call CommandButton1_Click
ou
CommandButton1_Click
JB
On 1 mai, 17:04, "XL_Noob" wrote:
Bonjour à tous,
Le code suivant me renvoit "Sub ou Function non définie" ------------- Option explicit
Sub Marine() Call Command1_Click() End Sub ----------------
Voilà le Sub en question (qui est lui même associé à une fonction qui fait appel à shell32.dll, c'est peut être de là que vient le problème?) : ------------------------------------- Private Sub Command1_Click()
Dim BROWSEINFO As BROWSEINFO Dim pidl As Long Dim RetVal As Long
Je tiens à préciser que Command1_Click fonctionne très bien lorsque lancé "directement". J'ai un peu honte de faire appel à vous un 1er mai, surtout que le problème doit être basique, mais mes recherches sur internet restent infructueuses...
Distribution de muguet virtuel à l'âme charitable qui voudra bien m'éclairer!- Masquer le texte des messages précédents -