Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Новый участник


Сообщения: 24
Благодарности: 2

Профиль | Отправить PM | Цитировать


Powershell

написал только что , так что без особого тестирования... Сначала лучше запустить на "кошках"
Excel 2007.

Код: Выделить весь код
$xlCellTypeLastCell = 11
$xl = New-Object -com Excel.Application
$xl.Visible = $false
$xl.DisplayAlerts = $False

Get-ChildItem -Path c:\temp\excelRemouveColumn -Recurse -Include *.xlsx | %{
$wb = $xl.Workbooks.Open($_.fullname) 

1..$wb.Worksheets.Count | %{
$ws = $wb.Worksheets.Item($_)
if($ws.cells.item(1,2).value() -eq "Owner"){
[void]$ws.columns.item(2).delete()
}
}
$wb.Save()
$wb.Close()
}
$xl.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($xl)
Remove-Variable xl
Upd. Язык Office 2013 должен совпадать с региональными стандартами

Последний раз редактировалось Vadikan, 16-04-2013 в 22:02. Причина: upd

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:12, 07-12-2012 | #3