Jonathan1986
XLDnaute Nouveau
Bonjour le forum, Bonjour a tous,
Je fais encore appel au forum car je usis bloqué, tout est contenu dans le titre.
Mon application sert à créer des factures. Je manipule des classeurs externes pour cela.
Je souhaiterais qu'uniquement les classeur manipulés soient cachés et non les autres que lutilisateur va ouvrir.
J'ai bien trouvé un code sur les forums mais je n'arrive pas à les utiliser.
Jusqu'a présent je mettai dans Thisworkbook
Workbook_Open
Application.Visible = False
Worbook_BeforClose
... = True
Seulement ca s'applique a absolument tous les classeurs
Voici le code en question que je ne comprends pas ... :
Dim myXl as Excel.application
Dim mySheet as Excel.Workbook
Set myxl = new Excel.Application
myXl.visible = false
Set mySheet = myXl.Activeworkbook("c:\tonfichier.xls")
...code....
mySheet.save
mySheet.Close
myXl.quit
Set mySheet = nothing
Set myXl = nothing
Merci d'avance ... beacoup!! si vous avez un peu de temps à me consacrer
Bonne journée à tous
Jonathan
Je fais encore appel au forum car je usis bloqué, tout est contenu dans le titre.
Mon application sert à créer des factures. Je manipule des classeurs externes pour cela.
Je souhaiterais qu'uniquement les classeur manipulés soient cachés et non les autres que lutilisateur va ouvrir.
J'ai bien trouvé un code sur les forums mais je n'arrive pas à les utiliser.
Jusqu'a présent je mettai dans Thisworkbook
Workbook_Open
Application.Visible = False
Worbook_BeforClose
... = True
Seulement ca s'applique a absolument tous les classeurs
Voici le code en question que je ne comprends pas ... :
Dim myXl as Excel.application
Dim mySheet as Excel.Workbook
Set myxl = new Excel.Application
myXl.visible = false
Set mySheet = myXl.Activeworkbook("c:\tonfichier.xls")
...code....
mySheet.save
mySheet.Close
myXl.quit
Set mySheet = nothing
Set myXl = nothing
Merci d'avance ... beacoup!! si vous avez un peu de temps à me consacrer
Bonne journée à tous
Jonathan