返回列表 上一主題 發帖

[發問] 未指定活頁簿名稱,單檔案跑正常,為何雙檔案跑會錯誤?

Joforn
　暱稱: 南宮飄雪

中學生Rank: 2

帖子
109 
主題
2 
精華
0 
積分
114 
點名
0  
作業系統
Win7 Win10 
軟體版本
Office 2019 WPS 
閱讀權限
20 
性別
男 
來自
深圳 
註冊時間
2013-2-2 
最後登錄
2024-11-6 
1# 跳轉到 »
發表於 2015-12-11 08:28 | 顯示全部帖子
Cells(r + 1, 12).Resize(2, 100).Value = Cells(r - 1, 12).Resize(2, 100).Value
像這樣的引用，Cells對象正是當前被激活的工作表中的對象。
世界那麼大，可我想去哪？

TOP

Joforn
　暱稱: 南宮飄雪

中學生Rank: 2

帖子
109 
主題
2 
精華
0 
積分
114 
點名
0  
作業系統
Win7 Win10 
軟體版本
Office 2019 WPS 
閱讀權限
20 
性別
男 
來自
深圳 
註冊時間
2013-2-2 
最後登錄
2024-11-6 
2#
發表於 2015-12-11 16:46 | 顯示全部帖子
回復  Joforn

對阿,所以即便兩個活頁簿的切換

理應不會造成影響才對

因為我都沒有指定活頁簿名稱 ...
PKKO 發表於 2015-12-11 09:40


那個是系統自動切換的。比如你先打了包含這段代碼的工作簿，那麼當前工作簿就是本身，然後再開啟另一個工作簿，那麼當前工作簿就自動切換成了最新的工作簿，你這時再切換Window轉回有代碼的工作簿，這時當前工作簿又轉換回來了。當前工作表指的就是正在活動的工作簿中的活動狀態下的工作表。形像點來說，就是所有Windows最大化之後被顯示出來的那個工作表。它不是一個常量，而是會根據系統和用戶的操作而不停變換的對象。
世界那麼大，可我想去哪？

TOP

Joforn
　暱稱: 南宮飄雪

中學生Rank: 2

帖子
109 
主題
2 
精華
0 
積分
114 
點名
0  
作業系統
Win7 Win10 
軟體版本
Office 2019 WPS 
閱讀權限
20 
性別
男 
來自
深圳 
註冊時間
2013-2-2 
最後登錄
2024-11-6 
3#
發表於 2015-12-11 21:10 | 顯示全部帖子
各位大大好,

小弟愚昧想請教一下
我的程式觸發都是寫在:

Private Sub Worksheet_Change(ByVal Target As Range)
或是在分頁內的按鈕

而所有的程式碼都是針對本檔案的內容作變更,完全沒有任何一個程式碼是使用到workbooks(XX)的這種指定檔案名稱
例如:
r = Target(1).Row
Cells(r + 1, 12).Resize(2, 100).Value = Cells(r - 1, 12).Resize(2, 100).Value
name1 = Cells(r, 10).Value
dbs=sheets("AA").[a1].resize(5,5).value
[a2]=dbs(1,1)
PKKO 發表於 2015-12-10 23:45

你上面的代碼寫在了Worksheet_Change中？如果是的話應該會導致堆桟溢出錯誤。應該你自己運行測試也會有錯誤提示的。
你能不能把你的完整的事件處理過程貼出來？
世界那麼大，可我想去哪？

TOP

        靜思自在 : 多做多得。少做多失。
返回列表 上一主題