0
Dim collet As String
collet = ThisWorkbook.ColLetter(ColCount) + ":" + LTrim(Str(Target.Row))
Set my_r = Target(collet).Select
我得到的運行時錯誤在最後一行在我code.Cannot弄清楚爲什麼運行時錯誤1004:應用程序定義或對象定義的誤差範圍對象
Dim collet As String
collet = ThisWorkbook.ColLetter(ColCount) + ":" + LTrim(Str(Target.Row))
Set my_r = Target(collet).Select
我得到的運行時錯誤在最後一行在我code.Cannot弄清楚爲什麼運行時錯誤1004:應用程序定義或對象定義的誤差範圍對象
這將有助於瞭解什麼你想在這裏完成,但我可以提出一些建議。
首先,在引用單個單元格時,我相信你正在嘗試這樣做,所以不需要冒號。所以collet
應該包含像「B2」,而不是「B:2」。
其次,當您在Range
對象上調用Select
時,它將該參數用作偏移量,而不是絕對引用。因此,如果Target
是單元格B2,並且collect
是B2,那麼Target("B2").Select
實際上將選擇單元格C3。
最後,我假設存在Target
對象,該代碼位於事件處理程序中。確保通過選擇不同的範圍,您不會再次觸發相同的事件。您可能會以無限循環結束,只有當您達到電子表格的底部或結尾時纔會結束。這種情況可能導致您看到的運行時錯誤1004。
最後一行執行前'collet'的值是什麼? – BenV 2010-08-26 14:45:06
請發佈更多的代碼,特別是各種變量的聲明。另外,你試圖達到什麼目標? – Lunatik 2010-08-26 15:32:26