Нужно переконвертировать файл excel в json

$files = Get-ChildItem C:\test\*.xlsx -recurse
 
$Excel = New-Object -ComObject Excel.Application
$Excel.visible = $false
$Excel.DisplayAlerts = $false
 
ForEach ($file in $files) {
     Write "Loading File '$($file.Name)'..."
     $WorkBook = $Excel.Workbooks.Open($file.Fullname)
     $NewFilePath = [System.IO.Path]::ChangeExtension($file.Fullname,".txt")
     $Workbook.SaveAs($NewFilepath, 42)   # xlUnicodeText
}
 
# cleanup
$Excel.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($WorkBook) | Out-Null
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($Excel) | Out-Null
[System.GC]::Collect()
[System.GC]::WaitForPendingFinalizers()

$json = Get-Content D:\test.json -Raw -Encoding UTF8| ConvertFrom-Json
$rows = foreach ($item in $json) {
    [pscustomobject]@{
        date_entry                       = $item.date_entry
        series                           = $item.series
        number                           = $item.number
        date_issue                       = $item.date_issue
        hunter_series_passport           = $item.hunter_id.series_passport
        hunter_number_passport           = $item.hunter_id.number_passport
        hunter_date_issue                = $item.hunter_id.date_issue
        hunter_issued_by                 = $item.hunter_id.issued_by
        is_belonged_to_indigenous_people = [bool]$item.is_belonged_to_indigenous_people
        cancellation_date                = $item.cancellation_date
        cancellation_reason              = $item.cancellation_reason.name
        attached_id                      = $item.attached_files.id
        attached_file                    = $item.attached_files.file
        attached_name                    = $item.attached_files.name
    }
}
$rows | Export-Excel D:\result.xlsx -WorksheetName Data -AutoSize

$xlsx = 'D:\result.xlsx'
$out  = 'D:\result.json'
 
Import-Excel -Path $xlsx -HeaderRow 1 |
  ConvertTo-Json |
  Set-Content -Path $out -Encoding utf8

$file = 'C:\tmp\003\result.csv'
$table = Get-Content $file -Encoding utf8 | ForEach-Object { , ($_ -split ";") }
 
$data = @()
$datum = @{}
$datum.Add("date_entry", $table[2][0])
$datum.Add("series", $table[2][1])
$datum.Add("number", $table[2][2])
 
$hunter = @{}
$hunter.Add("series_passport", $table[2][4])
$hunter.Add("number_passport", $table[2][5])
$hunter.Add("date_issue", $table[2][6])
$hunter.Add("issued_by", $table[2][7])
 
$datum.Add("hunter_id", $hunter)
 
$data = , $datum
 
$data | ConvertTo-Json

$xlsx = 'D:\result.xlsx'
$out  = 'D:\result.json'
 
Import-Excel -Path $xlsx -HeaderRow 1 |
  ConvertTo-Json |
  Set-Content -Path $out -Encoding utf8

$raw = Import-Excel $xlsx -WorksheetName 'Sheet1' -NoHeader -AsDate P1, P4, P7
 
$data = [pscustomobject] @{
    $raw.P1[0] = $raw.P1[2]
    $raw.P2[0] = $raw.P2[2]
    $raw.P3[0] = $raw.P3[2]
    $raw.P4[0] = $raw.P4[2]
    $raw.P5[0] = [pscustomobject] @{ # hunter_id
        $raw.P5[1] = $raw.P5[2]
        $raw.P6[1] = $raw.P6[2]
        $raw.P7[1] = $raw.P7[2]
        $raw.P8[1] = $raw.P8[2]
    }
    $raw.P9[0] = $raw.P9[2]
    $raw.P10[0] = $raw.P10[2]
    $raw.P11[0] = [pscustomobject] @{ # cancellation_reason
        $raw.P11[1] = $raw.P11[2]
    }
    $raw.P12[0] = [pscustomobject] @{ # attached_files
        $raw.P12[1] = $raw.P12[2]
        $raw.P13[1] = $raw.P13[2]
        $raw.P14[1] = $raw.P14[2]
    }
}
 
$data | ConvertTo-Json

function conv {
    #адресация колонок в EXCEL 
    param($num)
    $base,$res = 26,''
    $alph = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
    while($num -gt 0){
        $num -= 1
        $num,$t = ([math]::floor($num/$base)),($num%$base)
        $res = $alph[$t] + $res
    }
    return $res
}
 
function get-datasheet{
    param($wsheet)
    $data = $wsheet.usedrange.cells()
    $wd = $data|select @{n='Column';e={conv($_.column)}},row,
        @{n="CellsAddress";e={$_.cells.address() -replace '\$'}},mergecells,
        @{n="MergeArea";e={if($_.mergecells){$_.mergearea.address() -replace '\$'}}},
        @{n="Text";e={if($_.text){$_.text}elseif(!($_.mergecells)){'null'}}}
 
    return $wd
}
 
$file = gi .\test.xlsx
 
$ids = ps excel -ea 0|%{$_.id}
$excel = new-object -com Excel.Application
$excelid = ps excel|%{$_.id}|?{$ids -notcontains $_}
$excel.visible = $true
$excel.displayalerts = $false
$workbook = $excel.workbooks.open($file.fullname)
$worksheets = $workbook.sheets
"Всего листов:"
$worksheets|select index,name|ft -a
 
