VBAで特定のテキストボックスを画面中央に来るように表示したい
- EXCEL2000を使用している場合、画面に入りきらない複数のテキストボックスを使用したフローで、特定のテキストボックスを画面中央に表示させる方法を知りたい。
- 現状、検索したテキストボックスが画面表示外でセレクトされてしまうため、目立たせる方法を試したが効果がなく、ヒットしたテキストボックスを画面中央にスクロールさせる方法を教えてください。
- フロー内にある大量のテキストボックスの中から目立たせたいテキストボックスを画面中央に表示させるためのVBAのロジックについて教えてください。
- ベストアンサー
VBAで特定のテキストボックスを画面中央に来るように表示したい
EXCEL2000を使用しています。 画面に入りきらない複数のテキストボックス(約5000個)を使用したフローを作成し、 それら各テキストボックスに格納されている文字列を検索するプログラムを組んだのですが、 現状、検索したテキストボックスが画面表示外の何処かでセレクトされるだけで、 検索ツールとしては全く使い物になりません。 (ヒットしたテキストボックスの背景色を赤くしたり、接続されているコネクタを 太くするなど、可能な限り目立つようにしてみましたが、 10%表示しても10画面以上の大きさを持つフローであるため焼け石に水って感じです) ある特定のテキストボックスを画面中央に来るようにスクロールさせるには どのようなロジックを組み込めばよろしいのでしょうか。
- yhm2
- お礼率100% (5/5)
- オフィス系ソフト
- 回答数2
- ありがとう数2
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
#1どす。 もうすこし改良してみました。 Sub test02() With ActiveSheet.TextBoxes("テキスト 1") Set myRng = Range(.TopLeftCell, .BottomRightCell) Application.Goto Reference:=myRng End With End Sub
その他の回答 (1)
- merlionXX
- ベストアンサー率48% (1930/4007)
うまく画面中央に来るようにする方法は存じませんが、画面上に呼び出すなら、以下でもできますよ。 Sub TEST01() Application.Goto Reference:=ActiveSheet.TextBoxes("テキスト 1").TopLeftCell End Sub
お礼
ありがとうございます! この内容で(現状に比べれば)十分です。
関連するQ&A
- VBAテキストボックスについて
こんばんは。 エクセルVBAのテキストボックスの使用方法で行き詰っています。 配列内のデータをテキストボックスへ表示してあります。 テキストボックスを、ダブルクリックして内容を変更し、 変更したデータを配列へ格納する仕組みにしようとしています。 問題は、ダブルクリックすると、テキストボックス内のデータが消えてしまう事です。変更せず他のテキストボックスをクリックすると、データが消えたままになってしまいます。 データは表示したままで、必要な箇所のみ変更する。 ダブルクリック後何もせず、他のテキストボックスをクリックしても 、データは残る仕組みにしたいのですが、可能でしょうか? ご教授お願いいたします。 ※仕事の関係でお礼が遅くなりましたら申し訳ございません。
- ベストアンサー
- オフィス系ソフト
- テキストボックスの文字が表示されない
エクセルでテキストボックスを利用した表をWin98のExcel2000で作成し、 それをWinXPnoのExcel2003へメールで送り、開いたところ、 テキストボックスの中の文字がきれいに消えています。 テキストボックスにカーソルを合わせると文字が入ってることがわかります。 塗りつぶしにもしてませんし、確認しました。 印刷プレビューでも表示されていませんので、もちろん印刷しても 文字は出てきません。 どうすれば表示されますでしょうか? 宜しくお願い致します。
- 締切済み
- オフィス系ソフト
- 画面の表示をしないPHPスクリプト
こんばんは。質問させてください。 今、テキストボックスが3つあり、ボタンが1つあるとします。 テキストボックスは、名前、年齢、性別を入力します。 入力後、”格納”(ボタン)を押下すると、 PHPスクリプトが起動し、設定したテーブルに入力データを格納し、 格納成功、失敗をダイアログで表示して またもとの画面にもどる。(入力項目そのまま) といったようなWEB画面を作成したいのですが、 どのようにすればよろしいでしょうか? ※PHPスクリプトのロジックは考えなくてもいいです。 宜しくお願い致します。m(_ _)m
- 締切済み
- PHP
- テクストボックスからセレクトボックスへ
1.テキストボックスにテキストを入力 2.追加ボタンを押す 3.セレクトボックスに表示 4.セレクトボックスに追加した項目を選択し削除ボタンで削除できる 以下のようなプログラムを教えていただけますでしょうか?
- ベストアンサー
- JavaScript
- ACCESS VBA テキストボックス
テキストボックスに複数行のデータをその数に合わせて表示させたいのです。 例えば検索したデータが3件なら3件を10件なら10件をテキストボックスにそのデータ件数の幅に合わせて表示させたいのですが、どうすればいいのでしょうか? 教えてください よろしくお願いします。
- ベストアンサー
- Visual Basic
- VBAテキストボックスの数を必要に応じて増やす
現在、Excel2000を使用しています。 ユーザーフォーム内でテキストボックスを横並びに3つ設置しています。そこで 例えばコマンドボタンをクリックしたり、テキストボックス3でエンターキーを押すと、そのテキストボックスが下に3つ増えて、合計6個になるようにするのは可能でしょうか? 場合によってはテキストボックスが、9個、12個それ以上必要な場合 がでてきます。 やはり最初からいくつもテキストボックスを設置して、Visibleなどで 操作するしかないのでしょうか?
- ベストアンサー
- Visual Basic
- テキストボックスの表示
VBAを使って、テキストボックスに表示される内容を設定しているのですが、 下記のように記述とOKですが、 Shapes.Range(Array("Text Box 1")).Select Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = "test" Selectを抜かして、 Shapes.Range(Array("Text Box 1")).ShapeRange(1).TextFrame2.TextRange.Characters.Text = "test" のように記述するとエラーになります。 原因がよくわからないのですが、なぜなのでしょうか?
- ベストアンサー
- Excel(エクセル)
- mysqlからテキストボックスへの表示について
PHP+MYSQLで勉強しながらWebアプリを作成しています。 フォームのテキストボックスに値を入力し、それをDBにUPDATEし、 UPDATEした内容を表示するのですが、UPDATEした結果を表示させることは 出来ました。 1点次の段階で詰まっているのですが、 UPDATEしたデータをテキストボックスに表示させる事は できるのでしょうか(SQLでSELECT文を使用するなどして) なにぶん初心者なもので、もし参考になるコードがあるような URL等も教えていただければ幸いです。 (JavaScriptは現在無知なので、使用しておりません。)
- ベストアンサー
- PHP
- テキストボックスを下から上へ表示させる
こんにちは、visualbasic2005のテキストボックスのことで質問させていただきます。 ボタンを押すとテキストボックスに文字列を追加表示させたいのですが、表示の仕方でつまづいています。 普通は、 textbox1.Text += "1" textbox1.Text += "2" textbox1.Text += "3" などとすると ____________ |1 | |2 | |3 | | | | |  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ と表示されますが、 ____________ |3 | |2 | |1 | | | | |  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ このように順番が逆に、つまり新しく追加した文字列が一番上に表示されるようにしたいのです。 また、 ____________ |5 | |4 | |3 | |2 | |1 |  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ この状態で「6」を追加すると(テキストボックスの縦幅を超えると) ____________ |6 ■| |5 ■| |4 ■| |3 ■| |2 □|  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ とずれ込み、右側にスクロールバーが出るようにしたいのです。 どうかよろしくお願いします。
- ベストアンサー
- Visual Basic
お礼
いろいろとご教示頂きありがとうございます! ん~なるほど、、って感じです。 確かにセルを跨るオブジェクトがある場合は こちらの方がよさそうですね。 やっぱりこういうのってコーディングセンスが ものを言うんでしょうか。 センスが無い私はせめてVBAに慣れるよう頑張ります。 (実はVBAは勉強し始めてまだ1ヶ月弱なんで、、) ありがとうございました。