2013-03-21 101 views
0

,並把它放在Personal.xls文件。 宏假設自動填充PhanCong.xls中的J列的查找,但它只是返回公式。 這裏是我的Excel文件的一部分,來說明我說的。Excel的VBA自動填充剛剛回到我創建了一個宏公式

enter image description here

第一列應具有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 
+0

什麼是'目標列的Format'? – NickSlash 2013-03-21 00:48:03

+0

我與此列格式化它。(「A:A」)的NumberFormat =「@」 – 2013-03-21 00:48:36

+0

我試圖把它以文本格式,因此,如果該行是錯誤的,請大家指正。 – 2013-03-21 00:50:03

回答

1

單元格格式Text將單元格的值視爲文本。它不會評估任何公式。如果你想要評估它,我認爲你必須使用General。 (不是100%確定)

如果您需要格式化結果爲文本,我beleive你可以做到這一點。

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

只是給它一個去也沒有,它不會幫助!