Propósito

✔ Programação GLOBAL® - Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog devem ser tratados como consultoria freelance. Queiram contatar-nos: brazilsalesforceeffectiveness@gmail.com | ESTE BLOG NÃO SE RESPONSABILIZA POR QUAISQUER DANOS PROVENIENTES DO USO DOS CÓDIGOS AQUI POSTADOS EM APLICAÇÕES PESSOAIS OU DE TERCEIROS.

.: Vitrine

Carregando artigos...

Views

Mostrando postagens com marcador pasta. Mostrar todas as postagens
Mostrando postagens com marcador pasta. Mostrar todas as postagens

BATCH | Gerenciamento de Arquivos e Pastas

BATCH | Gerenciamento de Arquivos e Pastas
#ProgramaçãoGlobal #BAT #BATCH #DOS #Script


Nome do Arquivo: Backup_Inteligente.bat


Este script oferece uma solução prática e automatizada para a criação de backups de uma pasta específica. O seu principal objetivo é copiar todo o conteúdo de um diretório de origem para um diretório de destino, organizando os backups em subpastas nomeadas com a data e hora exatas de sua criação. Isso evita a sobreposição de arquivos e mantém um histórico de backups organizado cronologicamente.



Para alcançar essa funcionalidade, o script utiliza variáveis de ambiente do sistema (%DATE% e %TIME%) para construir um nome de pasta único para cada execução. Ele formata essas variáveis para criar um padrão AAAA-MM-DD_HH-MM. O comando XCOPY é o coração da operação, responsável por copiar os arquivos e diretórios de forma recursiva (/S /E), silenciosa (/Q), e garantindo que mesmo arquivos ocultos ou de sistema sejam incluídos (/H).


Este tipo de script é extremamente útil tanto para usuários domésticos quanto para pequenas empresas que precisam de uma estratégia de backup simples e eficaz sem investir em softwares caros. Ele pode ser facilmente customizado alterando-se as variáveis FONTE e DESTINO e agendado para rodar diariamente, garantindo que cópias de segurança de documentos importantes, projetos ou outros dados críticos sejam feitas regularmente.


@REM Nome do Arquivo: Backup_Inteligente.bat

@ECHO OFF

TITLE Rotina de Backup Inteligente


REM --------------------------------------------------------------------------

REM Documentacao:

REM Este script cria um backup de uma pasta de origem para uma de destino.

REM O backup eh salvo em uma subpasta com a data e hora atuais.

REM

REM Comandos Utilizados:

REM   SET          - Define uma variavel de ambiente.

REM   %DATE%       - Variavel que contem a data atual (formato depende do sistema).

REM   %TIME%       - Variavel que contem a hora atual.

REM   XCOPY        - Copia arquivos e arvores de diretorios.

REM     /S         - Copia diretorios e subdiretorios, exceto os vazios.

REM     /E         - Copia diretorios e subdiretorios, incluindo os vazios.

REM     /C         - Continua copiando mesmo que ocorram erros.

REM     /H         - Copia arquivos ocultos e do sistema tambem.

REM     /I         - Se o destino nao existir e estiver copiando mais de um arquivo, assume que o destino eh um diretorio.

REM     /Q         - Nao exibe nomes de arquivos enquanto copia.

REM     /Y         - Suprime o prompt para confirmar a sobreposicao de um arquivo existente.

REM --------------------------------------------------------------------------


ECHO.

ECHO ===================================================

ECHO           INICIANDO ROTINA DE BACKUP

ECHO ===================================================

ECHO.


REM --- CONFIGURACAO ---

SET FONTE="C:\Users\SeuUsuario\Documents\Projetos"

SET DESTINO="D:\Backups"

REM --- FIM DA CONFIGURACAO ---


REM Criando nome da pasta de backup com data e hora

SET DATA_ATUAL=%DATE:~6,4%-%DATE:~3,2%-%DATE:~0,2%

SET HORA_ATUAL=%TIME:~0,2%-%TIME:~3,2%

SET PASTA_BACKUP=%DESTINO%\Backup_%DATA_ATUAL%_%HORA_ATUAL%


