Como mudar um arquivo com data modificada no Excel VBA

Escrito por jim campbell | Traduzido por victor almeida
  • Compartilhar
  • Tweetar
  • Compartilhar
  • Pin
  • E-mail
Como mudar um arquivo com data modificada no Excel VBA
Você pode programar no Excel mudando diversas informações (BananaStock/BananaStock/Getty Images)

A linguagem de programação VBA do Excel permite que você manipule o momento em que um arquivo foi criado e modificado. Este processo é benéfico quando você deseja manipular programaticamente dados de arquivos para reverter as alterações ou configurar um processo manual que acompanha as mudanças que as pessoas fazem no arquivo do Excel e da data em que o arquivo teve suas mudanças feitas.

Nível de dificuldade:
Moderado

Outras pessoas estão lendo

Instruções

  1. 1

    Abra o programa do Excel a partir do menu de programas do Windows e abra o arquivo que você deseja usar para editar a data do arquivo. Clique na guia "Desenvolvedor" e depois no botão VBA para abrir o seu arquivo de código.

  2. 2

    Crie as variáveis ​​do VBA. Você precisa definir a variável para o "Modified Date" atribuido no arquivo e a data que deseja usar na data modificada. O código a seguir define as variáveis​​:

    Dim arquivo As String Dim resultados As Boolean Dim novadata As Double Dim modificação As FileDateToProcess

  3. 3

    Configure o nome do arquivo. Você pode usar a variável "file" para definir o nome do arquivo. O código a seguir define a sequência do nome de arquivo:

    file = "myfile.xls"

    Substitua "myfile.xls" com qualquer nome de arquivo que você deseja modificar.

  4. 4

    Altere a data de modificação do arquivo. Você pode usar a função de Excel VBA "SetFileDateTime" para editar esta data. O código a seguir altera para "1/1/2011":

    NewDate = "1/1/2011" results = SetFileDateTime (FileName: = file, FileDateTime: = newdaate, WhichDateToChange: = modificado, NoGMTConvert: = False)

  5. 5

    Será exibido uma mensagem de sucesso ao usuário após a data ser modificada. O código a seguir determina se quaisquer erros foram encontrados e exibe a mensagem de sucesso:

    If results = True Then Debug.Print "File successfully modified." End If

Não perca

Filtro:
  • Geral
  • Artigos
  • Slides
  • Vídeos
Mostrar:
  • Mais relevantes
  • Mais lidos
  • Mais recentes

Nenhum artigo disponível

Nenhum slide disponível

Nenhum vídeo disponível