title: Moving records between worksheets when input form value updates
body: <p>I am unable to figure out how to cut and paste records between two worksheets when a value from the input form is changed from "Open Project" to "Closed Project." </p>
  
  <p>This is for a project management database I am creating to to cut down the time spent adding new data. So far this is my only time working with VBA.  </p>
  
  <pre><code>Option explicit    
  Private Sub CommandButton1_Click()
  
   'Searches for record, and cuts/ pastes records into Project Log when Project Status is set to Closed
  
  Dim ab As Worksheet
  Dim aa As Worksheet
    Set ab = ThisWorkbook.Sheets("Open Projects No SLA - Log")
    Set aa = ThisWorkbook.Sheets("Project Log")
    Dim q As Long
    Dim m As Long
  
      If Me.proj_stat_combo.Value = "OPEN PROJECTS (No Current Open SLA)" Then
         q = Application.Match(VBA.CLng(Me.srnew_combo.Value), ab.Range("C:C"), 0)
         m = ab.Range("C" &amp; Application.Rows.Count).End(xlUp).Row        
  
      Worksheets("Open Projects No SLA - Log").Range(1).Cut Worksheets("Project Log").Range(m + 1)
  
    End If
  </code></pre>
  
  <p>Hoping to get the records from "Open Projects No SLA - Log" to be cut out of the worksheet and pasted into the "Project Log" worksheet" when the input form data for Project Status has changed from "OPEN PROJECTS (No Current Open SLA)" to closed.</p>