I am trying to populate cells with a date that is located next to a cell with the word "Visit."
This is my code:
lRow = Cells(Rows.Count, "A").End(xlUp).Row
Do While True
If Cells(lRow, 6) = "Visit" Then
sLastValue = Cells(lRow, 5)
Cells(lRow, 5) = sLastValue