Counting Data with Macro

**Andrew.Trevayne** · 09-16-2011, 04:53 AM

Hi again everyone,
I have an excel sheet that is populate by data when I run a Macro.
Data could sometimes be in hundreds or at times in thousands.
I was hoping to do a Macro that could do a count?
Maybe start from A7 till the last record? Appreciate your assistance. Thank you in advance.

Regards,
Andrew

**Andrew-R** · 09-16-2011, 04:57 AM

Is column A always going to be populate? If so then this would work:

Please Login or Register  to view this content.

**Andrew.Trevayne** · 09-18-2011, 10:34 PM

Hi Andrew-R,
Thank you for the response, this is working great! Just what I wanted.
Could you help me also to Output the results in Column B7? At the moment I get a message box, thank you in advance,

**mudraker** · 09-19-2011, 12:02 AM

Small modification required

Sub CountData()

Dim lDataRows As Long

With ActiveSheet
.range("b7").value =.Cells(.Rows.Count,1).End(xlUp).Row-6
End With

MsgBox lDataRows

End Sub