Cuestión : Si no existe la carpeta, después crear uno

Utilizo la línea de código abajo en una rutina secundaria que abra Excel del acceso y la ahorro a la trayectoria del archivo que he especificado abajo.  En mi Me.txt de la forma el SubFolder refleja la carpeta secundaria que el archivo es ser class= ahorrado " lineNumbers " >

1 del >

xlBook.SaveAs del " prettyprint " del class= del id= " codeSnippet852972 " del >



 de 

Any se aprecian grandemente.  ¡Gracias! 


  
  class= del 

Respuesta : Si no existe la carpeta, después crear uno

colocar esto en un módulo REGULAR

Opción explícita
El público declara la liberación “imagehlp.dll” de MakeSureDirectoryPathExists de la función (lpPath de ByVal como secuencia) como de largo
---------------------

para utilizar

Llamada MakeSureDirectoryPathExists (“C:\MainFolder\” y SubFolder de Me.txt y” \ ")

esto creará automáticamente las carpetas si no hacen existen.
usar esto  
     Llamada MakeSureDirectoryPathExists (“c:\a\b\c\d\e\ ")
creará todas las carpetas especificadas en la línea.
NOTE* el carácter pasado de la línea debe ser una barra \