comment definir une fonction (ex calcul_super(mes_parametres1,texte,XXX)
2 réponses
Alfred WALLACE
Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir s=E9parer mon VBA dans
diff=E9rentes
routines, et fonctions.
Comment je peux faire une fonction =E0 laquelle, je passerai des
parametres, et en particulier des parametres Range ?
exemple :
une_couleur =3D vert
Une_zone =3D range("a1:c40")
Colorie (Une_zone, Une_couleur)
quelles pr=E9cautions je dois prendre avec les variables une_couleur,
une_zone
et surtout, comment je dois d=E9clarer les variables uniquement
utilis=E9es
dans la fonction colorie ?
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
JLuc
*Bonjour Alfred WALLACE*,
Dim une_couleur As Integer Dim Une_zone As Range
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur) ...
End Sub
Function Colorie(Byref plage As Range, Byval teinte As Integer) ... ... End Function
Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans différentes routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur, une_zone et surtout, comment je dois déclarer les variables uniquement utilisées dans la fonction colorie ?
Merci pour votre aide.
José
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
*Bonjour Alfred WALLACE*,
Dim une_couleur As Integer
Dim Une_zone As Range
une_couleur = vert
Une_zone = range("a1:c40")
Colorie (Une_zone, Une_couleur)
...
End Sub
Function Colorie(Byref plage As Range, Byval teinte As Integer)
...
...
End Function
Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans
différentes
routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des
parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert
Une_zone = range("a1:c40")
Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur,
une_zone
et surtout, comment je dois déclarer les variables uniquement
utilisées
dans la fonction colorie ?
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur) ...
End Sub
Function Colorie(Byref plage As Range, Byval teinte As Integer) ... ... End Function
Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans différentes routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur, une_zone et surtout, comment je dois déclarer les variables uniquement utilisées dans la fonction colorie ?
Merci pour votre aide.
José
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
michdenis
Bonjour Alfred,
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
Pour appeler la fonction
Worksheets("Feuil1").range("a1:c40") = Plage de cellule 3 = la couleur '----------------- Sub Test() Colorie Worksheets("Feuil1").range("a1:c40"), 3 End Sub '-----------------
'--------------- Function Colorie(zone As range, Couleur as Integer) zone.interior.colorindex = Couleur End Function '---------------
Salutations!
"Alfred WALLACE" a écrit dans le message de news: Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans différentes routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur, une_zone et surtout, comment je dois déclarer les variables uniquement utilisées dans la fonction colorie ?
Merci pour votre aide.
José
Bonjour Alfred,
une_couleur = vert
Une_zone = range("a1:c40")
Colorie (Une_zone, Une_couleur)
Pour appeler la fonction
Worksheets("Feuil1").range("a1:c40") = Plage de cellule
3 = la couleur
'-----------------
Sub Test()
Colorie Worksheets("Feuil1").range("a1:c40"), 3
End Sub
'-----------------
'---------------
Function Colorie(zone As range, Couleur as Integer)
zone.interior.colorindex = Couleur
End Function
'---------------
Salutations!
"Alfred WALLACE" <jose6a@gmail.com> a écrit dans le message de news: 1142605770.993240.232630@v46g2000cwv.googlegroups.com...
Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans
différentes
routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des
parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert
Une_zone = range("a1:c40")
Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur,
une_zone
et surtout, comment je dois déclarer les variables uniquement
utilisées
dans la fonction colorie ?
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
Pour appeler la fonction
Worksheets("Feuil1").range("a1:c40") = Plage de cellule 3 = la couleur '----------------- Sub Test() Colorie Worksheets("Feuil1").range("a1:c40"), 3 End Sub '-----------------
'--------------- Function Colorie(zone As range, Couleur as Integer) zone.interior.colorindex = Couleur End Function '---------------
Salutations!
"Alfred WALLACE" a écrit dans le message de news: Bonjour :-)
pour simplifier mon code, j'aimerai pouvoir séparer mon VBA dans différentes routines, et fonctions.
Comment je peux faire une fonction à laquelle, je passerai des parametres, et en particulier des parametres Range ?
exemple :
une_couleur = vert Une_zone = range("a1:c40") Colorie (Une_zone, Une_couleur)
quelles précautions je dois prendre avec les variables une_couleur, une_zone et surtout, comment je dois déclarer les variables uniquement utilisées dans la fonction colorie ?
