Logo 
Search:

MS Office Answers

Ask Question   UnAnswered
Home » Forum » MS Office       RSS Feeds
  Question Asked By: Mona Mehta   on Mar 02 In MS Office Category.

  
Question Answered By: Jonathan Brown   on Mar 02

There may be more efficient methods for a solution....
see if this fits the bill:

SourceSheet = Sheets("All").Index
ColumnQ = Sheets(SourceSheet).Range("Q1").Columns.Column
NonBlankCount = WorksheetFunction.CountA(Sheets(SourceSheet).Range("A:A"))
CountBlankRange = Range(Cells(2, ColumnQ), Cells(NonBlankCount,
ColumnQ)).Address
BlankCount =
WorksheetFunction.CountBlank(Sheets(SourceSheet).Range(CountBlankRange))

Share: 

 

This Question has 2 more answer(s). View Complete Question Thread

 
Didn't find what you were looking for? Find more on Named formula/Windows dialog boxes Or get search suggestion and latest updates.


Tagged: