What is your "issue"?Your subject says "overflow error issue".Where/when does
this occur?
How many rows are in your data?(Integer data types only allow for a maximum
value of 32,768.If your maximum row is larger, then use: dim i as long dim lrow
as long)Paul--
Hi guys,
I've issue running the code below. Is there anyone can help? Thanks in
advance.
Sub dnew()
Dim i As Integer
Dim lrow As Integer
lrow = Sheets("to").Range("C" & Rows.Count).End(xlUp).Row
For i = 2 To lrow
If Sheets("to").Cells(i, 2).Value = "up" Th