J'ai une proc=E9dure qui attend une feuille en argument.=20
Quand je veux appeler ma proc=E9dure en faisant=20
Call Proc=E9dure(Nom de la feuille que je veux)=20
=E7a ne marche pas, comment faire ?=20
En esp=E9rant que l'exemple aide =E0 comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet
Set feuil1 =3D ThisWorkbook.Worksheets ("feuil1")
Set feuil2 =3D ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS
End Sub
Sachant que la proc=E9dure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance =E0 celui qui prendra le temps de=20
me lire et me venir en aide !
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
bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news: 0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !
Charles
bonjour
une histoire de passage de réf essaie tout simple
Sub Macro()
Dim feuil1, feuil2 As Worksheet
Set feuil1 = ThisWorkbook.Worksheets("feuil1")
Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1
End Sub
Sub Procedure(Feuille)
Feuille.Range("a1") = "rrrr"
End Sub
en plus çà marche
--
Pierre CFI
Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm
"Charles" <charlesamir@yahoo.fr> a écrit dans le message de news:
0e0501c36cb2$a1be2f00$a601280a@phx.gbl...
Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument.
Quand je veux appeler ma procédure en faisant
Call Procédure(Nom de la feuille que je veux)
ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet
Set feuil1 = ThisWorkbook.Worksheets ("feuil1")
Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS
End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de
me lire et me venir en aide !
bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news: 0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !
Charles
Charles
Mais comment la ligne de code Procedure feuil1 peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine----- bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news:
0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !
Charles
.
Mais comment la ligne de code
Procedure feuil1
peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de
Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine-----
bonjour
une histoire de passage de réf essaie tout simple
Sub Macro()
Dim feuil1, feuil2 As Worksheet
Set feuil1 = ThisWorkbook.Worksheets("feuil1")
Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1
End Sub
Sub Procedure(Feuille)
Feuille.Range("a1") = "rrrr"
End Sub
en plus çà marche
--
Pierre CFI
Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm
"Charles" <charlesamir@yahoo.fr> a écrit dans le message
de news:
0e0501c36cb2$a1be2f00$a601280a@phx.gbl...
Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument.
Quand je veux appeler ma procédure en faisant
Call Procédure(Nom de la feuille que je veux)
ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet
Set feuil1 = ThisWorkbook.Worksheets ("feuil1")
Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS
End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de
me lire et me venir en aide !
Mais comment la ligne de code Procedure feuil1 peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine----- bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news:
0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !
Charles
.
Pierre CFI
.../... Call est un peu "viellot" quand tu passes des arguments entre () ils sont ByVal sans ,c'est ByRef , donc pas besoin de déclaration en plus c'est pratique car c'est l'appel qui détermine le mode -- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news: 02c801c36cb8$2d1ddd20$ Mais comment la ligne de code Procedure feuil1 peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine----- bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news:
0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !
Charles
.
.../...
Call est un peu "viellot"
quand tu passes des arguments entre () ils sont ByVal
sans ,c'est ByRef , donc pas besoin de déclaration en plus
c'est pratique car c'est l'appel qui détermine le mode
--
Pierre CFI
Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm
"Charles" <charlesamir@yahoo.fr> a écrit dans le message de news:
02c801c36cb8$2d1ddd20$a101280a@phx.gbl...
Mais comment la ligne de code
Procedure feuil1
peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de
Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine-----
bonjour
une histoire de passage de réf essaie tout simple
Sub Macro()
Dim feuil1, feuil2 As Worksheet
Set feuil1 = ThisWorkbook.Worksheets("feuil1")
Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1
End Sub
Sub Procedure(Feuille)
Feuille.Range("a1") = "rrrr"
End Sub
en plus çà marche
--
Pierre CFI
Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access...
http://users.skynet.be/mpfa/charte.htm
"Charles" <charlesamir@yahoo.fr> a écrit dans le message
de news:
0e0501c36cb2$a1be2f00$a601280a@phx.gbl...
Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument.
Quand je veux appeler ma procédure en faisant
Call Procédure(Nom de la feuille que je veux)
ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet
Set feuil1 = ThisWorkbook.Worksheets ("feuil1")
Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS
End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de
me lire et me venir en aide !
.../... Call est un peu "viellot" quand tu passes des arguments entre () ils sont ByVal sans ,c'est ByRef , donc pas besoin de déclaration en plus c'est pratique car c'est l'appel qui détermine le mode -- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news: 02c801c36cb8$2d1ddd20$ Mais comment la ligne de code Procedure feuil1 peut-elle marcher ?
tu veux dire que le seul pb dans mon programme vient de Call Procedure (feuil1) ?
Merci de m'éclairer.
-----Message d'origine----- bonjour une histoire de passage de réf essaie tout simple Sub Macro()
Dim feuil1, feuil2 As Worksheet Set feuil1 = ThisWorkbook.Worksheets("feuil1") Set feuil2 = ThisWorkbook.Worksheets("feuil2")
Procedure feuil1 End Sub
Sub Procedure(Feuille) Feuille.Range("a1") = "rrrr" End Sub en plus çà marche
-- Pierre CFI Microsoft MVP Access
Pour mieux utiliser microsoft.public.fr.access... http://users.skynet.be/mpfa/charte.htm
"Charles" a écrit dans le message de news:
0e0501c36cb2$a1be2f00$ Bonjour tout le monde,
J'ai une procédure qui attend une feuille en argument. Quand je veux appeler ma procédure en faisant Call Procédure(Nom de la feuille que je veux) ça ne marche pas, comment faire ?
En espérant que l'exemple aide à comprendre :
Sub Macro
Dim feuil1, feuil2 as Worksheet Set feuil1 = ThisWorkbook.Worksheets ("feuil1") Set feuil2 = ThisWorkbook.Worksheets ("feuil2")
Call Procedure (feuil1) --> NE MARCHE PAS End Sub
Sachant que la procédure est ainsi
Sub Procedure (Feuille as Worksheet)
un grand merci par avance à celui qui prendra le temps de me lire et me venir en aide !