У меня проблема, я пытаюсь добавить данные из пользовательской формы в существующую таблицу, которая содержит различные формулы (таблица 1), но я не знаю, как вставить это в код. Вот код:
(А лист, где находится таблица, это Лист1.)
Private Sub CommandButton2_Click()
Dim wks As Worksheet
Dim AddNew As Range
Set wks = Sheet1
Set AddNew = wks.Range("A65356").End(xlUp).Offset(1, 0)
AddNew.Offset(0, 0).Value = TextBox1.Text
AddNew.Offset(0, 1).Value = ComboBox2.Text
AddNew.Offset(0, 3).Value = ComboBox3.Value
AddNew.Offset(0, 4).Value = ComboBox4.Value
AddNew.Offset(0, 2).Value = TextBox8.Text
AddNew.Offset(0, 6).Value = TextBox11.Text
AddNew.Offset(0, 7).Value = TextBox6.Text
AddNew.Offset(0, 8).Value = TextBox7.Text
AddNew.Offset(0, 15).Value = TextBox9.Text
AddNew.Offset(0, 16).Value = TextBox10.Text
AddNew.Offset(0, 14).Value = ComboBox1.Text
TextBox1.Text = ""
ComboBox2.Text = ""
ComboBox3.Text = ""
ComboBox4.Text = ""
TextBox8.Text = ""
TextBox11.Text = ""
TextBox6.Text = ""
TextBox7.Text = ""
TextBox9.Text = ""
TextBox10.Text = ""
ComboBox1.Value = ""
End Sub