Excelマクロを実行して値をPADに返す。

▲Webページ（スクレイピングテストページ）をPADでスクレイピングしてExcelダウンロードします。

▲図はWebからスクレイピングしてダウンロードしたExcelファイルです。Power Automate for desktopでVBAマクロを実行して、12行目の２つのセルに新しい品目と金額を書き込みを行います。（図の赤枠）

▲マクロで書き込みを行うと合計金額C17セルに入力されているSUM関数の値が更新されます。図では、もともとの合計金額600円が、マクロの書き込みにより1000円に更新されました。

▲更新された合計金額1000円という数字を一旦マクロブックに書き込みます。これをPower Automate for desktopで読み取ります。

わざわざマクロブックに書き込みを行う理由は、マクロからPADに直接値を受け渡しできないからです。

取得出来たことの確認としてメッセージボックスに合計金額を表示することにします。

VBE(Visual Basic for application Editor)が開きます。

Sub WriteExcel(FILENAME As String)
    
    Dim Book As Workbook
    Set Book = Excel.Workbooks.Open(FILENAME)
    
    '２つのセルに書き込みする。
    With Book.Worksheets(1)
        .Range("B12").Value = "みかん"
        .Range("C12").Value = 400
    End With
    
    'マクロブックに更新された合計金額を記録する。
    ThisWorkbook.Worksheets(1).Range("A1") = Book.Worksheets(1).Range("C17").Value

    
    '保存して閉じる。
    Book.Close savechanges:=True
    Set Book = Nothing
End Sub

▲今回記述したコードはこちらです。DLしたファイルのB12セル、C12セルの値を入力して上書き保存するマクロです。

「×」ボタンかAlt＋F4を押してVBEを閉じます。

下記に保存しました。

• ファイル名：C:\Users\user\Documents¥textMacrobook.xlsm
• マクロ名：WriteExcel

PADの基本的な使い方はこちら

【初心者向け】Power Automate for Desktop の使い方を解説！ この記事はPower Automate for Desktopのインストール方法について解説する記事です。初心者向けの解説となっています。 この記事でわかること！ Power Automate for De…

▲Power Automate for desktopの基本操作はこちらをご覧ください。

ファイルのダウンロードに使う「Webページのダウンロードリンクをクリックします」アクションは、Internet Explorerにしか対応していません。必ずIEを選択してください。

▲「ブラウザー自動化＞新しいInternet Explorerを起動します」

▲パラメータを入力します。

テスト用のWebページを下記に用意しました。自由にお使いください。

あわせて読みたい

Power Automate for desktop スクレイピングテストページ-1 【このページの説明】 このページはPower Automate for desktopのWebスクレイピング用テストページです。管理人がスクレイピングでファイルをダウンロードする検証を行…

▲「Webページのダウンロードリンクをクリックします」アクションを追加します。

▲パラメータを入力します。

UI要素を追加する方法については下記で解説しています。参考になさってください。

あわせて読みたい

【超初心者向け】PADでWeb上のファイルをダウンロードする方法!! この記事ではPower Automate for Desktopを使ってファイルをダウンロードして次のアクションに渡す方法を学習します。 この記事でわかること！ Power Automate for Desk…

▲Excel＞Excelの起動

▲パラメータを入力します。

「アドインとマクロの読み込み」はExcelを開いた時にトリガー実行されるマクロが仕込まれている場合に、それを実行するかどうかの設定っぽいです（OnOpenトリガー）。今回ここで開くExcelブックのマクロを実行するわけなので一見この設定はオンにしなければいけないのかなと思いがちですが、そういうわけで今回は必要ありませんのでチェックをオフにします。

▲「Excel>詳細＞Excelマクロの実行」

▲パラメータを入力します。

今回実行するマクロ名は「WriteExcel」という名前です。引数としてWebからダウンロードしたExcelファイルのフルパスを欲しがっているので渡します。ファイルのフルパスは「Webページのダウンロードリンクをクリックします」の出力変数である%DownloadedFile%変数のFullNameプロパティに格納されています。

変数とプロパティについて

Power Automate Desktop変数について図解しました① 【Power Automate Desktopの変数について解説します。】 以前の記事↓でPower Automate Desktop （以下PAD）はいくつかの”アクション”を組み合わせて”フロー”を作るとお…

▲「Excel>Excelワークシートから読み取り」

▲パラメータを入力します。

▲Excel＞Excelを閉じる

▲パラメータを入力します。

マクロブックを閉じます。

▲「メッセージボックス＞メッセージを表示」

▲パラメータを入力します。

%ExcelData%はSTEP6で追加した「Excelワークシートから読み取り」アクションの出力変数です。