VBA Excel

[Bebe]

I have text that will update my Excel spread sheet I never know how long the row will go because it is dependent on the date span.

How do I get the row to get a shaded quality to basically loop until there is no date or text in the cell?

[Nitro]

You can use either one of these method to grab the last row.

  'OVERALL: Count the number of records

  'Method1
  Dim intLastRow as Integer
  intLastRow = ActiveCell.SpecialCells(xlLastCell).Row
  
  'Method2
  intLastRow = ActiveSheet.UsedRange.Rows.Count

After that just put it into a loop.

Do
  'Your Instructions
Loop Until activecell.row = intLastRow

[Bebe]

thank you!!!