見出し画像

VBA 2日

VLOOKUPはもともとだいたい理解できましたが、とりあえずVBAでもこれぐらいは理解できるようになりました。

Sub TEST()

    Dim i As Long
    For i = 15 To Cells(Rows.Count, 1).End(xlUp).Row
        Cells(i, 4) = WorksheetFunction.VLookup(Cells(i, 3), Range("J:L"), 2, 0)
        
    Next

End Sub


この記事が気に入ったらサポートをしてみませんか?