n A B C 1 ◯ ◯ 2 ◯ ◯ 3 ◯ ◯ ◯ この表を 1 A ◯ 1 C ◯ 2 B ◯ 2 C ◯ 3 A ◯ 3 B ◯ 3 C ◯ こういう風に整形 Option Base 1 Sub hogehoge() Dim i&, j&, result(), oldUbound Redim result(3, 1) With Selection For i=2 to .Rows.Count For j=2 to .Columns.Count…

VBAでのInternetExplorer操作・自動化について、 サンプルコードとともにまとめます。 開発・試験環境で、特別なツール無しに、Excel／VBAでIE操作の自動化が可能です。 結合試験工程以降で特に効果が高いと思います。 seleniumやphantomjsなど使えないとこ…

前回はIEを起動する処理について書きましたが、 今回はまずHTMLのtitle要素からIEのウィンドウを取得する方法です。 'IE探索 titleで検索 Private Function getIEbyTitle(title as String) as Object Dim colsh as Object, win as Object Set colsh = Create…