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()

PowerShellからNetOfficeを使ってExcelを操作する方法前のページ

PowerShellからリボンUIを呼ぶ方法次のページ

関連記事

  1. Office アドイン

    JavaScriptで作成した作業ウィンドウアプリを検証してみる。

    ※ この情報はOffice 2013 カスタマー プレビュー版を元にし…

  2. Office関連

    [雑感]Office 365 Soloに向く人、向かない人

    ここ一週間ほどOffice 365 Soloを触ってみて、ある程度のこ…

  3. Office関連

    Computer Vision APIを使って画像から文字列を取得するVBAマクロ

    前々回の記事で、Fiddlerを使ってMicrosoft Cognit…

  4. Office関連

    YouTube動画挿入アドイン for PowerPoint

    前回の記事でPowerPoint 2013でYouTubeの動画が挿入…

  5. Office アドイン

    [Office用アプリ]Office ストアが新しくなりました。

    Office 用アプリやSharePoint 用アプリを配信しているO…

コメント

  • コメント (0)

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

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

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP