时间戳

首页 > 解决方案 > VLOOKUP 不适用于通过 VBA 的所有行

excel - VLOOKUP 不适用于通过 VBA 的所有行

问题描述

我正在使用 2 张纸将 VLOOKUP 应用于一列。该代码有效，但仅适用于一个单元格。我想应用于标题下方的所有单元格。下面是我试图执行的代码：

ESheet.Range("C2").Formula = "=VLOOKUP(B2, Roles!$A:$B, 2, FALSE)"

标签： excelvbaexcel-formulavlookup

解决方案

请使用此代码：

Sub VlookupAlColumn()
 Dim ESheet As Worksheet, lastR As Long
 'Set ESheet = ActiveSheet 'only for me, for testing reason
 lastR = ESheet.Range("C" & Cells.Rows.Count).End(xlUp).row
 ESheet.Range("C2:C" & lastR).Formula = "=VLOOKUP(B2, Roles!$A:$B, 2, FALSE)"
End Sub

推荐阅读