Office 板


LINE

軟體: Office Excel 版本: 2010 手機發文,排版見諒… 寫了一個UserForm,裡面有幾個CommandButton。 目的是為了取代內定的MsgBox功能。 在使用MsgBox時,可以回傳使用者按下的是哪個按鈕,但是在自訂的UserForm卻找不到方式回傳… 試了以下方式: 1. 於UserForm裡加入一個Label1,每個按鈕按下時都會對這個Label賦值。 2. VBA裡再令變數 = UserForm1.Label1.Caption 但是無法成功,只會帶回Label1的預設值,也就是說關掉UserForm之後,對Label1的賦值就不見了。 想試著在unload UserForm之前就先取變數,但是好像無法?不知道有沒有前輩寫過類似的需求呢? -- ┌─────────────────────────────┐ 就這樣,終於到了啟程的日子。 和來機場送行的朋友們說著玩笑話,其實內心恍恍惚惚像在作夢。 也似乎是因為,為了走到「出發」這一步,耗盡了全部心力。 └─────────────────石田裕輔《不去會死!》─┘ --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.136.102.241
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1524264033.A.A32.html
1F:→ newacc: 要把值存在模組裡 04/21 08:40
2F:→ foolkids: 在模組層次宣告變數的意思嗎? 04/21 09:30
3F:→ soyoso: 賦值後,執行vba的流程是?於userform內按下commandbutton 04/21 10:27
4F:→ soyoso: ?還是以其他方式? 04/21 10:27
5F:→ foolkids: 藉由傳回的值來在原來sub內決定程序的後續執行,Command 04/21 10:52
6F:→ foolkids: Button只是一個讓使用者選擇的概念 04/21 10:52
7F:→ soyoso: 前者,如unload userform寫在模組程序內,則改為於 04/21 10:53
8F:→ soyoso: commandbutton內傳值到程序,就可以unload userform 04/21 10:55
9F:→ soyoso: 程序(變數)的方式 04/21 10:55
10F:→ foolkids: 我會在CommandButton的程序內將Label賦值後關閉UserForm 04/21 10:55
11F:→ foolkids: 。 04/21 10:55
12F:→ soyoso: 抱歉應是 程序名稱 變數(或以label1.caption) 04/21 10:57
13F:→ soyoso: 那流程是從sub內userform.show,讓使用者選擇後,unload 04/21 11:00
14F:→ soyoso: 回原sub,可以取得所選取commandbutton的資訊 04/21 11:02
15F:→ soyoso: 如果是的話sub上方public 變數,按下觸發事件內變數 = 04/21 11:05
16F:→ soyoso: commandbutton要回傳的資訊 04/21 11:06
17F:→ soyoso: sub內再引用該變數 04/21 11:07
18F:→ foolkids: 其實我現在確實是在Sub內load userform,待user按下butt 04/21 11:08
19F:→ foolkids: on後,寫入label並unload UserForm。回到sub後,設定變 04/21 11:08
20F:→ foolkids: 數為label.caption。可是好像要在unload前取到變數?可 04/21 11:08
21F:→ foolkids: 是我找不到在unload前將變數取回到sub的方式… 04/21 11:08
22F:→ foolkids: 哦哦哦!好喔,我試試看public的方式,謝謝! 04/21 11:08
23F:→ foolkids: So大,還是不行耶,已經設定共用變數了,UserForm.Show 04/21 13:08
24F:→ foolkids: 之後會顯示變數未定義,所以繼承不過去 04/21 13:08
25F:→ foolkids: 後來用一個奇怪的方式解決,但是還是想知道有沒有更直覺 04/21 13:13
26F:→ foolkids: 的? 我在CommandButton_Click裡去呼叫原模組內的一個su 04/21 13:13
27F:→ foolkids: b,這樣才可以直接對原模組內的Public變數賦值。 04/21 13:13
28F:→ soyoso: https://youtu.be/pqxaFiaFzdg 測試sub userform.show 04/21 13:20
29F:→ soyoso: userform commandbutton按下觸發寫入變數 unload是可回傳 04/21 13:21
30F:→ soyoso: 所按下commandbutton的caption 04/21 13:21
31F:→ foolkids: 奇怪… 寫法一樣卻沒辦法重現… 版本問題? 04/21 14:19
32F:→ foolkids: 阿,我有個地方寫錯了… SO大的可行,謝謝! 04/21 14:28







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:WOW站內搜尋

TOP