foreach($item in $worksheets){
    $wshd = get-datasheet $item
    "==============$($item.name)=============="
    $wshd|ft -a -w
    "================================="
    ""
    [runtime.interopservices.marshal]::releasecomobject($item) | out-null
}
 
$workbook.close($false) # $false - не сохранять изменения
$excel.quit()
[runtime.interopservices.marshal]::releasecomobject($workbook) | out-null
[runtime.interopservices.marshal]::releasecomobject($excel) | out-null
kill -id $excelid -force -ea 0
[gc]::collect()
[gc]::waitforpendingfinalizers()

# Установите модуль если не установлен
# Install-Module ImportExcel -Force
 
$xlsx = 'D:\result.xlsx'
$out = 'D:\result.json'
 
# Читаем данные из Excel
$data = Import-Excel -Path $xlsx -NoHeader
 
# Функция для преобразования даты из Excel формата
function ConvertFrom-ExcelDate {
    param($excelDate)
    if ([string]::IsNullOrWhiteSpace($excelDate) -or $excelDate -eq "-") {
        return ""
    }
    try {
        if ($excelDate -is [datetime]) {
            return $excelDate.ToString("yyyy-MM-dd")
        }
        elseif ($excelDate -match '^\d+$') {
            return [DateTime]::FromOADate($excelDate).ToString("yyyy-MM-dd")
        }
        else {
            return $excelDate.ToString()
        }
    }
    catch {
        return $excelDate.ToString()
    }
}
 
# Функция для ручного построения JSON
function ConvertTo-CustomJson {
    param($Object, $IndentLevel = 0)
    
    $indent = " " * ($IndentLevel * 4)
    $innerIndent = " " * (($IndentLevel + 1) * 4)
    
    if ($Object -is [Array]) {
        $items = @()
        foreach ($item in $Object) {
            $items += ConvertTo-CustomJson -Object $item -IndentLevel ($IndentLevel + 1)
        }
        if ($items.Count -eq 0) {
            return "[]"
        }
        $itemsString = $items -join ",`n$innerIndent"
        return "[`n$innerIndent$itemsString`n$indent]"
    }
    elseif ($Object -is [PSCustomObject] -or $Object -is [Hashtable]) {
        $properties = @()
        foreach ($property in $Object.PSObject.Properties) {
            $value = ConvertTo-CustomJson -Object $property.Value -IndentLevel ($IndentLevel + 1)
            $properties += "$innerIndent`"$($property.Name)`": $value"
        }
        if ($properties.Count -eq 0) {
            return "{}"
        }
        $propertiesString = $properties -join ",`n"
        return "{`n$propertiesString`n$indent}"
    }
    elseif ($Object -is [bool]) {
        return $Object.ToString().ToLower()
    }
    elseif ($Object -is [string]) {
        # Экранируем кавычки и обратные слеши
        $escaped = $Object -replace '\\', '\\' -replace '"', '\"' -replace "`n", "\n" -replace "`r", "\r" -replace "`t", "\t"
        return "`"$escaped`""
    }
    elseif ($null -eq $Object) {
        return "null"
    }
    elseif ($Object -is [int] -or $Object -is [long] -or $Object -is [double] -or $Object -is [decimal]) {
        return $Object.ToString()
    }
    else {
        return "`"$Object`""
    }
}
 
# Пропускаем первые две строки (заголовки) и обрабатываем только строку с данными
$dataRow = $data[2]
 
# Исправляем логику для boolean поля
$isIndigenous = $false
if ($dataRow.P9 -eq "True" -or $dataRow.P9 -eq $true) {
    $isIndigenous = $true
}
 
# Создаем объект с нужной структурой
$result = [PSCustomObject]@{
    date_entry = ConvertFrom-ExcelDate $dataRow.P1
    series = $dataRow.P2.ToString()
    number = $dataRow.P3.ToString()
    date_issue = ConvertFrom-ExcelDate $dataRow.P4
    hunter_id = [PSCustomObject]@{
        series_passport = $dataRow.P5.ToString()
        number_passport = $dataRow.P6.ToString()
        date_issue = ConvertFrom-ExcelDate $dataRow.P7
        issued_by = $dataRow.P8.ToString()
    }
    is_belonged_to_indigenous_people = $isIndigenous
    cancellation_date = ConvertFrom-ExcelDate $dataRow.P10
    cancellation_reason = [PSCustomObject]@{
        name = $dataRow.P11.ToString()
    }
    attached_files = [PSCustomObject]@{
        id = $dataRow.P12.ToString()
        file = $dataRow.P13.ToString()
        name = $dataRow.P14.ToString()
    }
}
 
# Используем ручное форматирование для массива с одним элементом
$jsonContent = ConvertTo-CustomJson -Object @($result)
 
# Сохраняем результат
$jsonContent | Set-Content -Path $out -Encoding utf8
 
Write-Host "JSON успешно сохранен в: $out"

[
    {
        "date_entry": "2025-01-01",
        "series": "001A",
        "number": "010",
        "date_issue": "2025-02-02",
        "hunter_id": {
            "series_passport": "",
            "number_passport": "",
            "date_issue": "2020-01-01",
            "issued_by": "увд"
        },
        "is_belonged_to_indigenous_people": false,
        "cancellation_date": "",
        "cancellation_reason": {
            "name": "Подача охотником заявления об аннулировании своего охотничьего билета"
        },
        "attached_files": {
            "id": "-",
            "file": "-",
            "name": "-"
        }
    }
]