[問題] 不同表單 控制項 交戶影響

[waiter337 (給開司一罐蘇格登)]

(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:

版本:


目前有google了一陣子 有找到類似解答

但還差了一點


表單物件有
userform1  內有checkbox1 跟 userform2.show  (用來放大)的按鈕
                                            userform2的字體有加大

userform2  內有checkbox1 跟   "確定" "取消"  兩個按鈕皆有關閉userform2的功能
           而 "確定" 按鈕則會將勾選好的checkbo1 的true值,
           傳遞給userform1的checkbox1



主要作用是

當我按下userform1設定好的放大按鈕

userform2會彈出

這時後

我勾選userform2表單的控制項checkbox1 之後

按下userform2 的"確定"按鈕

他會關閉視窗 並且讓userform1的checkbox1也打勾



目前我用某論壇的解答,主要是利用物件類別模組,

我是想說可不可以直連過去,不用在經過工作表紀錄變數再回傳


     '物件類別模組
Option Explicit
Public WithEvents 物件_CheckBox As MSForms.CheckBox


Private Sub 物件_CheckBox_Click()
        If CheckBox1.Value = True Then
        CheckBox1.Value = True
        ElseIf CheckBox1.Value = False Then
        CheckBox1.Value = False
        End If
End Sub

-------------------------------------

      'userform1 和 userform2
Dim User_按鈕 As New Class1
Private Sub UserForm_Initialize()
    Set User_按鈕.物件_CheckBox = CheckBox1

End Sub


不過還是失敗了

求大大指點 或者有更簡單的方法

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.35.158.244
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1476919207.A.A40.html
※ 編輯: waiter337 (114.35.158.244), 10/20/2016 07:21:06
→ soyoso: http://imgur.com/eklhs2F 類似這樣
→ waiter337: 搞定 謝謝