Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/search/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel VBA自动填充仅返回公式_Excel_Autofill_Vlookup_Vba - Fatal编程技术网

Excel VBA自动填充仅返回公式

Excel VBA自动填充仅返回公式,excel,autofill,vlookup,vba,Excel,Autofill,Vlookup,Vba,我已经创建了一个宏并将其放入personal.xls文件中。 宏假设在PhanCong.xls中自动填充J列的vlookup,但它只返回精确的公式。 下面是我的Excel文件的一部分,以说明我所说的 第一列应该有vlookup值,而不是这样的公式。 这是我的宏,自动填充数据的部分 "C:\Users\khoale\Desktop\PhanCong.xls" Windows("test.xlsx").Activate ActiveSheet.Cells(2, 1).Activat

我已经创建了一个宏并将其放入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

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

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

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


只是试了一下,不,没用

目标列的
格式是什么?
我已使用此列对其进行了格式化(“A:A”)。NumberFormat=“@”我尝试将其格式化为文本,因此如果该行有错误,请更正。请尝试
常规
Text
将所有内容都视为文本,不会对其进行评估。omg,这是一个简单的解决方案。谢谢你的帮助。因为这只是一个评论,所以我只能投你的评论。