入力中の回答があります。ページを離れますか?※ページを離れると、回答が消えてしまいますページを離れるA回答を続ける入力中のお礼があります。13:57回答数:2件ブックを開いたときユーザーフォームをShowするように設定してあるのですが、必ずそのユーザーフォーム内のコンボボックスにフォーカスされています。ブックを開いたとき、ユーザーフォーム上でなく、シートのセル(例えばA1セル)にフォーカスさせるにはどうすればよいのでしょうか。通報するこの質問への回答は締め切られました。16:42簡単にフォーカスを移動させたいのならフォームを一度非表示にして再表示すれば可能です。'この時点でフォーカスが失われます。vbModelessまたはSetFocus(AIP)を使ってフォーカスを移します。Application.hwndとすればExcel自身にフォーカスが移ります。通報するこの回答へのお礼ありがとうございました。...これが参考になると思います。現在のブックにも、同様なマクロが入っていて、ユーザフォームを初期表示するようになっていると思われます。通報するこの回答へのお礼ありがとうございました。Basic(VBA)10ExcelVBAでセルを編集状態にする方法Excel(エクセル)11VBAでブックを非表示で開いて処理して閉じる方法Excel(エクセル)12ユーザーフォームでTextBox1にカーソルを移動したいExcel(エクセル)13VBAでユーザーフォームを再表示させたい。Excel(エクセル)14Enterキーでマクロを起動さす。Basic(VBA)10ExcelVBAでセルを編集状態にする方法Excel(エクセル)11VBAでブックを非表示で開いて処理して閉じる方法Excel(エクセル)12ユーザーフォームでTextBox1にカーソルを移動したいExcel(エクセル)13VBAでユーザーフォームを再表示させたい。Excel(エクセル)14Enterキーでマクロを起動さす。エクセルのハイパーリンクでブックを開き、指定のセルにフォーカスを当てたいです。ユーザーフォームのリストボックスのスクロールバーからフォーカスを移動したい。回答数ランキングです。職業ビジネスアドバイザーこの専門家の回答をチェック他の専門家の回答をチェックこのQ&Aを見た人が検索しているワードフォーカスVBAアプリケーションフォームFocusこのQ&Aと関連する良く見られている質問Qユーザーフォームを表示中にシートの操作をさせるにはユーザーフォームを表示中にシートの操作をさせる事はできるのでしょうか。セルへの入力、画面のスクロールなどは、ユーザーフォームからマクロを実行させたり、.hideでユーザーフォームを一時的に隠すなどすればいいのでしょうが、そういう手段をとらないでユーザーフォームを表示中にシートの操作をさせる事はできるのでしょうか。AベストアンサーユーザフォームのShowModalプロパティをfalseにすればよいかと。ここでセルをアクティブにしたい(これでは駄目でした)色々試したのですが、さっぱり分かりませんのでどなたかご存知でしたらお教え下さい。Aベストアンサーこんにちは。AppActivateステートメントはいかがでしょう。別ブックから該当データを検索し、必要なデータを取得する方法について部品表というブックがありますA列に商品名、B列に商品番号が入力してあります。C列のコードは未入力です。R-134256また、コード一覧表という別のブックには、A列に商品番号と、B列にコードが、何千件も入力されています。やりたいことは部品表のC列のコード欄に、コード一覧表ブックから商品番号と一致するコードを貼り付けしたいのです。部品表は、何百種類もありますので、関数ではなく、マクロで処理を希望します。xlAndと、してみたものの、検索しても、その検索結果の隣のセルのコードをどうやって取得すればいいのかが、わかりませんでした。基本事項は本で学びましたが、呪文のようなコードはよく理解できません。懸命にネットで検索して、訳して理解する努力をしてはいますが。部品表というブックがありますA列に商品名、B列に商品番号が入力してあります。C列のコードは未入力です。R-134256また、コード一覧表という別のブックには、A列に商品番号と、B列にコードが、何千件も入力されています。やりたいことは部品表のC列のコード欄に、コード一覧表ブックから商品番号と一致するコードを貼り付けしたいのです。部品表は、何百種類もありますので、関数...続きを読むAベストアンサーこんにちは。実用性も踏まえました。メインの動作はワークシート関数のVLOOKUPをVBA上で使用していますので理解はしやすいかと思います。質問文から察するに「部品表.xls」と「コード一覧表.xls」の両方を開いて処理されていますが「コード一覧表.xls」はプログラム内で開いて閉じているので実行するときは「コード一覧表.xls」は閉じて置いてください。実用性も踏まえました。メインの動作はワークシート関数のVLOOKUPをVBA上で使用していますので理解はしやすいかと思います。質問文から察するに「部品表.xls」と「コード一覧表.xls」の両方を開いて処理されていますが「コード一覧表.xls」はプログラム内で開いて閉じているので実行するときは「コード一覧表.xls」は閉じて置いてください。VBA】マクロでExcel自体を終了させたい環境:WindowsXP、Excel2003マクロでエクセルを終了(ブックを閉じて、アプリケーション自体も終了)させたいのですが、以下のコードではアプリケーションが閉じてくれません。ThisWorkbook.CloseExcObj.QuitApplication.Quitどこか悪いところはありますでしょうか?よろしくお願いします。普通に考えれば質問者のコードで上手くいきそうですがhana-hana3さんの回答にもあるようにThisWorkBook.Closeでコード終了となりますのでApplication.QuitをThisWorkBook.Closeの前にもってこないといけません。Application.Quitはそれがあるプロシージャのコードが全て終わるまでその実行を保留するちょと特別動作をします。'-------------------------------------Application.QuitThisWorkbook.Close'-------------------------------------他の回答も見るQエクセルVBAでテキストボックスの値の取得と変更についてエクセルのVBAを使ってシート上のテキストボックスのテキストを取得・変更するマクロを作成したいと思っていますがうまく行きませんので、お知恵を拝借したいとおもいます。"これはコントロールのテキストボックス"を書くとテキストボックスに文字を入れ込めますが、別のエクセルブックからだと上手く行きません。オートシェイプのテキストボックスの場合は簡単に出きるのですが、コントロールツールボックスではどうしても上手く行きませんので、対象法などご存知の方いらっしゃいましたら教えてくださいAベストアンサーエクセルを新規に開きました。そのSheet1に(コントロールツールボックスの)TextBoxを貼りつけました。そのBook1から、ファイル-開くで別ブックを開きました。Subを実行すると、Book1のTextBoxに入れた文字列が表示されました。そんな質問ではないのですか。他の回答も見るQエクセルのIF関数で、文字が入力されていたならば~エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。=IF(A1="『どんな文字でも』","",+B1-C1)A1セルに『どんな文字でも』入っていたならば、空白に。文字が入っていなければB1セルからC1セルを引く、という状態です。この『どんな文字でも』の部分に何を入れればいいのか教えてください。IF関数以外でも同様のことができれば構いません。Aベストアンサー=IF(ISTEXT(A1),"",B1-C1)でどうでしょうか?他の回答も見るQExcelVBAでBookを開く時にファイル名の一部だけを指定でVBA初心者です。ExcelVBAで決まったフォルダーのファイルを開きたいのですが、ファイル名が固定した文字+日付になっているため、この固定した文字だけでこのファイルを開く方法を教えて下さい。このフォルダーには2つファイルがありますが、もう1つは全く違うファイル名です。ワイルドカード文字については、VBAのヘルプを参照し、特に「使用例」のコードを理解してください。参照し、同じく「使用例」のコードを理解されたら宜しいかと思います。ファイル名指定では使えないと思うのですが。ワイルドカード文字は、使用出来ません。殆ど、フルバスで指定します。カレントホルダ内のファイルを指定したことになります。([メニュー]-->[オプション]-->[全般]タブの中で指定)他の回答も見るQエクセルで、任意のテキストボックス等にフォーカスを移したいすいません、またまた質問です。エクセルXPで、ユーザーフォーム上に複数のテキストボックスやリストボックスを置いて入力した値が任意のシートのセルに入力されるというものを作っています。(しかしながらVBAがほとんど見様見真似レベルなのでかなり悪戦苦闘(~_~*))そこで、ユーザーフォームにて例えばTEXTBOX1に入力後、Enterで次のテキストボックス(又はリストボックス)にフォーカスを移したいのですが、その時に任意のテキストボックス等にフォーカスを移すことは可能でしょうか。番号順(なのかな?)に自動でフォーカスを移動させることはできたのですが、任意の対象へ移動させるやり方とかってあるのでしょうか。TEXTBOX1からRISTBOX5へ移すとか。入力する順番に移動できたらユーザーフォーム上での入力作業が非常に楽になると思って(^o^;)どうぞよろしくお願いします。フォームオブジェクトを表示した状態で、[表示]-[タブオーダー]で調整です。セルの個数を所得するいつも皆様には大変お世話になっております。123とエクセルのセルがなっている場合の上のB2から下のB7までのセルの個数を所得したいのですB8以降にも数字が入る場合があるのと間に空白が入る場合があるので困っています。B2のセルは固定となっているのでB2からの判別で問題ない状況です。皆様お知恵をお借りしたく思っておりますのでよろしくお願いいたします。VBAで業務を簡素化するために、現在開いているブックのファイル名を取得する方法が分かりません。作業手順をマクロを使って処理していますが、オリジナルのワークブックをファイル名を変えて保存し、以後、このワークブックを読み込んで使用しています。このときのVBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになり、以後の業務に使用できません。常にファイル名を取得出来るVBAをどなたか、教えて下さい。操作対象になっているブックの名前はActiveWorkbook.Nameですね。>VBAは、オリジナルのファイル名を使っているため、ファイル名を変更するとエラーになりというような文脈からすると、ThisWorkbook.Nameの方ですかね。Inc.Q質問する(無料)Q&A検索goo検索gooIDで新規登録・ログイン新規登録する(無料)会員の方はこちら外部サービスのアカウントで新規登録・ログインYahoo!で新規登録・ログインGoogleで新規登録・ログインTwitterで新規登録・ログインFacebookで新規登録・ログインdアカウントで新規登録・ログイン※各種外部サービスのアカウントをお持ちの方はこちらから簡単に登録できます。お客様の許可なしに外部サービスに投稿することはございませんのでご安心ください。会員でない方、会員になるとあなたも質問や回答ができるようになります!!親切・丁寧な回答が集まる場30分以内に回答がもらえ回答数は平均3件!匿名(ニックネーム)での投稿なので。