javascriptを実行させる方法

最近の書き込み件数：今日 0件、昨日 0件
未読分：1件

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田伸矢, 植木悠二, 上田寛

IEのデータ収集＆自動操作のプログラミング本はこの1冊だけ！IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

Message#1 2017年6月6日(火)15時11分
From: 初心者

返事削除変更

”VBAからIEでJavascriptを実行”を参考にVBAを作っています。

下記のIE表示イメージに書いた27件中21－27件表示とするための指示(右横にある"２"をクリック）させる処理をさせたいのですが、このときのCall ieJS(objIE,xxxx)の引数JavaScriptコード文字列xxxxをお教え願います。

"VBAからIEでJavascriptを実行"を参考に、onclick="の後の部分(下記)で記述したところ、構文エラーとなりました。
w=document.form1;w.act.value='';w.s_index.value='20';w.submit();return(false);" href="javascript:#">2

<VBA>
Call ieJS(objIE, xxxx)

Sub ieJS(objIE As InternetExplorer, jsCode As String)
objIE.navigate "JavaScript:" & jsCode
End Sub

<IE表示イメージ>
27件中1－20件表示 « 1 2 »

<htmlソース>
<div class="pagination">
<ul>
<li class="disabled"><a href="">«</a></li>
<li class="active"><a href="">1</a></li>
<li><a onclick="w=document.form1;w.act.value='';w.s_index.value='20';w.submit();return(false);" href="javascript:#">2</a></li>
<li><a onclick="w=document.form1;w.act.value='';w.s_index.value='20';w.submit();return(false);" href="javascript:#">»</a></li>
</ul>
</div>