返回列表 上一主題 發帖

抓取整個col之格子數量時，若 col 只有一個cell為數值，為什麼會溢位

m09903020

帖子
40 
主題
13 
精華
0 
積分
69 
點名
0  
作業系統
w7 
軟體版本
office07 
閱讀權限
20 
性別
男 
註冊時間
2012-4-24 
最後登錄
2012-8-20 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2012-7-15 20:58 | 只看該作者

抓取整個col之格子數量時，若 col 只有一個cell為數值，為什麼會溢位

溢位, overflow, 資料型態
  1. Sub test()
  2. Dim a As Integer

  4. a = Sheets("order_pool").Range("A1", Sheets("order_pool").Range("A1").End(xlDown)).Rows.Count
  5. End Sub
複製代碼
請問一下 order_pool只有A1有數值，照理來說會是1     a錯的時候為 = 1048576 超出data type範圍
我不懂為什麼a會溢位?  請大大釋疑~~
要怎麼修正勒@...@?
收藏 分享

m09903020

帖子
40 
主題
13 
精華
0 
積分
69 
點名
0  
作業系統
w7 
軟體版本
office07 
閱讀權限
20 
性別
男 
註冊時間
2012-4-24 
最後登錄
2012-8-20 
4#
發表於 2012-7-15 21:27 | 只看該作者
本帖最後由 m09903020 於 2012-7-15 21:32 編輯

我看到 1048576!   原來我寫的錯在這~~~><"
看來語法用錯到全選A去了...

謝謝oobird

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
3#
發表於 2012-7-15 21:23 | 只看該作者
Range("A1").End(xlDown)
意思是選中a1儲存格，按ctrl+向下鍵，你看會到什麼地方？

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
2#
發表於 2012-7-15 21:20 | 只看該作者
用.Range("A1048576").End(xlup))

TOP

        靜思自在 : 有多少力量就做多少事，不要心存等待，等待才會落空。
返回列表 上一主題