Discussion :

[Zarek]

Bonjour,

Depuis quelques jours, j'ai un problème pour ouvrir un classeur modèle (.xlt) via un fichier .vbs. Précédemment, le double-clic sur ce fichier (.vbs) m'ouvrait le classeur .xlt en produisant un classeur .xls et en l'incrémentant de 1.
Exemple:
Toto.xlt (sur bureau) -->
double-clic sur OuvreToto.vbs (sur bureau) -->
ouverture de Toto.xlt, au lieu de Toto1.xls !!
J'obtiens bien l'ouverture d'un Toto1.xls en faisant le double-clic directement sur Toto.xlt, ou en cliquant droit et 'Nouveau' sur ce même modèle !
Le code du OuvreToto.vbs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Set oXL = WScript.CreateObject("Excel.Application")
strCurrentPath = Replace(Wscript.scriptFullName, Wscript.scriptName, "")
Wbk = strcurrentpath & "Toto.xlt"
Set wBook = oXL.Workbooks.Open(Wbk)

Pourriez-vous m'expliquer pourquoi ça ne fonctionne plus, après des années sans soucis ?
Le type de fichier vbs = VBScript Script File, s'ouvre avec : Microsoft (R) Windows Based Script Host
Environnement : Windows XP pro, Microsoft Office Excel 2003
Merci pour toute aide et conseil.
Zarek

[SfJ5Rpw8]

essai de remplacer Open par Add :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set wBook = oXL.Workbooks.Add(Wbk)

[Zarek]

Merci bbil !

Ta solution fonctionne impec, mais as-tu une explication sur le fait que ça fonctionnait très bien avant avec Open et maintenant plus ?

Zarek

[SfJ5Rpw8]

Je pense que cela dépend de la configuration d'excel ou peu-être de la version ..
et tu devrais chercher de ce côté la ..sur tes anciennes versions le fait d'ouvrir un modèle .xlt, l'utiliser comme modèle pour créer un nouveau classeur alors que sur ta version actuelle tu passe en modification du .xlt.. (c'est pareil sur mon Excel 2002, je passe aussi en modification., pas de création de nouveau classeur).