eclass.unmer.ac.id

$excel = New-Object -ComObject Excel.Application
$excel.Visible = $false
$excel.DisplayAlerts = $false
$workbook = $excel.Workbooks.Open("C:\xampp\htdocs\www.raasleela.net\raasleela.net-Performance-on-Search-2026-02-04.xlsx")

Write-Host "=== SHEETS IN WORKBOOK ==="
for ($i = 1; $i -le $workbook.Sheets.Count; $i++) {
    $sheetName = $workbook.Sheets.Item($i).Name
    Write-Host "Sheet ${i} - ${sheetName}"
}

for ($s = 1; $s -le $workbook.Sheets.Count; $s++) {
    $sheet = $workbook.Sheets.Item($s)
    $sheetName = $sheet.Name
    Write-Host ""
    Write-Host "=== SHEET - ${sheetName} ==="

$usedRange = $sheet.UsedRange
    $rows = $usedRange.Rows.Count
    $cols = $usedRange.Columns.Count
    Write-Host "Rows - ${rows}, Columns - ${cols}"

$maxRows = [Math]::Min($rows, 550)
    for ($i = 1; $i -le $maxRows; $i++) {
        $row = @()
        for ($j = 1; $j -le $cols; $j++) {
            $cell = $sheet.Cells.Item($i, $j).Text
            $row += $cell
        }
        Write-Host ($row -join "`t")
    }
}

$workbook.Close($false)
$excel.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($excel) | Out-Null