Dividir pasta com arquivos em subpastas de 50 MB usando bat ou powershell

Question

Eu tenho uma pasta de 700 MB contendo arquivos de texto de 24k com tamanhos variados. Eu quero criar novas pastas, cada um com ~ 50 MB de tamanho para que eu possa processá-los no Excel usando vba, pois tem limite de linhas de 10 lakh linhas.

Qualquer ajuda será apreciada.

    

Answer 1

Eu estava interessado em fazer isso também, então aqui está o código do PowerShell que eu uso. Isso obterá todos os arquivos da pasta principal e os moverá para subpastas de 10 MB. Sinta-se à vontade para adaptar valores e nomes à sua necessidade.

# Replace with your base folder's path
$baseFolder = "C:\Users\you\myHugeFolder"

# Replace with the desired value for the subfolders to create
$maxSubFolderSize = 10MB

# Get all files contained in your base folder (could use the -recurse switch if needed)
$allFiles = Get-ChildItem $baseFolder

# Setting the subfolders naming convention : a name and a suffix
$baseSubFolder = "SubFolder-"
[int]$index = 0

# Creating the first subfolder
$subFolder = "SubFolder-" + "$index"
New-Item -Path $subFolder -Type Directory -Force

# Now processing the files
foreach ($file in $allFiles)
{
    # Evaluating the size of the current subfolder
    $subFolderSize = ((Get-ChildItem $subFolder -Recurse | Measure-Object -Property Length -Sum -ErrorAction Stop).Sum / 1MB)

    # If the current subfolder size is greater than the limit, create a new subfolder and begin to copy files in it
    if([int]$subFolderSize -gt [int]$maxSubFolderSize/1MB)
    {
        $index++
        $subFolder = $baseSubFolder + $index
        New-Item -Path $subFolder -Type Directory -Force
        Write-Verbose -Message "Created folder $subFolder"
        Move-Item $file.FullName -Destination $subFolder
    }
    # If the current subfolder is not yet greater that the limit, continue copying files in it
    else {
        Move-Item $file.FullName -Destination $subFolder
    }
}

Espero que isso ajude!