สวัสดีครับ ผมเป็นมือใหม่หัดเขียน VBA ครับ
เลยมาปรึกษาผู้รู้ในที่นี้ว่า
หากจะให้เงื่อนไขว่า
ถ้าเป็นชั้นปีที่ 1 ให้ vlookup จากช่วงนี้ ไล่ทีละ cell ทีละ row
ควรจะต้องใช้คำสั่งอะไร (If...Then, If...Then...Else, ฯลฯ)

กระทู้เก่าถามถึงสูตร if แต่ตอนนี้เจ้าของงานอยากได้ปุ่มกดแล้ว run macro เลย
จึงต้องใช้ VBA เข้ามาช่วยครับ
https://ppantip.com/topic/37816305

code ที่ลองเขียนแล้วลอง run มันยังไม่ไปครับ
    Range("K9").Select
    If (R1C1 = 1) Then
    Range("K9").Select
    With Selection.Font
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = 0
    End With
    Range("B9").Select
    ActiveCell.FormulaR1C1 = "=IFERROR(VLOOKUP(RC[-1],หลักสูตร!C1:C7,2,),"""")"
    Range("B9").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("C9:E9").Select
    ActiveCell.FormulaR1C1 = "=IFERROR(VLOOKUP(RC[-2],หลักสูตร!C1:C7,3,),"""")"
    Range("C9:E9").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("F9").Select
    ActiveCell.FormulaR1C1 = "=IFERROR(VLOOKUP(RC[-5],หลักสูตร!C1:C7,4,),"""")"
    Range("F9").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("F9").Select
    End If

ตัวอย่างไฟล์ตามนี้เลยครับ
https://www.picz.in.th/image/NWwldf