title: Cut/Paste Rows from one sheet to another based on multiple criteria
body: <p>Following this the code that I have already manipulated from another instructional video. I can't seem to get it to work properly hoping that I can get some help. What I am hoping to accomplish is to review a single column in an Excel file and cut the row in which the requirement is met and paste it to the first open row on another sheet.</p>
  
  <pre><code>Sub V_LTC()
  
  Dim i As Long, LastRow As Long, LTCtype As String, erow As Long
  
  LastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).row
  Application.ScreenUpdating = False
  
  For i = LastRow To 2 Step -1
  LTCtype = Cells(i, "BX")
  
  If (LTCtype = "UVT") Then                 ''''''''''''''''''''''''
  ElseIf (LTCtype = "V2") Then              '
  ElseIf (LTCtype = "V2A") Then             'Requirements For Sorting
  ElseIf (LTCtype = "RMV2") Then            '
  ElseIf (LTCtype = "RMVA") Then            ''''''''''''''''''''''''
  
  ActiveCell.EntireRow.Cells(i, "BX").Select
  Selection.Cut
  erow = Sheet7.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).row
  ActiveSheet.Paste Destination:=Worksheets("V-LTC").Rows(erow)
  
  End If
  
  Next i
  
  delete_blank_rows
  
  End Sub
  
  Sub delete_blank_rows()
  
  Dim row As Long
  
  LastRow = ThisWorkbook.Sheets("LTC and Transfer").Cells(Rows.Count, 
  1).End(xlUp).row
  
  row = 2
  For row = row To LastRow
  If Cells(row, 1) = "" Then
  Cells(row, 1).EntireRow.Delete
  End If
  Next row
  
  End Sub
  </code></pre>