L
ll
Hi,
I'm working on an If Then statement that compares date values. I've
currently got the following, but it isn't working. Thanks for any
help you might provide. - Louis
-------------------------------------
fillamt = UserForm1.TextBox6.Value
For j = 2 To fillamt
Cells(j, 1).Value = Cells(j - 1, 1).Value + 1
Cells(j, 1).NumberFormat = "m/d/yyyy"
Cells(j, 2).Value = Cells(j - 1, 2).Value + 1
Cells(j, 2).NumberFormat = "ddd"
If Cells(j, 2) = "Sat" Then
Cells(j, 4).Select
ActiveCell = "0"
End If
Next j
I'm working on an If Then statement that compares date values. I've
currently got the following, but it isn't working. Thanks for any
help you might provide. - Louis
-------------------------------------
fillamt = UserForm1.TextBox6.Value
For j = 2 To fillamt
Cells(j, 1).Value = Cells(j - 1, 1).Value + 1
Cells(j, 1).NumberFormat = "m/d/yyyy"
Cells(j, 2).Value = Cells(j - 1, 2).Value + 1
Cells(j, 2).NumberFormat = "ddd"
If Cells(j, 2) = "Sat" Then
Cells(j, 4).Select
ActiveCell = "0"
End If
Next j