フォーラム Power Automate Desktop サンプルフロー PDFからテキストを抽出しExcelに貼り付ける

  • このトピックには0件の返信、1人の参加者があり、最後ににより2021-06-28 16:15に更新されました。
1件の投稿を表示中 - 1 - 1件目 (全1件中)
  • 投稿者
    投稿
  • #2844
    達也鈴木
    参加者

    ※ 仕様上全てのデータを正しく処理できません。

    /# デスクトップにPDFをダウンロードします#/
    Folder.GetSpecialFolder SpecialFolder: Folder.SpecialFolder.DesktopDirectory SpecialFolderPath=> SpecialFolderPath
    Web.DownloadToFolder Url: $'''https://support.asahi-robo.jp/data/PDF-Sample.pdf''' DestinationFolder: SpecialFolderPath ConnectionTimeout: 30 FollowRedirection: True ClearCookies: False UserAgent: $'''Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.21) Gecko/20100312 Firefox/3.6''' Encoding: Web.Encoding.AutoDetect AcceptUntrustedCertificates: False DownloadedFile=> DownloadedFile
    /# PDFのテキストを抽出します#/
    Pdf.ExtractText PDFFile: DownloadedFile ExtractedText=> ExtractedPDFText
    /# スペースをタブに変換します
    ※ 文字中のスペースも変換されるため注意してください ※#/
    Text.Replace Text: ExtractedPDFText TextToFind: $'''%' '%''' IsRegEx: True IgnoreCase: False ReplaceWith: $'''\t''' ActivateEscapeSequences: True Result=> Replaced
    /# クリップボードにコピーしてから、Excelに貼り付けます
    ※ 書き込みの場合は、1つのセルに書き込まれます#/
    Clipboard.SetText Text: Replaced
    Excel.Launch Visible: True LoadAddInsAndMacros: False Instance=> ExcelInstance
    Excel.Advanced.PasteAt Instance: ExcelInstance Column: $'''A''' Row: 1
1件の投稿を表示中 - 1 - 1件目 (全1件中)
  • このトピックに返信するにはログインが必要です。