VBA Code need to copy a formula

[winmaxservices1]

I have data in sheet1
I want to calculate length of the data in sheet2. Please refer attachment. In sheet2 length to be calculate from the row 1 including heading. The formula should go till the end of the data in sheet1
Again I want to calculate length of the data in sheet3. Please refer attachment. In sheet3 length to be calculate from the row 1 excluding heading. The formula should go till the end of the data in sheet1

[excelfandoo]

I have already answered your question in your recent post. please let me know if that doesn't work.