[Resuelto] Guardar en 2 destinos a la vez
[Resuelto] Guardar en 2 destinos a la vez
Me gustaría saber si hay alguna forma de que cada vez que se guarde el archivo, se guarde simultáneamente en un pen. Gracias
Última edición por entarbol el Lun May 22, 2023 7:47 pm, editado 1 vez en total.
OPENOFFICE 4.01 WINDOWS 8.1
Re: Guardar en 2 destinos a la vez
Buen día,
No sé qué es un "pen", pero sé que hay extensiones que manejan copias de seguridad, yo personalmente no las uso, pero yo manejo un macro simple que hace una copia de seguridad al día de cada archivo que yo abra y modifique.
A ver si te sirve, eso sí, mi macro es para Libre Office, no debería haber problemas de incompatibilidad, pero es una posibilidad que no puede descartarse.
Tendrías que poner este macro en tu carpeta en un módulo de "Mis macros y diálogos" y después hacer que se ejecute con el evento o suceso de "Guardar documento".
El macro lo puedes asignar a algunos archivos específicos (yendo manualmente archivo por archivo y asignando el macro al suceso), o lo puedes asignar al programa y se aplica a todos los archivos, al menos así es en Libre Office.
Para acceder a "Mis macros y diálogos", debes ir a Herramientas>Macros>Organizar macros>BASIC... De ahí vas a "Standard" y de "Standard" a un módulo y pegas el macro ahí.
Para asignar el macro a el suceso, vas a Herramientas>Personalizar>Sucesos y ahí buscas es suceso que más se adapte a tus necesidades.
No sé qué es un "pen", pero sé que hay extensiones que manejan copias de seguridad, yo personalmente no las uso, pero yo manejo un macro simple que hace una copia de seguridad al día de cada archivo que yo abra y modifique.
A ver si te sirve, eso sí, mi macro es para Libre Office, no debería haber problemas de incompatibilidad, pero es una posibilidad que no puede descartarse.
Tendrías que poner este macro en tu carpeta en un módulo de "Mis macros y diálogos" y después hacer que se ejecute con el evento o suceso de "Guardar documento".
El macro lo puedes asignar a algunos archivos específicos (yendo manualmente archivo por archivo y asignando el macro al suceso), o lo puedes asignar al programa y se aplica a todos los archivos, al menos así es en Libre Office.
Para acceder a "Mis macros y diálogos", debes ir a Herramientas>Macros>Organizar macros>BASIC... De ahí vas a "Standard" y de "Standard" a un módulo y pegas el macro ahí.
Para asignar el macro a el suceso, vas a Herramientas>Personalizar>Sucesos y ahí buscas es suceso que más se adapte a tus necesidades.
Código: Seleccionar todo
Sub GuardarAutomatico
Dim sURL, sFecha As String, oDoc As Object
oDoc = ThisComponent
'Se obtiene el nombre del archivo que se está guardando.
sURL = Dir(oDoc .getURL,16)
'Se obtiene la fecha actual.
sFecha = Format(Now(), "ddmmyyyy")
'Se hace una ruta para guardar la copia automática.
sURL = ConvertToURL ("C:\Users\Ejemplo\Documents\Copias automaticas\"+sFecha+" "+sURL)
'Si no se ha creado un archivo ese día, se guarda una copia, si el archivo de esa ruta ya existe, no hace nada.
If Dir(sURL) = "" Then oDoc.storeToRecoveryFile (sURL, Array())
End Sub
LibreOffice 7.2.6.2 | Windows 7 Ultimate