- ベストアンサー
エクセル97のユーザーフォームコントロールについて
kenken0001の回答
プログレスバーは 別にUserFormを作って UserForm1からボタンで UserForm2.Show するなどしてください。 UserFormに、ラベル「Label1」を作って下さい。 Private Sub UserForm_Activate() With Label1 .SpecialEffect = 2 .BackColor = vbBlue www = .Width .Width = 0 End With For i = 1 To 1000 Me.Caption = i Label1.Width = i / 1000 * www Me.Repaint Next End Sub 説明が不足の場合は質問ください。 Excel97で確認しました。 ちなみに両方とも本の丸写しなので出典を （株）秀和システム Excel2000 VBA 実践プログラミング いろいろ勉強になります。 良かったら一度目を通してみてください。
関連するQ&A
- ExcelVBA コントロール数が多くてユーザーフォームが重い
ユーザーフォーム上に線を引いて見やすくしようと試行錯誤していたところ、フレームをラインのように見せるという小技を知り、１つのユーザーフォームに大量に貼りつけました。 案の定、ユーザーフォームを開くのに時間がかかるようになってしまいました。ロードに約8秒かかります。 あまり重くならない方法で、ユーザーフォーム上に線（のようなもの）を表示する方法は無いでしょうか？ 線は30本（四角形は4ラインとして計数）程引く予定です。 環境はExcel2003です。
- ベストアンサー
- その他MS Office製品
- エクセルのユーザーフォームについて教えてください。
エクセルのユーザーフォームでマルチページを作りました。Captionに好きな文字を設定すればタブの表記が変わると思うのですが、テキストボックスの値と連動させて、変更するって出来るのでしょうか？ 単純に代入が出来ないようなのですが？？？Page1.Caption = "いちご" としたら、怒られました。 試行錯誤したのですが？出来ません。 どなたか？詳しい方教えて頂けませんでしょうか？ よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルのユーザーフォームについて
エクセルマクロのユーザーフォームのテキストボックスに セルの値を表示する方法で質問です。 ユーザーフォームを表示するとその時点での セルの値はテキストボックスに表示されているのですが ユーザーフォームを表示したまま 別のブックのセルを選んだ際に そのセルの内容がテキストボックスに表示されるようにしたいです。 ボタンや、なにかをするわけではなく 自分で任意のセルを選択したら、という事です。 ユーザーフォームには selectionchange などがないのでどうすれば良いかわかりません。 宜しくお願いします。
- ベストアンサー
- Excel（エクセル）
- ユーザーフォームの表示について
Aというブックを選ぶと車というシートが一番最初にあるのですが、 これをvbaでshowと記述しても一旦他のシートを選んでからでないと 表示されません。 ブックを開いた瞬間にユーザーフォームを表示したいのですが、何か方法はあるでしょうか？ どうしてもうまくいきません。。 やりたいことは、ブックを開いたら、フォーム（自分で作ったユーザーフォーム）を開いたときから表示させたいのです。知ってる方がいたら教えてくれると助かるのですが。
- 締切済み
- オフィス系ソフト
- エクセルＶＢＡのユーザーフォーム
こんばんは、エクセルＶＢＡでユーザーフォームを作成しました。 そこに入力したものがブックに反映するわけですが、フォームに０（ゼロ）を入力した場合、ブック上のセルを選択すると０と入っているのですが、表示されません。なぜでしょう？？？？ これができないとせっかく時間をかけて作ったのに、使えません。どなたかご存知の方よろしくお願いします！！！！
- ベストアンサー
- オフィス系ソフト
- エクセル ユーザーフォームの位置
ブックを閉じた時のユーザーフォームの位置を、次回ブックを開いた時に同じ位置で表示したいです。 以下のコードでユーザーフォームは閉じれないようになっています。 Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = vbFormControlMenu Then Cancel = True End If End Sub この場合でも、前回と同じ位置でのユーザーフォームの表示は可能でしょうか？ 可能な場合はどのようにしたらいいでしょうか？
- 締切済み
- オフィス系ソフト
- ユーザーフォームの再起動
ブックを開いたと同時に、自動でユーザーフォームをモードレス状態で起動させています。 このマクロ付Excelファイルを使用している開発タブなどを有効にしていないエンドユーザーがフォームを閉じてしまった場合に ファイルを再起動しないで、簡単にユーザーフォームを再表示させる方法はございますか?
- 締切済み
- その他（プログラミング・開発）
- エクセルのユーザーフォームについて
現在、ワークシートの内容を見やすくするためにユーザーフォームを使用し表示させています。印刷は、ユーザーフォームにコマンドボタンを配置し、ワークシートを印刷しています。 せっかくユーザーフォームで見やすいレイアウトにしているので、表示させた内容をユーザーフォームごと印刷できればと考えています。 画面のハードコピーとかではなくて、コマンドボタンをクリックすることで印刷したいのですが、どなたか教えてください。
- ベストアンサー
- オフィス系ソフト
- ExcelVBA ユーザーフォームのコードがない
いつもお世話になっています。 Excel vbaで質問させてください。 あるExcelブック（test.xlsとします）を開くと、ユーザーフォーム（と思う）が表示されます。 （この時、Excelアプリケーションは「表示」されていてモーダルの状態です） ユーザーフォームで日付を選び、「これでOK」ボタンをクリックすると 新規ブックとして「text_0614.xls」が出来て、これが表示ブックとなります。 （元のtest.xlsは閉じられています） vbaコードの修正がしたくて、VBEから作業しようとしたところ ユーザーフォームモジュールも、標準モジュールも何も見当たりません。 Thisworkbookのイベントも何も書いてありません。 プロジェクトにパスワードがかかっているのかと思いましたが、もしそうだとしても プロジェクトウィンドウに、「フォーム」というフォルダは表示されると思いますし、 また、ダブルクリックしてもパスワードを求められることがありませんので パスワードがかかっているようには見えません。 これはExcelVBAのユーザーフォームじゃないのでしょうか？（VB？） または、もし、この「フォーム」フォルダごと、ユーザーに見せないやり方があるのでしょうか？ どなたかご存知の方いらっしゃいましたらご教示ください！ WinXP SP3 Excel2003 SP3 使用です。 どうぞよろしくお願いします。
- ベストアンサー
- その他MS Office製品
- 別ブックからユーザーフォームを実行したい～!!
教えてください。 2つのブックを並べて表示してあります。 1つのブックでマクロを作成する過程で、もうひとつのブックで実行された ユーザーフォームのコマンドボタンを押したいのですが。。。。。 アクティブブックが移動しユーザーフォームが表示されるだけでボタンが押せないのです。 何かいい方法はないでしょうか。 ご回答お待ちしております。宜しくお願いいたします。
- ベストアンサー
- Visual Basic
お礼
ありがとうございます！！ 実際にプログレスバーを表現できるようにしていただけたとは、オドロキました。 どうも、ＢＶＡは機能が充実し過ぎていて、まだ全体を把握出来ていないようです。まだまだ精進が足りないということですか・・・ Private Sub UserForm_Activate()の使い方を教わったので、理解できているか、応用で、始めに自分で言っていた、Ｘ/Ｙ表示を書いて見たところ、上手くいきました。 実際の処理は、このFor～Nextの間で実行すればいいわけですね。 もしもそれで上手く行かなかった場合、改めて質問させていただくとして、今回はこれで一旦、締め切ります。 教えていただいた書籍も、是非入手して勉強したいと思います。 何からなにまで、本当にありがとうございました。
補足
同じ方に両方のポイントは割り振れないんですね。（苦笑） 残念です。 また、よろしくお願いします。