Two variables for Target.Value
Very helpful! Thank you very much!
--
Thank you for your time!
John
"Stefi" wrote:
Replace the If condition:
If Target.Column = 7 And _
Target.Row 4 And _
(Target.Value < "In Progress" Or Target.Value < "Not Started") Then
--
Regards!
Stefi
€˛Very Basic User€¯ ezt Ć*rta:
Below is my code that works for any items identified as "In Progress" what if
I want to follow the same process for both "In Progress" and "Not Started"?
how would I udate the code to include both.
Thanks!
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Dest As Range
If Target.Count 1 Then Exit Sub
If IsEmpty(Target.Value) Then Exit Sub
If Target.Column = 7 And _
Target.Row 4 And _
Target.Value < "In Progress" Then
With Sheets("Complete")
Set Dest = .Range("A" & Rows.Count).End(xlUp).Offset(1)
End With
Range(Cells(Target.Row, 1), Cells(Target.Row, 10)).Copy Dest
Target.EntireRow.Delete
End If
End Sub
--
Thank you for your time!
John
|