Не совсем вас понял.
При нажатии на CommandButton в обработчике переносите данные из формы на лист. Что-то вроде:
Private Sub CommandButton_Click()
Cells(1,1).value=TextBox1.text
End
End Sub
Если форма вызывается с другого листа, например с "Лист2", то делайте Sheets("Лист1").Activate для выбора листа.