在userform refedit控件中的VBA Excel帮助

Question

我已完全设置了我的用户表单，以便当用户输入日期时，它会在用户表单的标签框中显示为自己。

我所挣扎的就是使用我的输出框架，如图所示，其中包含一个refEdit控件和一个按钮。我正在尝试将日期放在任何工作表单元格上。

我的用户形象的图片：

到目前为止，我提出的代码如下：

 Private Sub avgBtn_Click()
    Dim range1 As String
    Dim newdate As String

    range1 = TextBox3.Value + "," + TextBox1.Value + " " + TextBox2.Value + "," + TextBox4.Value


    newdate = range1

   Label7.Caption = newdate

 End Sub

 Private Sub cancelBtn_Click()
     Unload Task2
 End Sub


 Private Sub CommandButton1_Click()
    TextBox1.Value = ""
    TextBox2.Value = ""
    TextBox3.Value = ""
    TextBox4.Value = ""

   End Sub


 Private Sub UserForm_Click()
     Unload UserForm1
 End Sub

对于refedit控制和命令按钮，我已经提出了这个代码，但它给了我错误：

Sub CommandButton2_Click()
    Dim myCell As Range

  Set myCell = Nothing
  On Error Resume Next
  Set myCell = Range(Me.RefEdit1.Value).Areas(1).Cells(1)
  myCell.value = Label7.Caption

End Sub

非常感谢有关此代码的任何反馈。