如何用VBA 把SUBOROUTINE寫入特定WORKSHEET？ - Excel程式區

[發問] 如何用VBA 把SUBOROUTINE寫入特定WORKSHEET？

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

11^# 跳轉到 »

發表於 2015-10-13 15:11 | 顯示全部帖子

回復 17# lpk187

應該不是，上面stillfish00大大的手動動作沒有加入insert動作，但usedrange仍然出錯
我想應該是stillfish00推論：調整欄闊、GROUP和UNGROUP同時使用後，usedrange便無法重設

TOP

小俠客

中學生 Rank: 2

帖子: 83
主題: 17
精華: 0
積分: 105
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
註冊時間: 2010-12-28
最後登錄: 2018-8-8

12^#

發表於 2015-10-13 15:41 | 顯示全部帖子

回復 20# lpk187

有呀，我以為是這樣：由於無法重設該工作表的USEDRANGE，所以每次在USEDRANGE中間insert了10欄，usedrange都會變大10欄
你可以試試用我的V2，最初的USEDRANGE是「$A$1:$S$31」，然後全選再全部清除資料，USEDRANGE變成「$C$1:$S$1」，所以每次程式INSERT COLUMNS，都會令USEDRANGE變大。而如果把insert那句刪去，程式便會把所有資料寫在B至D欄上，USEDRANGE便沒有變大
不知道是不是這樣，我是這樣解釋。

TOP

小俠客