使用vba将数据从UserForm传输到工作表单元格

Question

请参阅下面我目前使用的代码。我没有收到错误，但用户表单数据没有传输到工作表单元格。非常感谢任何帮助，谢谢！

Private Sub OKButton_Click()

Dim emptyRow As Long
Sheet7.Activate

emptyRow = WorksheetFunction.CountA(Range("A:A")) + 16

Cells(emptyRow, 1).Value = FileNameTextBox.Text
Cells(emptyRow, 2).Value = PricingSheetListBox.Text