Office関連

PowerShellからNetOfficeを使ってWordやPowerPointを操作する方法

前回の記事関連で、

なんてことをツイートしたので、NetOfficeでWordやPowerPointを操作するコードも載せておきます。

NetOfficeでWordを操作するコード

Wordで新規文書を作成して、文頭に日付と時刻を挿入するコードです。

※ 要NetOffice.Word

[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\NetOffice.dll")
[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\OfficeApi.dll")
[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\WordApi.dll")
[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\VBIDEApi.dll")
$app = New-Object NetOffice.WordApi.Application
$app.Visible = $true
$doc = $app.Documents.Add()
$rng = $doc.Range(0,0)
$rng.InsertAfter((Get-Date).ToString("yyyy/MM/dd HH:mm:ss"))
$rng.Bold = $true
$rng.Font.ColorIndex = 5
$doc.SaveAs("C:\Test\Sample.docx")
$doc.Close()
$app.Quit()
$app.Dispose()

NetOfficeでPowerPointを操作するコード

PowerPointで新規プレゼンテーションを作成して、スライドを追加、追加したスライドにテキストボックスを挿入するコードです。

※ 要NetOffice.PowerPoint

[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\NetOffice.dll")
[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\OfficeApi.dll")
[void][Reflection.Assembly]::LoadFile("C:\System\NetOffice\PowerPointApi.dll")
$app = New-Object NetOffice.PowerPointApi.Application
$app.Visible = [NetOffice.OfficeApi.Enums.MsoTriState]::msoTrue
$pres = $app.Presentations.Add()
$sld = $pres.Slides.Add(1, [NetOffice.PowerPointApi.Enums.PpSlideLayout]::ppLayoutBlank)
$tbox = $sld.Shapes.AddTextbox([NetOffice.OfficeApi.Enums.MsoTextOrientation]::msoTextOrientationHorizontal, 100, 100, 300, 200)
$tbox.TextFrame2.TextRange.Text = (Get-Date).ToString("yyyy/MM/dd HH:mm:ss")
$tbox.TextFrame2.TextRange.Font.Size = 24
$pres.SaveAs("C:\Test\Sample.pptx")
$app.Quit()
$app.Dispose()

関連記事

  1. Office関連

    [Office 2013]オンライン テンプレートを無効にする。

    前回の記事ではOffice 2013でSkyDriveを無効にする方法…

  2. Office関連

    Evernote Cloud SDKを使ったVBAマクロ

    3年ほど前にEvernote for Windowsを操作するVBAマ…

  3. Office関連

    VALUE DOMAINで管理しているドメインをOffice 365で使用する。

    Office 365をセットアップすると設定される初期ドメイン「onm…

  4. Office関連

    Google翻訳で文字列を翻訳するVBAマクロ(IE操作版)

    下記記事にあるように、ニューラルネット機械翻訳の導入によって、Goog…

  5. Office関連

    Trello APIを使ってカードを投稿するVBAマクロ

    以前Fiddlerを使ってTrello APIを実行する記事を書きまし…

  6. Office関連

    [Office 2013]コントロール日英比較表

    日本語版と英語版のOffice 2013でコントロール(コマンド)名や…

コメント

  • コメント (0)

  • トラックバックは利用できません。

  1. この記事へのコメントはありません。

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP