投稿/コメントを表示します。

エクセルマクロ・VBA基礎編
基礎講座第４章７ - 「If文」の実習

受講生さんの投稿

(投稿ID: 3430)

おかげさまで少しづつ理解できるようになりました。
そこで、同じように記入するところは、変数a,bでいいかな？と思い、
以下のようにしてみましたが、range("h" & c)　には値が入って
きませんでした。

エラーは出ていないのですが、変数の使い方に問題があるので
しょうか？
変数a,bのところをrange~とすればきちんと実行されます。

よろしくお願いいたします。
Sub ren()
    Dim a
    Dim b
    
    Dim c
    For c = 2 To 11
        
    a = Range("g" & c).Value
    b = Range("h" & c).Value
           
    If a > 70 Then
        b = "合格"
    ElseIf a >= 50 Then
        b = "まあまあ"
    Else
        b = "不合格"
    End If
    
    Next
    
End Sub

2017/09/17 17:09