2021-07-05から1日間の記事一覧
vlook Sub setVlook() On Error GoTo err: With Worksheets("sheet1") .Range("I3:I10") = WorksheetFunction.VLookup(.Range("B3:B10"), Sheet2.Range("$A$3:$B$10"), 2, False) End With Exit Sub err: Debug.Print err.Number, err.Description End Sub i…