satocchiaブログ

satocchiaブログ

PR

キーワードサーチ

▼キーワード検索

プロフィール

satocchia

satocchia

カレンダー

お気に入りブログ

まだ登録されていません

コメント新着

effelpist@ kilovermek.es effelpist <a href="https://kilovermek.es/…
tomoZo@ Re:Pale Moon日本語化トラブル(06/06) はじめまして。 28.16.0でまたもや提供さ…
satocchia @ Re[1]:Pale Moon日本語化トラブル(06/06) zui_9さんへ 本日、確認しました。ようや…
zui_9 @ Re:Pale Moon日本語化トラブル(06/06) 上記リンク「Githubのプロジェクト」の左…
わたなべ@ Re:powershellコンソール、見づらくありませんか?(08/26) 初めまして、この情報最高です! 背景を白…

フリーページ

2021.10.29
XML
カテゴリ: powershell
今回はPDFの分割。
元のPDFファイル名に枝番を付して、指定フォルダ(無指定:デスクトップ)に生成する。
使用している関数  set-PdfSharpAssembly は​ 前回のやつ ​。


split-pdf

function split-pdf{
    param( 
        [parameter(mandatory)][string]$pdfpath,
        [parameter(mandatory=$false)][string]$outfolder="$env:userprofile\desktop"
    )
    if ( !( Test-Path $pdfpath ) ){
        throw "pdfのパスが見つかりません:$pdfpath"
    }
    set-PdfSharpAssembly
    $inputpdf = [PdfSharp.Pdf.IO.PdfReader]::Open( $pdfpath, [PdfSharp.Pdf.IO.PdfDocumentOpenMode]::Import )
    $totalpages = $inputpdf.pagecount
    $NombreWidth = [math]::Floor([math]::Log10( $totalpages )) + 1
    $NameStem = [io.path]::GetFileNameWithoutExtension( $pdfpath )
    for ( $Nombre = 0; $Nombre -lt $totalpages; $Nombre++ ){
        $outname = "${NameStem}_" + ([string]$Nombre).PadLeft( $NombreWidth, "0" ) + ".pdf"
        $outpath = Join-Path $outfolder $outname
        $pdfdoc = New-Object PdfSharp.Pdf.PdfDocument
        $pdfdoc.AddPage( $inputpdf.pages[ $Nombre ] )|Out-Null
        $pdfdoc.Save( $outpath )
   }
}





お気に入りの記事を「いいね!」で応援しよう

最終更新日  2021.10.29 11:29:03
コメント(0) | コメントを書く


【毎日開催】
15記事にいいね!で1ポイント
10秒滞在
いいね! -- / --
おめでとうございます!
ミッションを達成しました。
※「ポイントを獲得する」ボタンを押すと広告が表示されます。
x
X

© Rakuten Group, Inc.
X
Design a Mobile Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: