- ベストアンサー
VBA実行中にＦorｍの出現
表題の件について質問します。 ＥｘｃｅｌＶＢＡでモジュールを実行する際に、 処理時間が長いため、処理中は前面にＦorｍ（ダイアログ等）を 出現させたいと思っています。 方法が分かる方、ご指導下さい。 また、Ｆｏｒｍに処理状況を％表示させたいのですが、 標準モジュールとＦｏｒｍを同時起動させた状態での変数受け渡しは ＥｘｃｅｌＶＢＡで可能でしょうか？ 初心者なので、お手柔らかにお願い致します。
- free_mees
- お礼率45% (10/22)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
関連するQ&A
- EXCELのVBAについて
エクセルのVBAでユーザーフォームに作ったテキストボックスに入力した値を、コマンドボタンによる「実行」とともに別に作った標準モジュールの変数として代入するにはどうすれば良いでしょうか？ 具体的な流れは、 マクロ実行 ↓ ユーザーフォーム出現 ↓ テキストボックスに数字を代入→「実行」 ↓ 変数を代入された標準モジュールによる処理完了 というものです。 ご教授お待ちしております。
- ベストアンサー
- オフィス系ソフト
- Form1からForm2へ変数を送る
ＶＢの初心者です。 下のようにコードを記述してみました。 ・Form1のdNameをForm2へ送り、ラベルに表示。 ・変数dNameは標準モジュールで定義。 **Form1** dName = delname.Text Form2.Show **Form2** Label.Caption = dName **標準モジュール** Dim dName As String しかし、ラベルにdNameの値が表示されません。 なにか良い解決策を教えてください。 あと、標準モジュールについてわかりやすく教えて下さい。
- ベストアンサー
- Visual Basic
- ExcelVBAについて
表題の件、質問致します。 ExcelVBAでＦｏｒ関数を使用して１～５１８４００のループをしています。 処理が長いため、進捗状況（％表示）をＦｏｒｍに表示させているのですが、 処理が15％程度進んだところでＦｏｒｍの表示が止まってしまいます。 止まっているのはＦｏｒｍの表示のみで処理自体は実行されている ようなのですが、これはどういう現象なのでしょうか？ Ｆｏｒｍにちゃんと１００％までを表示させるにはどうしたらよろしいですか？ ※ちなみにプログラム内にＤｏＥｖｅｎｔｓは設置しています。 どなたか分かる方、ご指導お願い致します。
- ベストアンサー
- Visual Basic
- Form1に記述されたスクリプトをForm2のボタンクリックで実行させたい
おせわになります ＶＢのVer.6使用しています Form1には仮に以下のような計算をする内容があるとします Private Sub testA() Text1.text = 10 Text2.text = 20 End Sub これをForm2のボタンをクリックすると実行するようにするにはどうしたらよいでしょうか？ 上のPrivateをPublicにしても駄目でした 標準モジュールではオブジェクトがないのでエラーとなりました よろしくお願いします
- ベストアンサー
- Visual Basic
- VBA
VBEの標準モジュール（例Ｍｏｄｕｌｅ１）にＶＢＡのプログラムを書き、 実行した時、ワークシート（例Ｗｏｒｋｓｈｅｅｔｓ（”ｓｈｅｅｔ１”）のウインドウを自動的に開くには（前面に持ってくるには）どのようにコーディングすれば良いのでしょうか。今は実行後確認するため、プロジェクトのＳｈｅｅｔ１で右クリックして「オブジェクトの表示」でＳｈｅｅｔ１を出したり、タスクバーをクリックしていますが。まずＳｈｅｅｔ１を前面に出して処理をしたい。Ａｃｔｉｖａｔｅ，Ｓｅｌｅｃｔ、Ｓｈｏｗなど試しても効果がありません。
- ベストアンサー
- Visual Basic
- フォーム間での共有変数
今、フォームを二つ表示し、お互い共通の変数を使って値の受け渡しをさせたいのですが、どうもうまくいきません。 知り合いには標準モジュールを使えばいいって聞いたので さっそく「プロジェクト」→「標準モジュールの追加」をし、 でてきたエディタに変数を追加 起動してみると・・・ちゃんと値の受け渡しができていませんでした。 ただ追加するだけでは受け渡しはできないのでしょうか？ それとも標準モジュールの時点で間違いでしょうか？ どなたか、レスお待ちしてます
- ベストアンサー
- Visual Basic
- Excel VBAにて２つの処理を同時実行可能？
是非お力をお貸し下さい。 よろしくお願いします。 Windows XP Excel2003 (VB6.0) メイン処理が非常に時間がかかるため、フォームを表示させ 文字(Label)を点滅させて「動いている（ハングアップしていない）」ことを 使用者に伝えようとしています。 --- Form1内のコード（メイン） --- Sub Main() Form2.Show vbModeless [ ～メイン処理～ ] End Sub --- Form2内のコード --- Sub UserForm_Initialize() Call Blink End Sub --- 標準モジュール内のコード --- Sub Blink() If Form2.Label1.Visible = True Then Form2.Label1.Visible = False Else Form2.Label1.Visible = True End If Form2.Repaint DoEvents Application.OnTime Now + TimeValue("00:00:01"), "Blink" End Sub これを実行すると、メイン処理が終了した後にForm2内の文字が 点滅します。 実現したいのは「使用者が動いていることを（ハングアップしていない ことを）確認出来る」という点です。 どうぞ よろしくお願いします。
- ベストアンサー
- Visual Basic
- VBAのユーザーフォームを実行しようとすると…。
オブジェクトがありません、とのエラーメッセージが出て、実行できません。 標準モジュールには以下のようなプロシージャを記述しているのですが、デバッグしてみると、２行目の「○○○.Show」の部分が黄色く反転しているのです。 しかし、○○○の名前をつけたユーザーフォームは存在するのです。オブジェクトがない、とのエラーメッセージが出る理由がわかりません。 どなたか解決方法を教えていただけませんでしょうか。 Public Sub Form_Show() ○○○.Show End Sub
- 締切済み
- Visual Basic
- マクロ実行中のメッセージ表示
お世話になります。 Excel2000マクロ実行中に、「処理中です」等のメッセージを表示したいのです。メッセージのUserFormを作成しましたが、マクロ実行中は、Caption（Formのタイトル部分）以外は、Formが白く表示されるだけです。ステップインで確認する時は正常に表示されます。 コードは、標準モジュールに UserForm1.Show (0) としました。 よろしくお願いいたします。 ※UserFormを使用する以外にも、メッセージを表示する方法があれば、それでも結構です。
- ベストアンサー
- オフィス系ソフト
- VBA 変数の受け渡し
エクセルVBAで標準モジュール内でインプットボックスに入力した変数をユーザーフォームに受け渡してユーザーフォーム内のリストボックスに表示させる場合どのように変数の受け渡しを行えばよいか教えてください。 現在は、一度ワークシートの任意のセルに値を書き出し、その後ユーザーフォームのイニシャライズで先ほどのセルから値を受け取るようにしています。 標準モジュールではインプットボックス入力後「UserForm1.Show」でユーザーフォームの立ち上げを行っています。
- ベストアンサー
- Visual Basic
- TS5330を昨年購入し、年賀状印刷できましたが、1年ぶりにプリンターに繋がらず、ルーター変更を思い出しました。しかし、変更しようとしてもエラー(サポート番号3441)が出てしまいます。
- TS5330を昨年購入してセットアップし、年賀状印刷もスムーズに行えたが、1年後の年賀状制作時にプリンターが繋がらなくなった。思い出したことでルーター変更を試みたが、エラー(サポート番号3441)が発生してしまう。
- 昨年購入したTS5330はセットアップも問題なく行え、年賀状印刷も可能だったが、1年ぶりの使用時にプリンターが繋がらず、ルーター変更を考えた。しかし、変更しようとするとエラー(サポート番号3441)が表示される。
お礼
参考になりました。 有難うございます。