Error 1004. Al guardar excel con VB

Espero que me puedan ayudar con la siguiente consulta.

Cuando intento ejecutar el siguiente código me aparece un error 1004. Error en el método sabe as del objeto workbook. Busqué en internet, y la página de microsoft dice que puede ser un error de compatibilidades, pero no consigo entender más.

Este es un archivo de excel que se ejecuta en varios PC, pero el error solo me aparece en algunos.

Espero que me puedan ayudar.

La línea donde aparece en error es:

ActiveWorkbook.SaveAs Filename:=Ruta & "/" & nombre

El código completo es:

Dim Resp As Byte

Resp = MsgBox("Deseas guardar una copia en el Disco Q?", _
vbQuestion + vbYesNo, "Guardar en Disco Q")
If Resp = vbYes Then

Dim nombre As String, Ruta As String
Ruta = Range("a203").Value
nombre = Range("a200").Value
ActiveWorkbook.SaveAs Filename:=Ruta & "/" & nombre

Else
MsgBox "No se guardará copia en el servidor", vbCritical, "EXCELeINFO"
End If

1 respuesta

Respuesta
1

Faltaría ver cómo se ingresa el nombre del archivo.

Pero, aparentemente, el problema está en la siguiente expresión:

Ruta & "/" & nombre

Debería ser:

Ruta & "\" & nombre

Muchas gracias, corregí el / y efectivamente desapareció el error. no me había dado cuenta de ese detalle.

muchas gracias 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas