返回列表 上一主題 發帖

[發問] 如何呼叫USERFORM表單的按鈕執行

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2020-7-8 16:41 | 只看該作者

[發問] 如何呼叫USERFORM表單的按鈕執行

各位大大好
我用VBA 將USERFORM 上的資料都書 入了
但不知道如何透過vba執行按鈕(按鈕本身功能已經寫完)
就是不知道如何透過vba讓他自己執行表單上面的按鈕功能
  1.     Aform.Show 0
  2.     T = Cells(R, 1).Resize(1, 18).Value
  3.     Aform.ComboBox13 = T(1, 1)
  4.     Aform.CommandButton7_Click'這段錯了,無法執行
複製代碼
收藏 分享
PKKO

n7822123
　暱稱: 阿龍

中學生Rank: 2

帖子
406 
主題
8 
精華
0 
積分
453 
點名
0  
作業系統
WINDOWS 7 
軟體版本
2007 
閱讀權限
20 
性別
男 
來自
台灣 
註冊時間
2015-2-7 
最後登錄
2021-7-31 
2#
發表於 2020-7-8 23:45 | 只看該作者
本帖最後由 n7822123 於 2020-7-8 23:51 編輯

回復 1# PKKO


把 按鈕Sub 前面的 "Private" 改成 Public 才能給表單外的模組呼叫

隨便寫個範例如下
   
Public Sub CommandButton7_Click()
  MsgBox "Hi"
End Sub
程式是依需求寫的，需求表達不清楚
或者沒有上傳附件，愛莫能助

TOP

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2020-7-9 10:13 | 只看該作者
回復 2# n7822123


    原來如此,測試沒問題,感恩!
PKKO

TOP

        靜思自在 : 口說好話、心想好意、身行好事。
返回列表 上一主題