★★Access2000VBA・Excel2000VBA独学~Win32API。eChromeを例に。(Excel、Word、Access、などが32bit版のモノでしか使えませんが、OSは64bitでも大丈夫です。★★Access2000VBA・Excel2000VBA独学~Win32API。eChromeを例に。(Excel、Word、Access、などが32bit版のモノでしか使えませんが、OSは64bitでも大丈夫です。)~★★Access2000VBA・Excel2000VBA独学~Win32API。eChromeを例に。(Excel、Word、Access、などが32bit版のモノでしか使えませんが、OSは64bitでも大丈夫です。075012_Excel2000VBATips★★Access2000VBA・Excel2000VBA独学~Win32API。eChromeを例に。(Excel、Word、Access、などが32bit版のモノでしか使えませんが、OSは64bitでも大丈夫です。)~※まだ書きかけです。※間違ってたらすみません。※メモ書きなので、自分でも意味不明な箇所も多いです。※Shift+TABキー、もしくは、Homeキー、Homeキー+TAB数回、を押すと、目次付近に戻れます。「起動したソフトのウィンドウの位置とサイズを変更する方法」については、UWSCを使う方法があります。』という1行で、VBEが開いてさえいれば、VBEの画面を、Top10ピクセル、Left10ピクセル、の位置に、ヨコ1000ピクセルタテ700ピクセル、の大きさで、サイズの自動調整をしてくれます。Applications」の部分を、ウィンドウのタイトルバーの文言の一部を指定します。これは、VBAにて、そのUWSファイルをShell関数を使って開けば、それがそのままVBAでもやれます。ショートカットアイコンでもできるそうです。」ただ、「どうしてもAPIでやりたい」というときは、以降に挙げたようなコードで可能です。「GoogleChromeのウィンドウをリサイズする」ということでのサンプルです。・必ずGoogleChromeを開いてから・一番最後の「AtherWinPosiSIzeChange01()」プロシージャを実行してみます。・完了した後に、「AtherWinPosiSIzeChange01()」プロシージャを実行みたいな感じになるかと思います。(当方のテストでは、「最初のページが表示されるまで」待たなくても、Chromeの画面が表示された直後なら大丈夫でしたけど念のため・・・)「AtherWinPosiSIzeChange01()」はウィンドウのタイトルバーの文言の一部でやっていますが、それでダメなら、「タスクID(プロセスID)からリサイズする。」のほうの関数(「app_window_risize_for_p_id()」)をCallしてみます。「タスクID」は、Shell関数でアプリを起動した際の戻り値で良かったかも?です。※繰り返しますが、64bit版のExcelでは動きません。'タイトル名からリサイズする。'タイトル名は全部じゃなくても一部でもOKみたいです。'対象をアクティブにする。アクティブにしないと動かない。'開いた何らかのアプリケーションをリサイズする関数。'タスクID(プロセスID)からリサイズする。'対象をアクティブにする。アクティブにしないと動かない。InputBox("画面サイズを変えたいソフトの名前(タイトルバーの文字列に在るソフト名)を入力してください。メモ帳なら「メモ帳」と入力してください。半角スペースがある場合はそれも入力します。"※ソフトによっては、ファイル名でもOKな場合もあります。拡張子がある場合は拡張子も含めます。'どんなソフトを画面の位置や大きさを変えたいか、ユーザーに聞きます。'Inputboxに入力された文字は変数「Answ01」に代入されます。'キャンセルボタンが押されたときは、「Answ01」には「""」が代入されます。"キャンセルされたので中断します。'プログラムを終わります。'指定された他のソフトのウィンドウをアクティブにします。'Accessの「ガワ」のウィンドウの調整をします。'数値はtwipではなくてピクセルです。Access"」の部分を変えればOKです。Access"」を「"メモ帳"」とします。'※タイトルバーの一部の文字列の指定でよいと思います。'以下の処理をします。"入力したソフトが起動していないかソフトの名前が違うようです。再度やり直してください。'エラー番号が何であってもこわいので一応終わっておきます。'「chrome」を指定。'念のため指定された他のソフトのウィンドウをアクティブにします。'ウィンドウの調整をします。'数値はtwipではなくてピクセルです。'もちろん、そのウィドウが既に開いていることが前提です。'※タイトルバーの一部の文字列の指定でよいと思います。'以下の処理をします。"入力したソフトが起動していないかソフトの名前が違うようです。再度やり直してください。'エラー番号が何であってもこわいので一応終わっておきます。位置を変更しない'###################################################################'開いた何らかのアプリケーションをリサイズする関数'タイトル名からリサイズする。'タイトル名は全部じゃなくても一部でもOKみたいです。WINDOWPLACEMENT'対象をアクティブにする。アクティブにしないと動かない。Function'###################################################################'開いた何らかのアプリケーションをリサイズする関数。'タスクID(プロセスID)からリサイズする。WINDOWPLACEMENT'対象をアクティブにする。アクティブにしないと動かない。InputBox("画面サイズを変えたいソフトの名前(タイトルバーの文字列に在るソフト名)を入力してください。メモ帳なら「メモ帳」と入力してください。半角スペースがある場合はそれも入力します。"※ソフトによっては、ファイル名でもOKな場合もあります。拡張子がある場合は拡張子も含めます。")'どんなソフトを画面の位置や大きさを変えたいか、ユーザーに聞きます。'Inputboxに入力された文字は変数「Answ01」に代入されます。'キャンセルボタンが押されたときは、「Answ01」には「""」が代入されます。"キャンセルされたので中断します。Sub'プログラムを終わります。'指定された他のソフトのウィンドウをアクティブにします。_Me("tbx高さ").Value)'Accessの「ガワ」のウィンドウの調整をします。高さ)'数値はtwipではなくてピクセルです。Access"」の部分を変えればOKです。Access"」を「"メモ帳"」とします。'※タイトルバーの一部の文字列の指定でよいと思います。Then'指定したソフトが開いていない場合は、エラー番号が5のエラーになるので'以下の処理をします。"入力したソフトが起動していないかソフトの名前が違うようです。再度やり直してください。SubElse'エラー番号が何であってもこわいので一応終わっておきます。"chrome"'ウィンドウのタイトルバーの文言の一部を指定'「Google」にしたら、語句検索をしたあとだとダメだったので'「chrome」を指定。'念のため指定された他のソフトのウィンドウをアクティブにします。_600)'ウィンドウの調整をします。高さ)'数値はtwipではなくてピクセルです。'もちろん、そのウィドウが既に開いていることが前提です。'※タイトルバーの一部の文字列の指定でよいと思います。Then'指定したソフトが開いていない場合は、エラー番号が5のエラーになるので'以下の処理をします。"入力したソフトが起動していないかソフトの名前が違うようです。再度やり直してください。SubElse'エラー番号が何であってもこわいので一応終わっておきます。挫折するオブジェクト式やプログラム(プロシージャ)の書き方、挫折しない書き方、の違い。送信メールが受信トレイに入ってしまうトラブルの回避、など。ODBCでQueryTableオブジェクトを自動作成するサンプルコード)。2000以降の全バージョンで使えると思います。~ついでに、セルの値で結果表示を自動で切り替える「パラメータクエリ」のVBAでの自動作成も。』、「オブジェクトを引数にして・かつ・オブジェクトを返す」、そういう自作関数の作り方。』、「オブジェクトを引数にして・かつ・オブジェクトを返す」、そういう自作関数の作り方。ODBCでQueryTableオブジェクトを自動作成するサンプルコード)。2000以降の全バージョンで使えると思います。~ついでに、セルの値で結果表示を自動で切り替える「パラメータクエリ」のVBAでの自動作成も。「安全」な、Youtube動画のダウンロード方法6つ。挫折するオブジェクト式やプログラム(プロシージャ)の書き方、挫折しない書き方、の違い。送信メールが受信トレイに入ってしまうトラブルの回避、など。ODBCでQueryTableオブジェクトを自動作成するサンプルコード)。2000以降の全バージョンで使えると思います。~ついでに、セルの値で結果表示を自動で切り替える「パラメータクエリ」のVBAでの自動作成も。technology.。