Discussion :

[LeXo]

Bonjour

voila je voudrais mettre dans un module mes fonctions de mise en page d'une feuille excel par exemple :

comment je passe la feuille excel a la fonction ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim exapp as excel.application
 
set exapp...
 
'fonction adresse : param d'entré lig et col ou commence le cadre
adresse (5,10)
 
 
exapp.close

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
public function adresse (lig as integer, colas integer) 
 
exsht.cells(lig,col)= "Mr BIDUL Pierre"
 
end function

[Delbeke]

tu peux puet être passer la reference de la feuille dans les parametres de ta fonction.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
public function adresse (FeuilleExcell as Excel.Worksheet , lig as integer, col as integer) 
 
FeuilleExcell .cells(lig,col)= "Mr BIDUL Pierre"
 
end function