Page 1 of 1

ต้องการเช็คระดับชั้นด้วย VBA

Posted: Thu Oct 10, 2024 11:56 am
by tigerwit
จากไฟล์ที่แนบ
ต้องการใช้ Code เช็คว่า อักษรซ้ายสุดใน F1 เป็น ป หรือไม่
ถ้าเป็น ป ให้ แสดง MsgBox บอกว่า ชั้นประถมศึกษา
ถ้าไม่ใช่ ป ให้ แสดง MsgBox บอกว่า ชั้นมัธยมศึกษา
ต้องปรับ Codeอย่างไรครับ

Code: Select all

Sub chkclass()
    If Left(Range("F1"), 1).Value = "ป" Then
        MsgBox "ชั้นประถมศึกษา"
    Else
        MsgBox "ชั้นมัธยมศึกษา"
    End If
End Sub

Re: ต้องการเช็คระดับชั้นด้วย VBA

Posted: Thu Oct 10, 2024 4:00 pm
by puriwutpokin
แก้ไขส่วนนี้ครับ

Code: Select all

Sub chkclass()
    If Left(Range("F1"), 1) = "ป" Then
        MsgBox "ชั้นประถมศึกษา"
    Else
        MsgBox "ชั้นมัธยมศึกษา"
    End If
End Sub

Re: ต้องการเช็คระดับชั้นด้วย VBA

Posted: Fri Oct 11, 2024 7:35 pm
by tigerwit
ขอบคุณครับ