Accesing Excels en utilisant qtp

En essayant d'enregistrer Excel en utilisant qtp, j'obtiens une erreur "Impossible d'accéder au fichier. Essayez l'une des opérations suivantes".Accesing Excels en utilisant qtp

Tout est correct mais je reçois toujours une erreur. Voici mon code:

Dim objExcel 
set objExcel = CreateObject("Excel.Application") 
objExcel.visible = true objExcel.Workbooks.Add 
objExcel.ActiveWorkbook.saveAs "‪D:\UFT Practice Scripts\UFT.xlsx" 
objExcel = nothing

Source

2017-08-19 Roshan Jha

Je vous conseille d'essayer d'exécuter cela comme un vbscript autonome pour déterminer si QTP n'a rien à voir avec elle . – Motti

J'ai essayé de courir avec le seul vbcript mais toujours la même erreur. –

Cela a fonctionné maintenant :) –

juste ajouter la ligne objExcel.DisplayAlerts = False fonctionne pour moi ..

Dim objExcel 
set objExcel = CreateObject("Excel.Application") 
objExcel.visible = true 
objExcel.DisplayAlerts = False 
objExcel.Workbooks.Add 
objExcel.ActiveWorkbook.SaveAs "D:\uft.xlsx" 
objExcel = nothing

Source

2017-08-22 10:11:53

Accesing Excels en utilisant qtp

Répondre

Questions connexes