• ベストアンサー

ダイアログボックスの入力項が多く困っています。

ダイアログボックスの入力項が多く、マクロ実行時にいちいち入力していたら時間がかかるため、そこを改善したいのです。 入力項に入れる数字をあらかじめwordなどでドキュメント化しておいてexcelのマクロ実行時に読み込むようにしたいのですが、そんなことは可能ですか?

質問者が選んだベストアンサー

  • ベストアンサー
  • ASIMOV
  • ベストアンサー率41% (982/2351)
回答No.1

ダイアログボックスが表示された時点で、各テキストボックスに、自動でデフォルトの文字が入っている状態にしたいという事だと思いますが... 1.別シート(例:sheet2)に、そのリストを作成します(例:A1:A2) 2.ダイアログボックスに、入力用のボタンを設置(例:CommandButton1) 3.そのボタンに次のプログラムを設定    Private Sub CommandButton1_Click()      TextBox1.Value = Sheet2.Range("A1")      TextBox2.Value = Sheet2.Range("A2")    End Sub こんな感じでどうでしょうか 複数のパターンが有る場合でも、パターンの番号(記号)を選択した後、ボタンをクリックで、分岐させれば対応できると思います

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.2

こんばんは。 Excelですね。 そのダイアログボックスというのは、そもそも何ですか? 入力項 というものはなんですか? ダイアログボックスには、TextBox などありませんし、MS-Wordでドキュメント化なんていうのは、現実離れです。できないとは言わないけれども、そういうマクロを作る人はいないと思います。 他の相談者の例もあったのですが、もともと面倒なものなら、そういうものを使わずに、ワークシート自体で処理したほうがよいと思いますね。 もう少し、具体的にコントロール名など正確に書いてください。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • ダイアログボックスについて

    ワードをファイルから開くときに 「ダイアログボックスが開いているためコマンドを実行することができません。実行するには「OK」ボタンをクリックしてからすべてのダイアログボックスを閉じて下さい」と出てきます。ワードを立ち上げてからファイルを開くとこの表示は出てこないのですが、どうすればこの表示がでなくなりますか?ちなみに他のアプリケーションは何も立ち上がってはいないのですが。

  • ダイアログボックスを表示させるマクロ

    こんにちは。 エクセルのマクロについて教えてください。 エクセルでA列に名前を入力する作業をしています。 入力作業中に、それまでに入力した名前と 重複した名前を入力しようとすると、 「重複しています」と ダイアログボックスを表示するマクロは どのように組めばよいのでしょうか? わかりづらい文章ですみません。 よろしくお願いします。  (A列) 1 高橋 2 田中 3 佐藤 4 太田 5 田中 ←←重複した名前を入力すると、        「 重複しています」とダイアログボックスが表示される。

  • ダイアログボックスに自動的にセルの値を入れるには

    エクセルのマクロを実行したときに、「番号を入れてください」のダイアログボックスが出てくるのですが、その値がB1セルの値だとわかっているので自動的にB1セルの値を入れるようにするマクロ(VBEコード)がわかる方教えてください

  • ダイアログボックス?(初心者です。)

    ワード系統を開こうとすると、ダイアログボックスが開いているため、コマンドを実行出来ません。 という表示が出て開くことが出来ません。画面上には何も無い(と…思う)のですが、どうやったら閉じることが出来ますか? きっと初歩的な事だと思うのですが、分からないので教えてください。すみません。

  • 検索と置換ダイアログボックスを消すコード

    エクセルの検索と置換ダイアログボックスを消すコードはありますか? マクロの記録を開始して、検索と置換ダイアログボックスをエスケープキーで消してみましたが 何も記録されてませんでした。 そのようなコードはないのでしょうか?

  • VBA フォームのテキストボックスにセルの値を入力

    解決策が見つからなかったため力を貸してください。 【Excel2010】 選択したセルの数値(その時によって違う)を シート上のマクロを登録したボタンを押すと出てくる フォームのテキストボックスに表示させたいのですが、 どうやってもうまくいきません。 そのフォームは、数字を入れてエンターを押すと その数字に対応した内容をデータベースからもってきて 表示される仕組みになっているのですが、 いちいち数字を覚えるか自分でコピペして入力するのが面倒なので、 シート上の数字(セル)を選択してマクロを押すと 表示されているようにできたらなと思っています。 ちょっとした改善ですが、できたら作業効率が上がるので ご回答をお待ちしております。

  • Word2003で勉強中です!ダイアログボックス内での日本語入力について

    タイトルの通り、猛勉強中の、ほとんどパソコン初心者の30代主婦です。 教室のレベルが高くて、家でも時間を見ては勉強してます。 ワード内で、名前をつけて保存時や、ルビを入力する時、 (ダイアログボックス内)日本語入力できなくて困ってます。 どうしてでしょうか? 「あ」と入力したくても、「A」か「a」になります。 詳しい方に相談したのですが、インターネットを接続しながらワードを使用するとそうなるので、 ネットを閉じるとか、パソコンを再起動するとか、聞いたのですが、 それでも、日本語で入力できませんでした。 それ以外(ネット検索時)などは、日本語入力が出来ます。 どうぞ宜しくお願いします。

  • Excelダイアログボックスのボタン命令

    VBAの初心者です。 Excelでダイアログボックスを作りました。ボタンを押したとき、ワークシートの選択した範囲の印刷をさせたいと思っています。 ダイアログボックスのボタンに「ボタン2_Click」と名付けた下記のマクロを登録しました。 Sub ボタン2_Click() With DialogSheets(1) Sheets("Sheet1").Select Range("A3:G12").Select Selection.PrintOut Copies:=1, Collate:=True Range("A13:G18").Select Selection.PrintOut Copies:=1, Collate:=True Range("K18").Select End With End Sub 「ボタン2_Click」マクロは、直接実行すれば希望どおり印刷できます。 しかし、ダイアログボックスのボタンを押した場合には、Range("A3:G12").Selectまで実行しますが、そのあと次のメッセージが出て動きません。 実行時エラー'1004': Range クラスの PrintOut メソッドが失敗しました。 どう修正したらよいのか教えて下さい。よろしくお願いします。

  • エクセルでファイル名を任意のセルに入力するマクロを組むには?

    エクセルにて、マクロを実行すると、 ダイアログボックスが出てきて、ファイルを 選ぶと、そのファイル名が任意のセル (たとえばB10とか)に入力されるような マクロを組みたいのですが、うまくいきません。 しかも、そのファイル名についている拡張子なしで 入力されるようにしたいです。 どなたかご教授ください。

  • ダイアログボックスやツールバーのコピー、印刷

    ダイアログボックスやツールバーを図のように文章中に入れて編集や印刷をしたいのですが、どうにもできません。ワード、エクセルはどちらでも構いません。WinXP Office2003です。どうぞよろしくお願いします。

専門家に質問してみよう