title: Copy and paste content from a textbox to a worksheet cell range?
body: <p>I'm working on a VBA project to automate the Excel tool for a service desk queries tracker. I want, once the command button is clicked, to copy the content from a textbox to another worksheet row. If I repeat the task, the textbox content should be saved in the next empty cell of the same row.</p>
  
  <p>I used this macro:</p>
  
  <pre><code>Private Sub CommandButton1_Click()
      TextBox1.Text = ""
      TextBox1.Copy
      'TextBox2.Copy
      'TextBox3.Copy
      Range("A2").Select
      Do
          If IsEmpty(ActiveCell) = False Then
              ActiveCell.Offset(1, 0).Select
          End If
      Loop Until IsEmpty(ActiveCell) = True
  End Sub
  </code></pre>