Crear carpeta y guardar documento Word generado.


   Buenas noches,tengo la
siguiente instrucción la cual me guarda un documento generado (access-word), en la carpeta sintomas:

docWord.SaveAs
"C:\SINTOMAS\" & Forms!FSintomas!Texto188 & ".doc"

Lo que
pretendo es que ese documento que se crea se guarde en una subcarpeta que
creo con la siguiente instrucción:

Carpeta =
"C:\SINTOMAS\" & "Sintomas atestado " &
Forms!FSintomas!Texto188

MkDir
Carpeta
strNuevoDocumento = Forms!FSintomas!Texto188 & ".doc"
MkDir Carpeta & "\" & strNuevoDocumento

Quedando así
SINTOMAS\Sintomas atestado

Lo que estoy
intentando y no se crea es que el documento Word que se ha generado llamado
001-2020 ALCOH se guarde en la Ruta SINTOMAS/Sintomas atestado/001-2020 ALCOH. Alguna ayuda. 
Un Salud@

Autor	Mensaje Tema Buscar Opciones del Tema Responder Crear un nuevo tema Versión imprimible Traducir Tema
Antonio Pedro Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Asiduo Unido: 13/Diciembre/2005 Estado: Sin conexión Puntos: 297	Tema: Crear carpeta y guardar documento Word generado. Enviado: 13/Junio/2020 a las 23:07
	Buenas noches,tengo la siguiente instrucción la cual me guarda un documento generado (access-word), en la carpeta sintomas: docWord.SaveAs "C:\SINTOMAS\" & Forms!FSintomas!Texto188 & ".doc" Lo que pretendo es que ese documento que se crea se guarde en una subcarpeta que creo con la siguiente instrucción: Carpeta = "C:\SINTOMAS\" & "Sintomas atestado " & Forms!FSintomas!Texto188 MkDir Carpeta strNuevoDocumento = Forms!FSintomas!Texto188 & ".doc" MkDir Carpeta & "\" & strNuevoDocumento Quedando así SINTOMAS\Sintomas atestado Lo que estoy intentando y no se crea es que el documento Word que se ha generado llamado 001-2020 ALCOH se guarde en la Ruta SINTOMAS/Sintomas atestado/001-2020 ALCOH. Alguna ayuda. Un Salud@

Mihura Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Visite la página de los usuarios Añadir a la lista de amigos Administrador Unido: 06/Mayo/2005 Localización: En la dehesa Estado: Sin conexión Puntos: 13814	Enviado: 14/Junio/2020 a las 09:49
	¿Y cómo lo haces? docWord.SaveAs Carpeta & "\" & strNuevoDocumento debería funcionar.
	Jesús Mansilla Castells. Saludos desde Móstoles. Access Aplicaciones Tecsys.es

Antonio Pedro Ver perfil usuario Enviar mensaje privado Ver los mensajes del usuario Añadir a la lista de amigos Asiduo Unido: 13/Diciembre/2005 Estado: Sin conexión Puntos: 297	Enviado: 16/Junio/2020 a las 21:35
	Hola y Saludos, es una combinación que hago de Access con Word (gracias a la ayuda de prga) no he puesto toda la instrucción pues es demasiado larga. Esta última instrucción es la que me guarda el documento generado en una carpeta: docWord.SaveAs "C:\SINTOMAS\" & Forms!FSintomas!Texto188 & ".doc" Siendo, Texto188, un número de expediente. Con tu ayuda que me ha servido de mucho, ya lo tengo solucionado, con algunos cambios, dejo por si pudiera servir: Dim Carpeta As String Dim Subcarpeta As String Carpeta=”C:\SINTOMAS” SubCarpeta= Forms!FSintomas!Texto188 MKDir Carpeta & “\” & SubCarpeta docWord.SaveAs Carpeta & “\” & SubCarpeta & “\”Forms!FSintomas!Texto188 Nuevamente gracias por responder. Se puede cerrar el hilo. Un Saludo