VBAでIE操作に役立つEC-CUBE管理画面商品検索「ecCubeProductSearch」

VBAのIE(InternetExplorer)制御に便利なサブルーチンを紹介しています。

「ecCubeProductSearchサブルーチン」の詳しい説明は以下よりご確認ください。
EC-CUBE管理画面の商品検索「ecCubeProductSearch」の解説

EC-CUBE管理画面商品検索のサブルーチン

Sub ecCubeProductSearch(objIE As InternetExplorer, _
                        Optional revType As Boolean = False)

　'objIEチェック
　If objIE Is Nothing Then: Call btnLogin

　Call tagClick(objIE, "a", "商品マスター")

　Call formText(objIE, "search_product_id", Range("productid"))
　Call formText(objIE, "search_product_code", Range("productcode"))
　Call formText(objIE, "search_name", Range("productname"))
    
　Call tagClick(objIE, "a", "この条件で検索する")

　If revType = True Then: Call tagClick(objIE, "a", "編集")

End Sub

EC-CUBE管理画面に自動ログインのプロシージャ

Sub btnLogin()

    Call ecCubeLogin(objIE, Range("eccubeurl"), Range("eccubeid"), Range("eccubepass"))

End Sub
引数名データ型内容値の事例初期値省略
objIEInternetExplorerIEオブジェクトobjIE,objIE2×
revTypeBoolean検索・編集タイプTrue,FalseFalse●
ecCubeProductSearch("IEオブジェクト", "検索・編集タイプ")

「objIE」は必須項目です。
「objIE」は複数ページを表示させる場合に「objIE」「objIE2」と複数オブジェクトを生成します。
「revType」は検索・編集タイプのチェック用として利用します。
「編集」については、次回説明しますが、検索までの処理と同じ処理を辿ります。
まったく同じ処理なら、その部分だけオブジェクト化すればよいのですが、今回は「検索」「編集」だけですので、1つのサブルーチンの中で処理をする形にしています。