Création d'un fichier batch

Question

J'essaie de créer un fichier batch qui va convertir un fichier Excel en fichier PDF. Y at-il quelque chose de mal avec ma ligne de commande, car il ne semble pas fonctionner:

Dim i As Double 
Dim sBatchFile As String 
ActiveWorkbook.Save 
sBatchFile = "C:\test.bat" 
Open sBatchFile For Output As #1 
    Print #1, "@ECHO OFF" 
    Print #1, "ECHO Converting Excel Files to PDF, Please wait..." 
    Print #1, "batchpdf C:\Documents and Settings\Andrew_G\My Documents\Office Docs\Schedule.xls C:\Documents and Settings\Andrew_G\My Documents\Office Docs\TEST1234.pdf" 
    Close #1 

    i = Shell(sBatchFile, vbMaximizedFocus) 
End Sub 

Answer 1

Si tel est le contenu réel de votre fichier batch:

@ECHO OFF 
ECHO Converting Excel Files to PDF, Please wait... 
batchpdf C:\Documents and Settings\Andrew_G\My Documents\Office Docs\Schedule.xls C:\Documents and Settings\Andrew_G\My Documents\Office Docs\TEST1234.pdf 

alors vous devez citer les pathes de fichiers avec "" comme ceci:

batchpdf "C:\Documents and Settings\Andrew_G\My Documents\Office Docs\Schedule.xls" "C:\Documents and Settings\Andrew_G\My Documents\Office Docs\TEST1234.pdf" 

Mais je ne sais pas comment écrire exactement avec VBA, alors peut-être quelqu'un d'autre peut vous aider.