PTT數位生活區 / Office

[問題] VBA 對話視窗輸入前 可以操作其他excel

看板Office作者 (C.W.Chou)時間2年前 (2022/08/16 18:06), 編輯推噓2(2推 0噓 21→)
留言23則, 2人參與, 2年前最新討論串1/1
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:excel 版本:Microsoft 365 Apps Hi 各位VBA大神 我VBA程式中寫了inputbox, 實際運作時，在輸入資料並確認之前 (也就是對話視窗還沒關閉前) 我想要去用其他excel檔案，但是我完全無法使用其他分頁 似乎是被對話視窗卡著，不能操作其他檔案。 想要請問這個狀態，我想讓我在輸入對話視窗之前，仍然可以使用其他檔案 像是複製貼上等等，正常操作excel的動作 我該用什麼語法來寫，有一個hint也可以，我可以google語法要怎麼用 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 125.227.78.211 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1660644366.A.85F.html
推
08/16 20:16, 2年前 , 1F
Userform不知道可不可行？
08/16 20:16, 1F
推
08/18 06:14, 2年前 , 2F
改用Userform 或者工作表控制項(開發人員>插入)
08/18 06:14, 2F
→
08/18 06:15, 2年前 , 3F
幾個userform 會用到的功能 你慢慢試
08/18 06:15, 3F
→
08/18 06:16, 2年前 , 4F
userform1.show 0
08/18 06:16, 4F
→
08/18 06:16, 2年前 , 5F
unload me
08/18 06:16, 5F
→
08/18 06:16, 2年前 , 6F
public XXX '<-寫在原本的module1的最上面
08/18 06:16, 6F
→
08/18 06:17, 2年前 , 7F
將textbox1文字返回module1的程式內
08/18 06:17, 7F
→
08/18 06:17, 2年前 , 8F
module1.XXX = textbox1.text
08/18 06:17, 8F
→
08/18 06:17, 2年前 , 9F
所以總要要三隻程式
08/18 06:17, 9F
→
08/18 06:18, 2年前 , 10F
第一隻 用來開啟userform1
08/18 06:18, 10F
→
08/18 06:18, 2年前 , 11F
userform1.show 0
08/18 06:18, 11F
→
08/18 06:18, 2年前 , 12F
第二隻程式 寫在userform1內的 commandbutton_click裡
08/18 06:18, 12F
→
08/18 06:19, 2年前 , 13F
module1.XXX=textbox1.text
08/18 06:19, 13F
→
08/18 06:19, 2年前 , 14F
unload me
08/18 06:19, 14F
→
08/18 06:20, 2年前 , 15F
call module1.SubName
08/18 06:20, 15F
→
08/18 06:20, 2年前 , 16F
第三隻程式
08/18 06:20, 16F
→
08/18 06:20, 2年前 , 17F
sub Subname()
08/18 06:20, 17F
→
08/18 06:20, 2年前 , 18F
接著看你用XXX 做哪些事情
08/18 06:20, 18F
→
08/18 06:21, 2年前 , 19F
若你不喜歡用public的方式 也可以
08/18 06:21, 19F
→
08/18 06:22, 2年前 , 20F
用直接傳值的方式
08/18 06:22, 20F
→
08/18 06:22, 2年前 , 21F
call module1.SubName(XXX)
08/18 06:22, 21F
→
08/18 06:22, 2年前 , 22F
sub subname(xxx)
08/18 06:22, 22F
→
08/18 06:23, 2年前 , 23F
我個人偏向userform
08/18 06:23, 23F
‣ 更多 b520002732 的文章
文章代碼(AID): #1Y-smEXV (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 b520002732 的文章
文章代碼(AID): #1Y-smEXV (Office)