Probleme Objet Excel.Application

Question

Bonjour mon probleme est simple j'aimerais renvoyer kom valeur mon Objet Excel.Application


je renvoie mon objet excel.application


Public Function MacroTest(c As Integer) as Excel.application
Public xls As Excel.Application
Set xls = New Excel.Application
...
Set MacroTest = xls
Dim name As String


et lorsque je fais le code suivant, dans une formulaire


Module2.Macro1(Module1.MacroTest)
il me donne comme  erreur  incompatibilité de type alors je ne comprends pas pourquoi
mon de macro1
est 
public function Macro1(xls As Excel.Application)
...
End function


En gros je demande comment passer le meme objet xls de mon module 1 a mon module 2
Merci d'avance

jrivet · Answer

Salut,
Rends ton objet Xls Public en le déclarant dans un module (pas dans une function comme dans le code)

@+: Ju£i?n
Pensez: Réponse acceptée

Renfield · Answer

Je sais pas, je ne sais pas faire de .NET...

Vous êtes ici :
Thèmes / VB.NET et VB 2005 /

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Renfield · Answer

tu n'a pas passé de valeur pour le paramètre nommé 'c' :

Module2.Macro1(Module1.MacroTest(1))   

Renfield
Admin CodeS-SourceS- MVP Visual Basic

darkspoilt · Answer

oui c un oublie lorsque j'ai recopié sinon ca y est

darkspoilt · Answer

Bon je reussi a récupérer mon objet Excel.Application
je sais que je le fait bien car je fais une manipulation dessus sur le programme principâl
   Set appli = Module1.MacroTest(c)
    appli.Sheet(1).Range("A57").Select
    Module2.Macro1 (appli)


mais il me met qu'il y a une erreur de type à la linge 3


voila la structure Module2.Macro1


Sub Macro1(xls As Excel.Application)
xls.Sheet(1).Range("B58").Select 'C'est un exemple pour vérifier si on controle la bonne fenetre
...
End Sub

Renfield · Answer

t'as pas le niveau classeur....

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Probleme Objet Excel.Application

6 réponses

Votre réponse

Discussions similaires