Ramneek Sharma - VB From Technical View
MCTS, MCPD, MCT, IBM SQA,Green Belt Six Sigma.
Wednesday, 4 February 2015
VBA Count Blank in Activesheet Used Range
Sub countBlnk()
Dim count As Integer
count = Application.WorksheetFunction.CountBlank(ActiveSheet.UsedRange)
MsgBox count
End Sub
No comments:
Post a Comment
Newer Post
Older Post
Home
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment