2025-01-01 メッセージボックスを表示する VBA hatena facebook Twitter Pocket Sub ShowMessage() MsgBox "Hello, World!"End Sub