'Creation du document Word Dim DocWord As Object Set DocWord = CreateObject("Word.Application" ) DocWord.Documents.Add DocWord.ActiveDocument.SaveAs ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & ".doc" DocWord.Visible = True
(Evidement c'est un partie) Si tout marche bien mon programme ne plante pas, le problème survient si lors de l'exécution il y a eu un problème et que je recompile alors il me dit que le document word est ouvert. Comment vérifier que mon doc est ouvert ou non ?
Marsh Posté le 03-09-2010 à 10:34:08
Bonjour,
J'ai un probleme dans mon code:
'Creation du document Word
Dim DocWord As Object
Set DocWord = CreateObject("Word.Application" )
DocWord.Documents.Add
DocWord.ActiveDocument.SaveAs ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & ".doc"
DocWord.Visible = True
(Evidement c'est un partie) Si tout marche bien mon programme ne plante pas, le problème survient si lors de l'exécution il y a eu un problème et que je recompile alors il me dit que le document word est ouvert.
Comment vérifier que mon doc est ouvert ou non ?
Message édité par Hi-gel le 03-09-2010 à 10:34:45