Access VBA RunCommandでホームページを開くには、acCmdOpenURLを使います。
DoCmd.RunCommand acCmdOpenURL を実行すると、URLを入力する「インターネットのアドレスを開く」ダイアログが開きます。
そこにURLを入力すると、ブラウザがオープンしWEBサイトが表示されます。
■ サンプルソフト作成手順
1) Accessを起動し、「空のデータベース」をクリックします。
2) データベースファイルの保存先を指定すると、データベースウィンドウが開きますので、「フォーム」「新規作成」の順にクリックします。
3) 「デザインビュー」を選択し、「OK」ボタンをクリックします。
4) フォームにコマンドボタンを設置し、キャプションを「URLを入力」にしました。
5) コマンドボタンのプロパティウィンドウで、クリック時をイベントプロシージャにし、右端のボタンをクリックします。
6) コマンドボタンのクリックイベントが表示されるので、コードを入力します。
7) フォームを保存し開き、「URLを入力」ボタンをクリックします。
8) インターネットのアドレスを開くダイアログが表示されるので、URLを入力し「OK」ボタンをクリックします。
これで、ブラウザが開きWEBサイトが表示されます。
■ Access VBA 実行コード
Option Compare Database
Option Explicit
Private Sub コマンド0_Click()
'AccessからHPを開く
DoCmd.RunCommand acCmdOpenURL
End Sub