なぜNavigateは候補に表示されないのでしょう
- フォーム作成時にMicrosoft Web Browserを設置し、Form_LoadイベントでNavigateを記述する際に候補に表示されない問題があります。
- オブジェクトブラウザでNavigateを検索すると、[SHDocVw.WebBrowser のメンバ]としてヒットしますが、コード入力中には候補に表示されません。
- Navigateのスペルが覚えにくいため、候補が出ると便利です。
- ベストアンサー
なぜNavigateは候補に表示されないのでしょう
なぜNavigateは候補に表示されないのでしょうか？ フォームを作成し、 ツールボックス→[コントロールの選択]で Microsoft Web Browserをクリックしてフォーム上に設置しました。 そしてＶＢＡ画面のForm_Loadイベントで Me.WebBrowser1.Navigate URL を記述しようと思い Me.WebBrowser1.nと入力してもNameしか出てきません。 なぜNavigateは候補に表示されないのでしょうか？ オブジェクトブラウザでNavigateを検索してみると [SHDocVw.WebBrowser のメンバ] としてヒットするので、 Me.WebBrowser1.nと入力したあとに表示されても良い気がするのですが・・・ Navigateのスペルは覚えにくいので候補が出たらいいなーと思っています。 ご教授よろしくお願いします。
- sd32we23
- お礼率75% (12/16)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
＃１ヶ月前の質問を発掘！ Accessの場合、Me.WebBrowser1は、"WebBrowser"じゃなく"CustomControl"ですよ。（※Excelの場合は"WebBrowser"なので候補でます） Form1 .WebBrowser1 As CustomControl .Object As Object/WebBrowser .Navigate たぶんObjectは規定値なので省略可。Object自体はObject型なので、.Object.n と入力してもダメ。 以下のようにすれば候補でます。 Dim wb As WebBrowser set wb = Me.WebBrowser1.Object wb.n >> [.Navigate] ・・・実用性はないです。 ちなみに この他のケースで、オブジェクトブラウザ＆候補に表示されないのは、下位互換のため残されている古いパラメータ/メソッド。そういう時は、 右クリック＞非表示のメンバを表示
関連するQ&A
- アクセスのフォームに動画を入れたいと思っています。
アクセスのフォームに動画を入れたいと思っています。 手順については、こちらのサイトで下記を見つけたのでそれを参考にしました。 (1)GIF動画を貼り付けたHTMLファイルを作成します。 例えば、C:\test.htm (2)Microsoft Web Browserをフォームの中に埋め込みます。 例えば、『WebBrowser0』という名前にします。 (3)フォーム読み込み時にそのページを呼び出します。 Private Sub Form_Load() WebBrowser0.Navigate "C:\test.htm" End Sub これで、フォームを開いたときに、test.htmが表示されるはずです。表示サイズなどは調整してください。 ここまでが参考にした文章です。それで、下記が私の作成したVBAです。 Private Sub Form_Load() WebBrowser0.Navigate "test.htm" End Sub test.htmという画像をファイルに保存しました。プロパティはインターネットエクスプローラーで、ダブルクリックすると動画になっています。 しかし、アクセスに上記のコードを入力すると、 Web ページへのナビゲーションは取り消されました と表示されます。（WEBページのように見えますので、一応、WebBrowser0.Navigate は機能しているが、このtest.htmのファイルが何か悪いのでしょうか。 どなたか、何が間違いか教えていただけないでしょうか。
- ベストアンサー
- Visual Basic
- ＵＲＬ名を取得するには？
アクセスのフォームに Web Browserを設置して、 Me.WebBrowser1.Navigate "http://www.yahoo.co.jp/" としました。 その時、サイト名（名前）を、タブに表示したいのですが、まず名前の取得ができません。 http://www.yahoo.co.jp/の名前は「Yahoo! JAPAN」です。 Sub a() Debug.Print Form_フォーム1.WebBrowser1.Navigate.Name Debug.Print Form_フォーム1.WebBrowser1.url.Name End Sub どちらもエラーになってしまいます。 ご教授よろしくお願いします。
- ベストアンサー
- Visual Basic
- フリーズしてしまいます。
アクセスでWebBrowserコントロールを使ってIE操作をしているのですが フリーズしてしまいます。 フォームに、WebBrowser0を配置して、 ---------------------------------- Private Sub Form_Load() Me.WebBrowser0.Navigate "http://login.yahoo.co.jp/config/login?logout=1" Call wait 省略・・・ End Sub ---------------------------------- Sub wait() Const READYSTATE_COMPLETE As Long = 4 Do Until Me.WebBrowser0.ReadyState = READYSTATE_COMPLETE Loop Do While Me.WebBrowser0.Busy = True DoEvents Loop End Sub ---------------------------------- を実行すると必ずフリーズします。 ---------------------------------- Sub wait() Do While Me.WebBrowser0.Busy = True DoEvents Loop End Sub ---------------------------------- にしたら問題なく表示されます。 でもこれだけだと、表示し終わりません。 表示されてないのに次のコードへ進んでしまいます。 そもそもなぜフリーズするのでしょうか？ アクセス２００７です。ご回答よろしくお願いします。
- ベストアンサー
- Visual Basic
- フォームロードについて
VB2008で、Form_Load()に Me.Visible = falseや Me.Close()としてもフォームの非表示やフォームを閉じたりしないのですが、なぜなのでしょうか？ 最初に起動した場合に、Form_Loadで初期設定を行った後に、自動的に直ぐにフォームを非表示や閉じることをしたいです。
- ベストアンサー
- Visual Basic
- フォームを画面のど真ん中に表示させたいのですが
フォームを画面のど真ん中に表示させたいのですが、 http://dobon.net/vb/dotnet/form/startposition.html を見たのですがコードの書き方がよくわかりません。 Public Class Form1 Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Dim f As New Form1() 'フォームを画面の真ん中に表示する f.StartPosition = FormStartPosition.CenterScreenf.Show() End Sub End Class こうすると、「FormStartPosition.CenterScreenf」の部分に波線がひかれます。 Public Class Form1 Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Me.StartPosition = FormStartPosition.Manual Me.Location = New Point(0, 0) End Sub End Class これで左は時に表示する事は出来るのですが、真ん中に表示させるにはどうすればいいでしょうか？
- ベストアンサー
- Visual Basic
- Form_Load と Form_Activate のタイミング
あるデータ入力アプリを作っています。 親フォーム（Form0）で番号を決め、子フォーム（Form1,Form2,Form3,Form4） でデータ入力し、それぞれの子フォームを出るとき（Unload Me) に、変数にsaveしています。それを親フォーム（Form0）で登録を選択したとき、入力データをチェックしてＤＢに格納しています。 すでにＤＢ格納済のデータの場合、親フォームでＤＢから変数に読み込み、子フォームのForm_Loadで展開しています。 そこで困っているのは、親と子のフォームを行き来するときにデータの表示で前のが残っていたり、消えてしまったりします。 Form_LoadとForm_Activateを通過するタイミングが、ちゃんと理解できていないためコードの記述位置が不適切なのだと思います。 Form_Load と Form_Activate の実行タイミングについて、お教えください。
- ベストアンサー
- Visual Basic
- vbaで帳票フォームで開きたい アクセス
vbaでフォームを開くときに 既定のビューを指定してるのですが 指定したとおりになりません。 Private Sub Form_Load() Me.DefaultView = 1 '帳票フォーム End Sub としてもデータシートビューで開かれてしまいます。 Private Sub Form_Load() Me.DefaultView = 1 '帳票フォーム MsgBox Me.DefaultView End Sub とすると、1が返るのに やっぱりデータシートビューになってしまいます。 なぜでしょうか？ エラーにもなりません。
- ベストアンサー
- オフィス系ソフト
- 「Navigate」のNが小文字になってしまう
InternetExplorerを参照設定し、 Sub aaa() Dim objIE As InternetExplorer objIE. End Sub とした後に、Navigateを入力すると、自動でnavigateにかわってしまいます。 一覧が表示される時は、大文字です。（画像をご覧ください） なぜ小文字になってしまうのでしょうか？ 参照設定は、HTMLオブジェクトライブラリにもチェックを入れてますが、 それが原因でしょうか？
- ベストアンサー
- オフィス系ソフト
- WebBrowser ＷＥＢページ更新時に音を出し
WebBrowser ＷＥＢページ更新時に音を出したくない アクセスのフォームにWebBrowserコントロールを置いて、 Private Sub Form_Open(Cancel As Integer) Me.WebBrowser0.Navigate "http://finance.yahoo.co.jp/" End Sub としました。 コマンドボタンも設置して、 Private Sub コマンド1_Click() Me.WebBrowser0.Refresh End Sub としました。 フォームを開いたり、コマンドボタンを押したらサイトが表示されますがその際、音が鳴ります。 「シュッシュ」と言う感じです。 その音を出さない方法なんてありますか？ その音だけ出したくないので、ミュートにはしたくないです。 でもなぜかhttp://finance.yahoo.co.jp/だと音は鳴るけど http://oshiete.goo.ne.jp/にすると音は鳴りません。 ＯＳ：ｗｉ７、オフィス２００７です。 ご回答よろしくお願いします。
- ベストアンサー
- Visual Basic
- 最小化最大化のボタンの表示をＶＢＡで設定できない
アクセス２００３を使用しています。 ＶＢＡでフォームの最小化最大化のボタンの制御をしたいのですがエラーになってしまいます。 詳しい内容は Private Sub Form_Load() Me.MinMaxButtons = 0 End Sub とすると、 実行時エラー '2448': このオブジェクトに値を代入することはできません。 となってしまいます。 そのままヘルプを開くと ********************************************************** フォームまたはデータ アクセス ページを読み取り専用にする フォームを読み取り専用にするには、フォームのプロパティを設定します。データ アクセス ページを読み取り専用にするには、グループ レベル プロパティを設定し、データ アクセス ページに含まれるグループごとに読み取り専用にします。 ********************************************************** となっています。 MinMaxButtonsのヘルプには ********************************************************** フォームの最大化ボタンと最小化ボタンを表示するかどうかを示します。 値の取得および設定が可能です。 ********************************************************** と書かれてるのでＶＢＡで設定可能だと思いますがなぜかできません。 よろしくお願い致します。
- ベストアンサー
- その他MS Office製品
お礼
ありがとうございました。