將代碼分配給動(dòng)態(tài)創(chuàng)建的按鈕我正在嘗試獲取一個(gè)我在excel userform表單上動(dòng)態(tài)創(chuàng)建的按鈕來運(yùn)行一個(gè)宏transfer，我在Module 1項(xiàng)目的“模塊”部分寫了這個(gè)宏。下面我已經(jīng)粘貼了我迄今為止在userform中編寫的代碼，它實(shí)際上設(shè)法Transfer to Sheet在框架中創(chuàng)建按鈕（我也是動(dòng)態(tài)創(chuàng)建的）但是出于某種原因，當(dāng)我運(yùn)行VBA時(shí)，我得到一條438 error消息說Object doesn't support this property or method。誰能告訴我怎么解決這個(gè)問題？這是代碼：Dim framecontrol1 As ControlSet workitemframe = Controls.Add("Forms.Frame.1")With workitemframe    .Width = 400     .Height = 400     .Top = 160     .Left = 2     .ZOrder (1)     .Visible = TrueEnd Withworkitemframe.Caption = "Test"Set framecontrol1 = workitemframe.Controls.Add("Forms.commandbutton.1")With framecontrol1    .Width = 100     .Top = 70     .Left = 10     .ZOrder (1)     .Visible = True     .Caption = "Transfer to Sheet"End Withframecontrol1.OnAction = "transfer"