Bienvenido a la mayor comunidad de usuarios EXCEL
Regístrate gratis ahora para ver contenidos y descargas sin restricciones!Regístrate gratis Ingresar
Problemas de Guardado de Rutas
- Autor del tema edp
- Fecha de inicio
Solución
buen dia una disculpa la...Perfecto, pero no me has respondido.
Utilizando mi ejemplo y aplicándolo al tuyo, ¿existe el directorio?.
Otra manera es que compruebes previamente si existe el directorio y así evitas errores.
Un saludo.Código:Dim Fso as Object Set Fso = CreateObject("Scripting.FileSystemObject") Ruta = "C:\empresa1\Conteos - " Sucursal = Range("B1").Value '(Ubicacion del punto de conteo) Nombre = "\Conteo Ciclico " & Range("F1").Value '(es el consecutivo de folios que llevo) If Fso.FolderExists(Ruta & Sucursal) Then ActiveWorkbook.SaveAs Filename:=Ruta & Sucursal & Nombre & ".xlsx" else Msgbox "No existe el Directorio " & Ruta & Sucursal End If
novirus
Moderator
- Registrado
- 23 Feb 2021
- Mensajes
- 395
Buenas,
Para verlo mas claro piensa en la ruta completa, por ejemplo.
Supongamos que B1 = "España"
Supongamos que F1 = 24
Si sustituimos los valores quedara así:
"C:\empresa1\Conteos -...
Para verlo mas claro piensa en la ruta completa, por ejemplo.
Supongamos que B1 = "España"
Supongamos que F1 = 24
Si sustituimos los valores quedara así:
"C:\empresa1\Conteos -...
novirus
Moderator
- Registrado
- 23 Feb 2021
- Mensajes
- 395
Perfecto, pero no me has respondido.
Utilizando mi ejemplo y aplicándolo al tuyo, ¿existe el directorio?.
Otra manera es que compruebes...
Solución
