Bonjour
j'ai un probleme de renvoie
Pour le moment ma fonction renvoie le classeur mais j'aimerais aussi renvoyer l'objet Excel.Application (car si je l'ouvre deux fois ca va pas le faire) donc je vois pas comment envoyer les deux en meme temps pour l'instant ma fonction est constitué comme cela
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Public Function MacroTest(c As Integer) As Workbook
 
'Déclarations des variables
Set xls = New Excel.Application
Dim name As String
Dim Classeur As Workbook
'Ouverture du tableau Excel
    xls.Visible = True
    Set Classeur = xls.Workbooks.Open("D:\Test\e_analyse_croisée_Test.xls")
 ...
Set MacroTest = Classeur