Répondre à une inputbox dans un script vbs

Bonjour,
J'ai un fichier excel contenant une base de donnée et des tcd liés.A son ouverture je demande un nom via une inputbox pour accéder au fichier. Le problème c'est que j'ai également un fichier vbs qui va ouvrir le fichier EXCEL pour actualiser ma base de donnée. Et la je coince, J'aimerais savoir si c'est possible de répondre à cet inputbox par "admin"dans le script vbs. Afin que cette dernière ne pose plus problème

Cordialement;

J'ai trouver une solution alternative désactiver les macros à l'ouverture dans le script vbs

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

objExcel.DisplayAlerts = False objExcel.Visible = TRUE objExcel.EnableEvents = False 'ici Set objWorkBook = objExcel.Workbooks.Open("\....")     On Error Resume Next Call bugs objWorkbook.EnableEvents = False 'ici   objWorkbook.RefreshAll   WScript.Sleep 1000   objWorkbook.Save()   WScript.Sleep 1000   objExcel.Quit

---