<meta property=”og:title” content=”アニメ” />

ペントスのほぼ日ブログ

劇場アニメ、デジタルイラスト、エクセルの話をアップしています

劇場アニメ
スケジュール
劇場アニメ WordPress
副業
デジタルイラスト エクセル お知らせ
自炊 イベント

エクセル奮闘記-08 --- メモ03-メッセージボックスの続き

2月5日更新

f:id:pen-toss:20150323214553j:plain

読んで下さる方へ

 

メッセージボックスの機能の続きです。

 

コードがたまってきたので、次回はメモ1~メモ3(こちらのページ)までを、各ページ上で更新する予定です。「更新」といっても名前の変更、コード内のコメントの追加(更新)、動作チェックくらいですが。

↓ 2月5日

まとめ記事をアップしました。

こちらの記事の下に後日、更新、動作確認をしたコードを貼りつけることにしました。

エクセル奮闘記-09 --- まとめ--メッセージボックスの話 - ペントスの気まぐれブログ

 

f:id:pen-toss:20150323214553j:plain

 

Sub Macro3()

'変数にメッセージボックスの結果を入れる
変数 = MsgBox("【はい】か【いいえ】か選んで下さい", vbYesNo)


'条件文で変数に結果を入力する
If 変数 = vbYes Then

MsgBox "【はい】ですね?"

Else

MsgBox "【いいえ】ですね?"

End If

End Sub

 

f:id:pen-toss:20150323214553j:plain

 

Sub Macro4()
'メッセージボックスにアクティブシートの名前を入れる

MsgBox ActiveSheet.Name

End Sub

 

 

f:id:pen-toss:20170201231242j:plain