爲什麼添加類型不匹配，即使我施放？

我正在執行空白行分隔的兩個數據塊之間的操作，我需要獲取第二個塊的行。我通過使用'Selection.End（xldown）'選擇數據的頂部數據塊，然後從中取出數據行並添加兩個數據來完成此操作。由於總是有一個單獨的空行來分隔這些塊，所以這應該起作用，但是在我將兩行添加到該行的行上，儘管事實上我在添加之前使用CInt投射行，但我得到了類型不匹配。有問題的代碼是爲什麼添加類型不匹配，即使我施放？

Dim col 
col = Split(Selection.Address, "$")(1) 
Dim tmp as Integer 
tmp = CInt(col) + 2

最後一行總是會導致類型不匹配錯誤。這是爲什麼？我在嘗試什麼錯？最重要的是，我該如何解決它？

我找不到任何人遇到這個問題，除非他們從工作表中提取數據，看起來像是一組不同的情況。

來源

2015-07-21 VBAnoob

檢查，看看有什麼回報山坳......無論你怎麼投是很難，它永遠不會是一個Int – sous2817

col返回列名稱。謝謝，那應該是問題了。是否有一個內置函數可以將名稱更改爲數字，還是隻需要編寫一個？ – VBAnoob

給我的答案一個旋轉，看看它是否讓你接近... – sous2817

您設置的方式，您將返回地址的字符表示形式。試試這個：

col = Selection.Column

應返回的數字位置（在我有限的測試它至少）

來源

2015-07-21 19:29:47 sous2817

這是它。再次感謝。 – VBAnoob

爲什麼添加類型不匹配，即使我施放？

回答

相關問題