0

我创建了一个宏并将其放入personal.xls 文件中。该宏假设自动填充 PhanCong.xls 中 J 列的 vlookup,但它只返回确切的公式。这是我的 Excel 文件的一部分,以说明我所说的。

在此处输入图像描述

第一列应该有 vlookup 值,而不是这样的公式。这是我的宏,自动填充数据的部分。

        "C:\Users\khoale\Desktop\PhanCong.xls"
Windows("test.xlsx").Activate
ActiveSheet.Cells(2, 1).Activate
ActiveCell.FormulaR1C1 = _
    "=VLOOKUP(RC[9],'[PhanCong.xls]Bang ma CC'!C1:C7,7,FALSE)"
Dim autoFillRow As Long
With ActiveSheet
autoFillRow = .Range("C" & Rows.Count).End(xlUp).Row
End With
Range("A2").Select
Selection.AutoFill Destination:=Range("A2:A" & autoFillRow), Type:=xlFillDefault
4

1 回答 1

1

单元格格式Text将单元格的值视为文本。它不会评估任何公式。如果您希望对其进行评估,我认为您必须使用General. (不是 100% 确定的)

如果您需要将结果格式化为文本,我相信您可以做到这一点。

=TEXT(VLOOKUP(RC[9],'[PhanCong.xls]Bang ma CC'!C1:C7,7,FALSE))

只是试了一下,不,它不会有帮助!

于 2013-03-21T00:54:39.410 回答