推 newton41: Userform不知道可不可行? 08/16 20:16
推 waiter337: 改用Userform 或者工作表控制項(開發人員>插入) 08/18 06:14
→ waiter337: 幾個userform 會用到的功能 你慢慢試 08/18 06:15
→ waiter337: userform1.show 0 08/18 06:16
→ waiter337: unload me 08/18 06:16
→ waiter337: public XXX '<-寫在原本的module1的最上面 08/18 06:16
→ waiter337: 將textbox1文字返回module1的程式內 08/18 06:17
→ waiter337: module1.XXX = textbox1.text 08/18 06:17
→ waiter337: 所以總要要三隻程式 08/18 06:17
→ waiter337: 第一隻 用來開啟userform1 08/18 06:18
→ waiter337: userform1.show 0 08/18 06:18
→ waiter337: 第二隻程式 寫在userform1內的 commandbutton_click裡 08/18 06:18
→ waiter337: module1.XXX=textbox1.text 08/18 06:19
→ waiter337: unload me 08/18 06:19
→ waiter337: call module1.SubName 08/18 06:20
→ waiter337: 第三隻程式 08/18 06:20
→ waiter337: sub Subname() 08/18 06:20
→ waiter337: 接著看你用XXX 做哪些事情 08/18 06:20
→ waiter337: 若你不喜歡用public的方式 也可以 08/18 06:21
→ waiter337: 用直接傳值的方式 08/18 06:22
→ waiter337: call module1.SubName(XXX) 08/18 06:22
→ waiter337: sub subname(xxx) 08/18 06:22
→ waiter337: 我個人偏向userform 08/18 06:23