Как удалить большое количество столбцов в excel powershell-ом?

Question

[Максим Обухов]

Мне нужно обрабатывать приходящие excel-файлы. Заведомо известно что в них значимых столбцов - 35, не больше (строк - тысячи). Но иногда приходят неясно как формированные файлы в которых столбцов несколько сотен. Соответственно хочу удалить все столбцы правее 35-го. Простым перебором - работает, но очень-очень долго:

$wb = $Excel.Workbooks.Open($ExcelFile)
$ws = $wb.Worksheets.Item(1)
$used = $ws.usedRange
$lastrow = $used.SpecialCells(11).row
$lastcol = $used.SpecialCells(11).column
for ($i = $lastcol; $i -ge 35; $i--) {
  [void]$ws.Columns($i).Delete()
}

Как то можно это ускорить? Пробовал сделать Range и удалить уже его:

$allcol = $ws.Range($ws.Cells.Item(35, 1), $ws.Cells.Item($lastcol,$lastrow))
$allcol.Delete()

Но столбцы не удаляются почему то. ЧЯДНТ? Может какой то еще вариант есть? Заранее спасибо

Answer 1

[azarij]

у меня получилось вот таким образом:

$lastusedcolumn = $ws.Cells.item(1,($ws.columns.Count)).end(-4159).column
foreach ($item in ($lastusedcolumn..36)) {
    $item
    $ws.cells.item(1,$item).entirecolumn.delete()
    
}

Comments

[Максим Обухов]

Спасибо за ответ. Здесь тоже перебор, т.е. столбцы будут удаляться по одному. Это очень медленно, если их много и они большие, у меня примерно 600 столбцов по 6000 строк лишних. Поэтому идея была сделать из них Range и удалить за 1 раз. У меня получилось это реализовать - я просто перепутал порядок параметров в Cells.Item, вот так работает:

$allcol = $ws.Range($ws.Cells.Item( 1,35), $ws.Cells.Item($lastrow, $lastcol))
$allcol.Delete()