VBA将'插入公式答案

【问题标题】：VBA inserts ' into formulaVBA将'插入公式
【发布时间】：2015-02-05 20:51:53
【问题描述】：

我确信这可能是有史以来最简单的事情，但我真的对此感到困惑。

我在 VBA 中有以下代码：

For j = 0 To n
    For i = 0 To 11
        Dim y As Integer
        y = Sheets("Checking").Cells(3 + j, 4 + (i * 4)).Value
        Sheets("Checking").Cells(3 + j, 5 + (i * 4)).FormulaR1C1 = "=VLookup(A" & 3 + j & ",PPG," & y + 1 & ",0)"
    Next i
Next j

这可以满足我的需要，但是当它将 VLookup 公式插入 excel 时，它会显示为 =VLOOKUP('A3',PPG,2,0) 在单元格引用周围带有单引号。

为什么会这样，我该如何纠正？

【问题讨论】：

标签： excel vba

【解决方案1】：

使用.Formula 而不是.FormulaR1C1。后者展示了您通过设计观察到的行为。

【讨论】：

【解决方案2】：

由于您使用的是 VBA，我宁愿完全避免使用工作表：

Sub M_snb()
 sn = [PPG]
 sp = [PPG].Columns(1)

 For j = 0 To n
  For jj = 0 To 11
    With Sheets("Checking").Cells(3 + j, 5 + (jj * 4))
       .Value = sn(Application.Match(Cells(j + 3, 1), sp, 0), .Offset(, -1).Value)
    End With
  Next
 Next
End Sub

【讨论】：