ECHO Pasta de Origem: %FONTE%

ECHO Pasta de Destino do Backup: %PASTA_BACKUP%

ECHO.

ECHO Pressione qualquer tecla para comecar...

PAUSE > NUL


ECHO.

ECHO Criando diretorio de backup e copiando os arquivos...

XCOPY %FONTE% %PASTA_BACKUP%\ /S /E /C /H /I /Q /Y


ECHO.

ECHO ===================================================

ECHO           BACKUP REALIZADO COM SUCESSO!

ECHO ===================================================

ECHO.

PAUSE



👉 Siga André Bernardes no LinkedinClique aqui e contate-me via What's App.

Comente e compartilhe este artigo!

brazilsalesforceeffectiveness@gmail.com


 

 Compre OS LIVROS DESTA SÉRIE 



 Série Donut Project 

DONUT PROJECT: VBA - Projetos e Códigos de Visual Basic for Applications (Visual Basic For Apllication)eBook - DONUT PROJECT 2024 - Volume 03 - Funções Financeiras - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 02 - Conectando Banco de Dados - André Luiz Bernardes eBook - DONUT PROJECT 2024 - Volume 01 - André Luiz Bernardes


eBook - PT - Série DONUT PROJECT - Volume 07 - VBA TOP 50 Códigos Mais Importantes - Access — André Luiz BernardeseBook - PT - Série DONUT PROJECT - Volume 07 - VBA TOP 50 Códigos Mais Importantes - Excel — André Luiz Bernardes eBook - PT - Série DONUT PROJECT - Volume 07 - VBA TOP 50 Códigos Mais Importantes - Outlook — André Luiz Bernardes eBook - PT - Série DONUT PROJECT - Volume 08 - VBA TOP 50 Códigos Mais Importantes - Project — André Luiz Bernardes  eBook - PT - Série DONUT PROJECT - Volume 08 - VBA TOP 50 Códigos Mais Importantes - Project — André Luiz Bernardes  eBook - PT - Série DONUT PROJECT - Volume 08 - VBA TOP 50 Códigos Mais Importantes - Word — André Luiz Bernardes

VBA Excel - Função DIR - 01 - Percorrer os arquivos em uma pasta - Loop Through the Files in a Folder


No VBA do Microsoft Excel, a função Dir é usada para retornar o primeiro nome do arquivo num diretório especificado, e uma lista dos seus atributos.

O nome do arquivo é retornado como uma String. A função Dir pode ser usada sem os respectivos argumentos para retornar o nome do próximo arquivo, neste mesmo diretório.

O uso mais comum da função Dir é percorrer todos os arquivos de uma pasta, executando uma ação em cada um. Outros usos comuns incluem a verificação da existência destes, saber se um diretório existe, ou procurar um arquivo específico.


Percorrer os arquivos em uma pasta

Sub AllFiles()

Dim MyFolder As String 'Path containing the files for looping
Dim MyFile As String 'Filename obtained by Dir function
Let MyFolder = "C:\ExcelFiles" 'Assign directory to MyFolder variable

Let MyFile = Dir (MyFolder) 'Dir gets the first file of the folder

'Loop through all files until Dir cannot find anymore
Do While MyFile <> ""

    The statements you want to run on each file
   
    Let MyFile = Dir 'Dir gets the next file in the folder

Loop

End Sub



brazilsalesforceeffectiveness@gmail.com

✔ Brazil SFE®Author´s Profile  Google+   Author´s Professional Profile   Pinterest   Author´s Tweets

VBA Excel - Função DIR - 02 - Listar os arquivos de uma pasta em uma planilha - List the Files from a Folder on a Worksheet




No VBA do Microsoft Excel, a função Dir é usada para retornar o primeiro nome do arquivo num diretório especificado, e uma lista dos seus atributos.

O nome do arquivo é retornado como uma String. A função Dir pode ser usada sem os respectivos argumentos para retornar o nome do próximo arquivo, neste mesmo diretório.

