Saltar al contenido

Ultima fecha de modificación de archivos word y excel

publicado

Buenas noches, molesto vuestra atención, porque deseo saber si mediante algún método, función, formula o macro, es posible hacer que aparezca en el pie de página, la última fecha de modificación del archivo. Agradeceré vuestra sugerencia

Gracias por la atención

Jorge desde Perú

Featured Replies

publicado

Buenas [uSER=530]@Callao2908[/uSER] tienes 2 opciones

1º Con VBA, coloca el siguiente código

Sub ShowDocumentInformation()
    Dim d As String
    With CreateObject("Scripting.FileSystemObject")
        With .GetFile(Documents(Documents.Count).FullName)
            d = UCase(Documents(Documents.Count).Name) & vbNewLine & vbNewLine & vbTab & _
                "Creado: " & .DateCreated & vbNewLine & vbTab & _
                "Último acceso: " & .DateLastAccessed & vbNewLine & vbTab & _
                "Última modificación: " & .DateLastModified & vbNewLine
        End With
    End With
    MsgBox d, 0, "Información de acceso al archivo"
End Sub

2º Insertar un Elemento rápido, para ello

a) Clic
Insertar

B)

En Texto despliegas el menú
Elemento rápido
, Clic en
campo

c) en
Categorías
, seleccionas
Info. documento

d) en
Nombres de campos
, seleccionas
DocProperty

e) en
Propiedades de campo
, seleccionas
LastSavedTime

f) click en
Aceptar

Un saludo

publicado
  • Autor

Gracias Miguel Angel, procederé a hacer las pruebas coorespondientes.

Gracias

Jorge

publicado
  • Autor

Gracias Miguel Angel. Correcto.

Por favor dar por SOLUCIONADO el tema

Saludos Jorge

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.