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