- ベストアンサー
ユーザーフォーム上にアイコンの表示
ＶＢＡでユーザーフォーム上にＭｓｇＢｏｘ関数のようにvbCritical(警告アイコン）をだしたいのですが、そうゆうことはできないでしょうか？よろしくお願いします。
- rufas
- お礼率75% (315/420)
- Visual Basic
- 回答数1
- ありがとう数2
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
原始的な方法です。メッセージボックスのvbCriticalと同じように見えるだけです。 １．vbCritical を使って、メッセージボックスを出してみる。 ２．Alt + PrintScreen でメッセージボックスをコピー。 ３．Paint を開いて、貼り付け（Alt + PrintScreen したメッセージボックスを貼り付ける） ４．アイコン部分（赤い丸と白い×の箇所ですよね）を選択してコピー ５．Paint で新規作成してコピーした箇所を貼り付け(キャンパスはなるべく小さくしておく) ６．これを保存 ７．ユーザーフォーム上にラベル(Label1)を配置 ８．ユーザーフォームを開いた時に画像を読み込む Private Sub UserForm_Initialize() Label1.Picture = LoadPicture("D:\・・・\・・・\・・・.jpg") End Sub 単に画像を貼り付けただけです。他の方法は思いつかない。（知らない！がホントです） アイコンに影もついてメッセージボックスのvbCriticalとほとんど同じになりました！？(Excel2000で確認)
関連するQ&A
- ユーザーフォームの表示について
Aというブックを選ぶと車というシートが一番最初にあるのですが、 これをvbaでshowと記述しても一旦他のシートを選んでからでないと 表示されません。 ブックを開いた瞬間にユーザーフォームを表示したいのですが、何か方法はあるでしょうか？ どうしてもうまくいきません。。 やりたいことは、ブックを開いたら、フォーム（自分で作ったユーザーフォーム）を開いたときから表示させたいのです。知ってる方がいたら教えてくれると助かるのですが。
- 締切済み
- オフィス系ソフト
- VBAでユーザーフォームのcaption表示
VBAを初めたばかりです。 VBAでユーザーフォームを作成したのですが ユーザーフォームプロパティのcaptionで入力しても 下記プログラムで入力しても表示されません。 VBA作成時の画面にはしっかりと「項目」と 表示されていますが、プログラムを実行してユーザーフォームを 呼び出すと何も表示されていません。 ご教授ください。 Private Sub UserForm_Initialize() UserForm1.Caption = "項目" With ListBox1 .AddItem "１" .AddItem "２" End With End Sub
- ベストアンサー
- Excel（エクセル）
- EXCELのVBAで、あるワークシートでのみ使うユーザーフォームを作り
EXCELのVBAで、あるワークシートでのみ使うユーザーフォームを作りました。そのワークシート上での定数や、プロシージャや関数をワークシートのモジュールに置いています。そして、その定数や関数などをユーザーフォームのイニシャライズなどで使いたいと思いますが、ユーザーフォームのモジュールはワークシートのモジュールとは別なので、使えません。他への影響を考えると、標準モジュールには、置くのは不適切だと思います。 特定のワークシート上でのみ使うユーザーフォームと、そのワークシートとで、共通の定数や関数などを使う方法は、あるのでしょうか。どのようにすればよいのでしょうか。
- ベストアンサー
- その他MS Office製品
- ユーザフォームの表示場所
お世話になります。 ユーザーフォームが画面中央に表示されますが、場所を指定して表示させたいのですが方法を教えてください。ＶＢＡの値を変えるだけでできたような気がします。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ユーザーフォームいろいろについて
いろいろ手探りでVBAでユーザーフォームを作成し コマンドボックスによりテキストボックスを指定のセルへ転記し ユーザーフォームを終了させるという簡単ですがプログラミングをしました。 さらに、下記のことができたらと思ってるのですがどうしたら良いのかわかりません。 1.２種類のユーザーフォームを作成し、ファイルを開くと 選択肢ウィンドウが現れ選択したほうのユーザーフォームが開く 2.チェックボックスまたはラジオボタンで選択された項目を 指定のセルへ○を反映させたい。 以上のことを加えたいのですが、できますでしょうか。 つたない説明ですが御回答の程宜しくお願い致します。
- 締切済み
- Visual Basic
- VBAでのユーザーフォームについて。
初めまして。 今VBAのユーザーフォームでアンケートっぽいものつくってます。 最終的に結果ページをユーザーフォームにて表示させるのですが、 その結果ページのユーザーフォームを画像として保存したいのですが 方法がさっぱりわかりません。 (PrtScを押せばできるのですが処理で行いたいのです。。。) 以上よろしくお願いします。
- ベストアンサー
- Visual Basic
- ユーザフォームのスクロールについて
VBAの質問になります。 複数のフレームを順次並べ、縦長となったユーザフォームが存在します。 例えば、そのユーザフォームにスクロールバーを設置し、先頭のヘッダ部分だけ残し、それ以下のユーザーフォーム全体をスクロールしながら参照したいと思っています。 そのようなことはできるのでしょうか。 （縦長のユーザーフォームは、フレーム数に左右されるため可変なんです）
- ベストアンサー
- Visual Basic
- エクセルのユーザーフォームについて
エクセルのユーザーフォームについて教えてください。 ユーザーフォームにてメニュー画面を作成しました。 ユーザーはメニューからの操作だけでエクセルシートを作成できるようなマクロをつくりました。 ユーザーフォームのコマンドボタンでＥＸＣＥＬを終了させることはできますか？ ＶＢＡの記述方法も教えてください。
- ベストアンサー
- オフィス系ソフト
- ユーザーフォーム 検索
ユーザーフォームで「ｃｔｒｌ+F」の検索と同じ機能を作ってみたいです。 VBAコードが知りたいです。 というより 今あるユーザーフォームに「検索機能」をつけたいです。 よろしくお願い致します。 （エクセル2003です）
- ベストアンサー
- オフィス系ソフト
お礼
有難うございました。いろいろ調べましたが、教えていただいた方法しかないようですね。これで試してみます。有難うございました。