Excel 使用VLookup后如何复制/粘贴值

我有一个VLookup函数，其中我使用

.value

而不是

.formula

来删除VLookup引用。然而，当我点击字段时，VLookup公式仍然存在。去除配方奶粉的正确方法是什么<代码>复制/粘贴特殊值

Dim WbScorecard As Workbook
Set WbScorecard = Workbooks("M6 SCORECARD TEMPLATE.xlsm")
    
Dim WsWeeklyDiv As Worksheet
Set WsWeeklyDiv = WbScorecard.Worksheets("Weekly Division")
       
With WsWeeklyDiv
  'VLookup Group Data
  Dim VLookupWkDiv As String
                VLookupWkDiv = "=VLOOKUP(I15,'[M6 SCORECARD-Vlookups.xlsm]WEEKLY DIVISION'!$C:$D,2,FALSE)"
    
  Dim VLookupWkDiv2 As String
                VLookupWkDiv2 = "=VLOOKUP(I15,'[M6 SCORECARD-Vlookups.xlsm]WEEKLY DIVISION'!$C:$E,3,FALSE)"
    
  Dim Target As Range
  Set Target = .Range("A15", .Range("A" & .Rows.Count).End(xlUp))
    'VLookup in "J15"
    Set Target = Target.Offset(, 9)
      Target.Value = VLookupWkDiv
            
    'VLookup in "K15"
    Set Target = Target.Offset(, 1)
       Target.Value = VLookupWkDiv2
                    
End With

---

在输入以下公式后，您需要在另一行执行

.Value

：

Target.Value=Target.Value

@ScottCraner谢谢！在输入以下公式后，您需要在另一行执行

.Value

：

Target.Value=Target.Value

@ScottCraner谢谢！添加口头解释通常是有帮助的添加口头解释通常是有帮助的

Set Target = Target.Offset(, 9)

' set target cell's formula
Target.Formula = VLookupWkDiv

' set the value/result of the formula
' to the value of the cell
Target.Value = Target.Value