- ベストアンサー
初心者の質問です。VBA
ボタンを使ったプログラムの作成なんですが、VBEウィンドウで動作を実行することはできるのですが、コマンドボタンを押しても動作せず、文章が黄色に反転するだけなのですが。どういうふうに文章を変えたらよいかおしえてください。 Private Sub 設定_Click() MsgBox "ボタンをクリックしました" End Sub
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
メッセージが表示出来て良かったです。 なぜでしょうか?と問われると、正しい記述ではなかったからとしか答えられません。 メッセージダイアログを出すのはMsgbox関数というものを使用します。 この関数の正しい使用方は、Msgbox()という記述です。 とはいえ、VBAのバージョンによってはMsgbox"~~"でも表示は出来たりしますが・・・。 ()内には表示するメッセージを入れる事になり、文字列(言葉)の表示に関しては""でくくる必要があります。 例:Msgbox("めっせーじ")○、Msgbox(めっせーじ) × Msgbox関数はメッセージ以外にも【ok】ボタンや注意表示等も行えますが、割愛させて下さい。
その他の回答 (2)
- imogasi
- ベストアンサー率27% (4737/17069)
>ボタンを使ったプログラムの作成 ボタン押し下げ1発で自動でプログラムを作成するようにも取れるが、ソウではないでしょう。 ボタンはCommndButton1というやつでしょうが、 >文章が黄色に反転するだけなのですが というのが目的ですが、結果ですか?どうも目的らしい。 それと Private Sub 設定_Click() MsgBox "ボタンをクリックしました" End Sub とはどういう関係にあるのですか。上記プログラムは、>文章が黄色に反転するだけなのですがのことは何も書かれていませんが? 主要本体は、削ってしまったのか? ーー 「反転する」のではなく文字のフォントの色を黄色にするのではないのですか。ほんとに「反転」させるのですか。 ーー エクセルと思うが、文章ということからワードとも取れる。 初心者でも、質問文章ぐらい正確に書くこと。 ーー シート(Sheet1)にコマンドボタンを貼り付け、それをクリックすると例えば、A1セルの文字を黄色にするなら Private Sub CommandButton1_Click() Worksheets("Sheet1").Range("A1").Font.ColorIndex = 6 End Sub 勉強ならこれでいいが、内容的に使う場合は考えられない。 また黄色の文字は読みにくい。 ーー セルのパターン色なら Private Sub CommandButton1_Click() Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 6 End Sub ーー いずれも上記は、的外れの回答の恐れが有るが、質問が不明確。
- agnostia
- ベストアンサー率36% (4/11)
黄色に反転した時にエラーメッセージは表示されませんか? あれば提示して下さい。 あと念のために、 Private Sub 設定_Click() MsgBox ("ボタンをクリックしました") End Sub というように()でくくってみて下さい。
補足
MsgBox ("ボタンをクリックしました") と()でくくったらメッセージがでました。感動しました。なぜなんでしょうか?VBAの勉強を週末からはじめたばかりなのでちょっとしたことで感動してしまいます。
お礼
ありがとうございました
補足
よくわかりました。もし、お時間があるようでしたら下記の質問にもこたえてやってくれないでしょうか? http://okwave.jp/qa4362469.html 時間があればでよろしいです。