Help me to first row matching First date and last row matching lastrow

  • Thread starter Thread starter HammerJoe
  • Start date Start date
H

HammerJoe

Hi,

Column D starting at row 3 contains Dates.
This is a dynamic table that grows everyday.

Because there will be thousand of rows I need to do some calculations
on only some of those rows.
In other words I have an initial date and a finish date. (format
2008/01/01)

First I am using "TotalBigListCount =
SheetSource.UsedRange.Rows.Count" to give the the last row containing
data

Next I have:
With SheetSource.Range("D" & StartRow, "D" & TotalBigListCount)
Set c = .Find(DateFromString, LookIn:=xlValues)
RowDateCount = c.Row

End With
This gives me the first row that will match the Initial Date
(DateFromString). Pretty simple.
Now I would like to do the same to find the last row in the table that
matches the DateToString (finish date).

Is there an easy way to get it or the only option is to use a do while
loop to go thru all the rows until it finds that last match?
Thanks
 
Might be easier to filter by date, but I don't know what you intend to do
after you identify the items so filtering might not fit your plan of attack.
 
Hi,

I think I found a problem.
It seems that Set c = .Find(DateFromString, LookIn:=xlValues) only
gives a result if there is a match.
Which is not what I want.
Is there a way for this line to return the closest match as well?

Cheers.
 
Back
Top