View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
ExcelMonkey ExcelMonkey is offline
external usenet poster
 
Posts: 553
Default Counting blanks in range using VBA Offset

But does resize permanently change the range behind the name PastCellStart?
I use this name elsewhere in my code and do not want to change the range
definition behind that name. If it does, I will not be able to use it.



"Tom Ogilvy" wrote:

You can't offset 65535 rows from row 2 since offset is zero based.

? range("A2").Offset(65534,0).Address
$A$65536


What you want is resize

Numblanks =
Application.WorksheetFunction.CountBlank(Range(Pas teStartCell.Resize(65535,1
)))

--
Regards,
Tom Ogilvy


"ExcelMonkey" wrote in message
...
I know how to define a range using Excel's Offset function (OFFSET(Rows,
Columns, Height, Width))

But how do I do it using the VBA Offset function. It only includes
(OFFSET(Rows, Columns)).

I am trying to count the blank cells betwee rows 2 and rows 65236 on a
sheet. Row 2 is named PasteStartCell. I think the use below does not

define
a range between row 2 and row 65536. It simply defines row 65536 as I am
offsetting row 2 by 65535 additional rows. How do I make it refer to the
range itself. Note I do not what to select the range and it cannot

include
row 1

Numblanks =

Application.WorksheetFunction.CountBlank(Range(Pas teStartCell.Offset(65535,0
)))

Thanks