Row Count from xlDown??

Westicle · Aug 28, 2002

Is it possible to return the number of rows the following code would select. The selection is then to be pasted into another sheet and i need the number of rows so that i can paste a formula, say in row B1 for the same amount of rows.

Range("A1&quot

.Select
Selection.Copy
Range(Selection, Selection.End(xlDown))

cheers.

dwilson01 · Aug 28, 2002

I tried the piece of code you supplied and had some problems, however, to get the number of rows in any selection try using something like:

Dim RowCount as Integer
RowCount = Selection.Rows.Count

FYI: Here is what I did to get test code to work

Code:

Dim RowCount As Integer

Range(&quot;A1&quot;).Select
Selection.Copy
Range(Selection, Selection.End(xlDown)).Select
RowCount = Selection.Rows.Count
Debug.Print RowCount
ActiveSheet.Paste

Westicle · Aug 28, 2002

Excellent, Cheers it works like a charm. [thumbsup]

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Row Count from xlDown??

Westicle

Programmer

dwilson01

Technical User

Westicle

Programmer

Similar threads

Part and Inventory Search

Sponsor