2016-02-14 123 views
1

這是我的代碼,因爲我試圖將此公式應用於不斷更改的數據列。VBA範圍不工作,全局參數?

Dim x As Integer 
x = Range("N3").FormulaR1C1 = "=COUNT(C[-10])" 
Range("P1").FormulaR1C1 = "Die Type" 
Range("P2:Px").FormulaR1C1 = "=RIGHT(LEFT(RC[-12],2),1)"*** 

我不斷收到錯誤1004說「法範圍object_global失敗。

如何設置X作爲我的變量值?

我使用Excel 2007中

回答

2

這是奇怪,我不認爲你可以通過這種方式獲得細胞數:

x = Range("N3").FormulaR1C1 = "=COUNT(C[-10])" 

可以喲ü嘗試:

Dim x As Integer 
x = Application.WorksheetFunction.Count(Range("D3:N3")) 

Range("P1") = "Die Type" 
Range("P2:P" & x).FormulaR1C1 = "=RIGHT(LEFT(RC[-12],2),1)" 
0

計數()只計數數字
您可能需要使用COUNTA()如果你有文字D3:N3
x = Application.WorksheetFunction.Counta(Range("D3:N3"))