Error al crear carpeta combinacion Access-Word

   Hola y Saludos.Tengo
creado un botón que me crea una combinación de Access a Word, la instrucción que
uso para ello es gracias a vuestras ayudas, es bastante larga, solo pongo el
final de la misma, donde guardo el documento creado:

Carpeta = "C:\ATESTADOS
COPIAS"

Subcarpeta = Forms!FConductor!Texto188

Subcarpeta1 = "Solicitud ingreso"

MkDir Carpeta & "\"
& Subcarpeta & "\" & Subcarpeta1

docWord.SaveAs
Carpeta & "\" & Subcarpeta & "\" &
Subcarpeta1 & "\" & Forms!FConductor!Texto214

Me
salta el error 76, no se ha encontrado la ruta, el codigo parece correcto, me podrían indicar como
solucionar  el problema. Un saludo.
Un Saludo.

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: 294	Tema: Error al crear carpeta combinacion Access-Word Enviado: 06/Julio/2020 a las 22:50
	Hola y Saludos. Tengo creado un botón que me crea una combinación de Access a Word, la instrucción que uso para ello es gracias a vuestras ayudas, es bastante larga, solo pongo el final de la misma, donde guardo el documento creado: Carpeta = "C:\ATESTADOS COPIAS" Subcarpeta = Forms!FConductor!Texto188 Subcarpeta1 = "Solicitud ingreso" MkDir Carpeta & "\" & Subcarpeta & "\" & Subcarpeta1 docWord.SaveAs Carpeta & "\" & Subcarpeta & "\" & Subcarpeta1 & "\" & Forms!FConductor!Texto214 Me salta el error 76, no se ha encontrado la ruta, el codigo parece correcto, me podrían indicar como solucionar el problema. Un saludo. Un Saludo.

xavi 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 Terrassa-BCN Unido: 10/Mayo/2005 Localización: Catalunya \|\|\|\| Estado: Sin conexión Puntos: 14556	Enviado: 07/Julio/2020 a las 09:19
	Es posible que la carpeta "Subcarpeta" no exista. En principio, MkDir solo puede crear el primer nivel por lo que deberías realizar una validación de su existencia y, si procede, hacer un MkDir solo con carpeta+subcarpeta Por otro lado también habrá que controlar que Texto188 no contenga caracteres prohibidos. De todas formas, te paso una función que debería crear la ruta completa de una tacada: Function CreateFullPath(strTargetFolder As String) Dim ws As Object Set ws = CreateObject("WScript.Shell") ws.Run "cmd /c mkdir """ & strTargetFolder & """" End Function Un saludo
	Xavi, un minyó de Terrassa Mi web

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: 294	Enviado: 08/Julio/2020 a las 14:17
	Hola Xavi, gracias por tu respuesta, me ha servido de mucho. Se puede cerrar el hilo. Un Saludo