返回列表 上一主題 發帖

[發問] Range'方法('_Global'物件)失敗

准提部林

帖子
2848 
主題
10 
精華
0 
積分
2903 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2026-7-25 
1# 跳轉到 »
發表於 2016-4-21 10:43 | 顯示全部帖子
本帖最後由 准提部林 於 2016-4-21 10:45 編輯

Set xArea = Sheets("FMC").Range("A3:A" & R)
改為：
Set xArea = Sheets("FMC").Range("A2:A" & R)

資料從第２列開始∼∼
RR = [FMC!A65536].End(xlUp).Row: If RR < 3 Then Exit Sub
RR = [FMC!A65536].End(xlUp).Row: If RR < 2 Then Exit Sub

TOP

准提部林

帖子
2848 
主題
10 
精華
0 
積分
2903 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2026-7-25 
2#
發表於 2016-4-21 12:51 | 顯示全部帖子
回復 5# v03586

我的版本無法測完整程式,
可先將Call test註解掉不執行, 再去找問題出在哪個環節,
照說應跑完資料後, 再處理標題列上方的兩列!
版本太舊,幫不了忙!!

TOP

        靜思自在 : 信心、毅力、勇氣三者具備，則天下沒有做不成的事。
返回列表 上一主題