Скопируйте лист Excel из одной рабочей книги на другую с PowerShell

StackOverflow https://stackoverflow.com/questions/3226096

Вопрос

Я хотел бы скопировать (или переместить) рабочий лист из одной рабочей книги на другую книгу с PowerShell.

Я сделал это раньше и не помню, как.Я думаю, что использовал функцию copyto ().

Просто чтобы начать.

$missing = [System.Type]::missing
$excel = New-Object -Com Excel.Application

$wb1 = $excel.Workbooks.Add($missing)
$wb2 = $excel.Workbooks.Add($missing)

# Now, to copy worksheet "Sheet3" from $wb2 into $wb1 as second worksheet.
# How?
.

Это было полезно?

Решение

См. см. post из Кирона

Изменен индекс для копирования на второй лист:

$file1 = 'C:\Users\eric\Documents\Book1.xlsx' # source's fullpath
$file2 = 'C:\Users\eric\Documents\Book2.xlsx' # destination's fullpath
$xl = new-object -c excel.application
$xl.displayAlerts = $false # don't prompt the user
$wb2 = $xl.workbooks.open($file1, $null, $true) # open source, readonly
$wb1 = $xl.workbooks.open($file2) # open target
$sh1_wb1 = $wb1.sheets.item(2) # second sheet in destination workbook
$sheetToCopy = $wb2.sheets.item('Sheet3') # source sheet to copy
$sheetToCopy.copy($sh1_wb1) # copy source sheet to destination workbook
$wb2.close($false) # close source workbook w/o saving
$wb1.close($true) # close and save destination workbook
$xl.quit()
spps -n excel
.

Лицензировано под: CC-BY-SA с атрибуция
Не связан с StackOverflow
scroll top