IF文っつうのを使ってな、めっちゃ簡単な条件分けをやってぐんだど

Sub If文とMsgBox()
    If Range("A1").Value > 50 Then
        MsgBox "セルA1の値は50より大きいど~!"
    Else
        MsgBox "セルA1の値は50以下だっぺな!"
    End If
End Sub
「セルA1の値」を調べて、その値が50より大きいかどうかを
条件に応じて異なるメッセージを表示するものだっぺ。
If Range("A1").Value > 50 Then
セルA1の値が50より大きい場合の処理を指定してるんだど。
Else
それ以外(50以下)の場合に実行する処理だっぺ。
MsgBox
メッセージボックスで結果を表示する部分だど~。

動作の流れ
まず、コードを実行するとセルA1の値を確認するんだど。
セルA1の値が50より大きい場合: 「セルA1の値は50より大きいど~!」というメッセージが表示されるっぺ。
セルA1の値が50以下の場合: 「セルA1の値は50以下だっぺな!」というメッセージが表示されるようになってるど。
条件分岐の基本的な構成だっぺ。

  • Data8Rock

    VBA村の住人です。

    Related Posts

    【VBAはレガシー村のいきのこりだっぺ!〜じっちゃんのExcel革命〜】

    おらの村じゃ、パソコンなんてのは都会のもんだと思ってたんだっぺ。でもな、ある日役場の若ぇもんが「じっちゃん、Excelで収穫記録つけてみましょう」って言ってきたんだわ。最初は「エクセル?それ、畑の肥料かなんかか?」って思ったけんど、違ったんだわ。そしたら今度は「VBAってのが便利です」って言われてよ。 VBAっつーのは、Excelの中で使える魔法みてぇなもんで、ボタン押すだけで仕事がパパッと終わっちまうんだと。まるで村の祭りで餅投げしたら、空から帳簿が降ってくるみてぇなもんだっぺ! でもな、今の若ぇもんは「VBAはレガシーだ」とか言って、PythonだのPower Automateだの、横文字ばっか使ってるんだわ。おらからすりゃ、VBAはまだまだ現役。レガシー村のいきのこりとして、しぶとく生きてるんだっぺ! たとえば、こんなコードがあるんだわ: Sub 畑の収穫記録( ) Dim i As Integer For i = 2 To 10 Cells(i, 1).Value = “じゃがいも” Cells(i, 2).Value = Date + i Cells(i, 3).Value…

    コピーと削除は大事なもんだから、復習すっぺな