12
返回列表 上一主題 發帖

[發問] 遞減複製標題

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
11# 跳轉到 »
發表於 2021-7-13 21:38 | 只看該作者
本帖最後由 ziv976688 於 2021-7-13 21:50 編輯

回復 10# samwang
沒有關係!謝謝您的回覆。
可否請教~
Sheets(Array("準7進8", "準6進7", "準5進6", "準4進5", "準3進4", "準2進3")).Select
這段語法正確嗎?
為什麼包括"準1進2"也會 將Sheets("DATA").Range("A" & StrRng - 1, "I" & mthcount - 1).Copy 到.Range("AL2").Resize(1, mthcount - StrRng + 1)?
是不是受到列88  "For I = 1 To 7"  的影響?
謝謝您!

TOP

samwang

帖子
976 
主題
7 
精華
0 
積分
1018 
點名
0  
作業系統
Win10 
軟體版本
Office 2016 
閱讀權限
50 
性別
男 
註冊時間
2013-4-19 
最後登錄
2024-10-30 
12#
發表於 2021-7-14 08:04 | 只看該作者
回復 11# ziv976688


Sheets(Array("準7進8", "準6進7", "準5進6", "準4進5", "準3進4", "準2進3")).Select
這段語法正確嗎? --> 正確

為什麼包括"準1進2"也會 將Sheets("DATA").Range("A" & StrRng - 1, "I" & mthcount - 1).Copy 到.Range("AL2").Resize(1, mthcount - StrRng + 1)? --> 不可能因為上面那段而影響"準1準2"，一定是其它的地方導致

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
13#
發表於 2021-7-14 08:58 | 只看該作者
回復 12# samwang
謝謝您的耐心說明和指導。
我再想想看
感恩喔

TOP

        靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。
12
返回列表 上一主題