O uso mais comum da função Dir é percorrer todos os arquivos de uma pasta, executando uma ação em cada um. Outros usos comuns incluem a verificação da existência destes, saber se um diretório existe, ou procurar um arquivo específico.


Listar os arquivos de uma pasta em uma planilha

Sub ListFiles()

Dim MyDirectory As String 'Folder containing the files
Dim MyFile As String 'The filename to enter on the worksheet
Dim NextRow As Long 'The row for the next filename in list

MyDirectory = "C:\ExcelFiles" 'Assign directory to MyDirectory variable

MyFile = Dir(MyDirectory) 'Dir gets the first file in the folder

'Find the next empty row in the list and store in NextRow variable
NextRow = Application.CountA(Range("A:A")) + 1

Do Until MyFile = ""

      Cells(NextRow, 1).value = MyFile
     
      NextRow = NextRow + 1 'Move to the next row

      MyFile = Dir 'Dir gets the name of next file in the folder
Loop

End Sub



brazilsalesforceeffectiveness@gmail.com

✔ Brazil SFE®Author´s Profile  Google+   Author´s Professional Profile   Pinterest   Author´s Tweets

VBA Excel - Função DIR - 03 - Verificando a existência de um Arquivo - Check if a Files Exists



No VBA do Microsoft Excel, a função Dir é usada para retornar o primeiro nome do arquivo num diretório especificado, e uma lista dos seus atributos.

O nome do arquivo é retornado como uma String. A função Dir pode ser usada sem os respectivos argumentos para retornar o nome do próximo arquivo, neste mesmo diretório.

O uso mais comum da função Dir é percorrer todos os arquivos de uma pasta, executando uma ação em cada um. Outros usos comuns incluem a verificação da existência destes, saber se um diretório existe, ou procurar um arquivo específico.


Verificando a existência de um Arquivo

Sub FileExists()

      Dim TheFolder As string 'Location of the file
      Dim FiletoCheck As String 'Name of the file you want to check

TheFolder = "C:\ExcelFiles" 'Assign directory to TheFolder variable

'Capture the name of file to check for using an input box
FiletoCheck = InputBox("Enter the name of the file you want to look for", "Enter file name")

'If FiletoCheck is an empty string then file not found
If FiletoCheck = "" Then
     
      Msgbox "Oh no, the file does not exist"

Else

      Msgbox "Yes, the file exists."

End If

End Sub



Tags: Excel, VBA, Files, Folder, list, Dir, filedatetime, xls, xlsm, xlsb, arquivos, pasta, check, exists, function, directory, 

Inline image 1

VBA Excel Basic - Configurando Altura da Linha e Largura da Coluna - How To Set The Row Height And Column Width



Sim, este é mais um tópico voltado para quem está iniciando na utilização do VBA - Visual Basic for Application no MS Excel.

Quando colamos dados em um relatório, invariavelmente queremos formatar o layout desses dados. Aqui, aprendemos como automatizar o acerto das Linhas e Colunas onde os nossos dados ficarão.

Ajustar a altura das Linhas e a Largura das Colunas, fará com que os dados analisados fiquem mais compreensíveis aos usuários que os analisarão.

Sub sbExample13()
    
    Rows(12).RowHeight = 33
    Columns(5).ColumnWidth = 35
End Sub



Deixe os seus comentários! Envie este artigo, divulgue este link na sua rede social...


TagsVBA, Excel, worksheet, workbook, Rows, Columns, Height, Column, largura, altura, linha, coluna, planilha, pasta,


VBA Excel Basic - Como selecionar e Ativar a pasta de uma Planilha - How To Select And Activate Worksheet



Tópico voltado para quem está iniciando na utilização do VBA - Visual Basic for Application no MS Excel.

Copiando o conteúdo de um Range para outro.

Sub sbExample7()
    ' Podemos usar o método Select para selecionar.
    Sheet2.Select
    ' E usamos o método Activate para ativar.
    Sheet1.Activate
End Sub



Deixe os seus comentários! Envie este artigo, divulgue este link na sua rede social...


TagsVBA, Basic, Excel, worskheet, activate, select, Ativar, pasta, Planilha,


diHITT - Notícias