Excel VBA。 Userform在Developer环境中工作，但在使用宏打开时无效

Question

我在Excel VBA中创建了一个Userform。我在Excel工作表中创建了一个按钮，此按钮启动Userform。启动工作正常，但是当我尝试将数据发送到excelsheet时，我的Userform上有一个按钮，它将无法正常工作。当我在开发人员环境中运行宏时，表单正在工作，包括将数据添加到工作表。

launchbutton的宏是：

Sub Afgeronderechthoek1_Klikken()
VoorraadOpnameAmigo.Show
End Sub

有人可以帮助我吗？

这是应该在工作表中添加数据的按钮代码：

Private Sub KnopOpslaan_Click()

    Dim ws As Worksheet
    Set ws = Worksheets("Data")

    'Regel invoegen op rij 4.
      'There is always something in cell a3
        If Range("a3") <> "" Then
        Rows("4:4").Select
        Selection.Insert shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove


    'Formulier doorzetten naar het excel bestand.
        ws.Cells(4, 1).Value = VoorraadOpnameTA.Datumbox.Value

        End If

End Sub