註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Excel程式區
» USERFROM中的多個FRAME及多個Private Sub的管理方法
返回列表
下一主題
上一主題
發帖
[發問]
USERFROM中的多個FRAME及多個Private Sub的管理方法
ciboybj
發短消息
加為好友
ciboybj
當前離線
UID
17946
帖子
47
主題
19
精華
0
積分
82
金錢
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
在線時間
31 小時
註冊時間
2014-7-4
最後登錄
2021-9-4
中學生
帖子
47
主題
19
精華
0
積分
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
註冊時間
2014-7-4
最後登錄
2021-9-4
1
#
跳轉到
»
正序看帖
打印
字體大小:
t
T
發表於 2018-2-27 00:17
|
只看該作者
[發問]
USERFROM中的多個FRAME及多個Private Sub的管理方法
本帖最後由 ciboybj 於 2018-2-27 00:22 編輯
大家好
我利用自訂的USERFORM設計了兩個
表單
下載
(11.4 KB)
2018-2-27 00:21
程式邏輯如下:
讓USERFORM1的視窗僅顯示出框架1的內容,
下載
(8.77 KB)
2018-2-27 00:20
當使用者按下 按鈕2時,將框架1移到USERFORM1的視窗外,並將 框架2 移到USERFORM1的視窗內
下載
(8.85 KB)
2018-2-27 00:20
我的
問題
是:
框架1及框架2中我都會設計多個按鈕,因此,在USERFORM1中會同時存在有屬於框架1的多個Private Sub 及屬於框架2的多個Private Sub
我想說為了日後好管理,所以另外建立了兩個Module
下載
(3.64 KB)
2018-2-27 00:22
然後在使用者按下框架1或是框架2中的任一個按鈕時,利用Application.Run "Module1.test"的方式,將動作導向至Module1中的Private Sub test()
但,這樣的操作會跑出錯誤訊息:
下載
(9.54 KB)
2018-2-27 00:14
想請問大家,有沒有什麼辦法可以解決該錯誤訊息,還是有什麼辦法可以方便管理USERFROM1中的多個Private Sub
樓主熱帖
查找網站資料
將巨集加在滑鼠的右鍵選單中
將巨集加在滑鼠的右鍵選單中
利用迴圈新增書籤的名稱
自製進度條(不用ProgressBar)
快速找出範圍內最大列數
動態資料範圍 名稱定義
利用vba 批量查找陣列中字串,並據以新增書籤
用excel vba 控制word 並將userform的資料填
VBA 程式 販售的可能性
收藏
分享
ciboybj
發短消息
加為好友
ciboybj
當前離線
UID
17946
帖子
47
主題
19
精華
0
積分
82
金錢
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
在線時間
31 小時
註冊時間
2014-7-4
最後登錄
2021-9-4
中學生
帖子
47
主題
19
精華
0
積分
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
註冊時間
2014-7-4
最後登錄
2021-9-4
5
#
發表於 2018-2-28 21:19
|
只看該作者
喔喔~
我再來追蹤一下~
謝謝~
TOP
jackyq
發短消息
加為好友
jackyq
當前離線
UID
21301
帖子
323
主題
6
精華
0
積分
313
金錢
313
點名
0
作業系統
xp
軟體版本
2k
閱讀權限
20
性別
男
在線時間
93 小時
註冊時間
2015-6-24
最後登錄
2025-5-3
中學生
帖子
323
主題
6
精華
0
積分
313
點名
0
作業系統
xp
軟體版本
2k
閱讀權限
20
性別
男
註冊時間
2015-6-24
最後登錄
2025-5-3
4
#
發表於 2018-2-28 19:37
|
只看該作者
回復
3#
ciboybj
Call Q = 自己呼叫自己
無止盡下去將導致堆疊空間耗盡 ( 堆疊空間大小是有限的 )
而產生你那個錯誤
你的程式應該是出現某各 Sub 陷入無止盡的 "自己呼叫自己"
是哪各 sub 你要自己去追蹤出來
TOP
ciboybj
發短消息
加為好友
ciboybj
當前離線
UID
17946
帖子
47
主題
19
精華
0
積分
82
金錢
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
在線時間
31 小時
註冊時間
2014-7-4
最後登錄
2021-9-4
中學生
帖子
47
主題
19
精華
0
積分
82
點名
0
作業系統
win
軟體版本
xp
閱讀權限
20
註冊時間
2014-7-4
最後登錄
2021-9-4
3
#
發表於 2018-2-28 16:39
|
只看該作者
TO jackyq
不太懂您的意思
可以再解釋一下嗎?
Call Q 是自己叫自己嗎?
謝謝~~~
TOP
jackyq
發短消息
加為好友
jackyq
當前離線
UID
21301
帖子
323
主題
6
精華
0
積分
313
金錢
313
點名
0
作業系統
xp
軟體版本
2k
閱讀權限
20
性別
男
在線時間
93 小時
註冊時間
2015-6-24
最後登錄
2025-5-3
中學生
帖子
323
主題
6
精華
0
積分
313
點名
0
作業系統
xp
軟體版本
2k
閱讀權限
20
性別
男
註冊時間
2015-6-24
最後登錄
2025-5-3
2
#
發表於 2018-2-27 10:22
|
只看該作者
' stack overflow
Sub Q( )
Call Q
End Sub
TOP
靜思自在 :
待人退一步,愛人寬一寸,就會活得很快樂。
返回列表
下一主題
上一主題
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 ‧ 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