Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Counting cells with data in them
Try this:
Sub count_filled() Dim sectornum As Long Dim rngX As Range Dim lngX As Long Range("D1", Range("D65536").End(xlUp)).Select sectornum = Selection.Count lngX = Application.WorksheetFunction.CountBlank(Selection ) MsgBox CStr(sectornum - lngX) End Sub Regards, Wes |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
COUNTIF, only counting once if both cells contain the data | Excel Worksheet Functions | |||
Counting Cells with same data | Excel Discussion (Misc queries) | |||
Counting cells with multiple data | Excel Worksheet Functions | |||
Counting cells that contain data | Excel Discussion (Misc queries) | |||
Counting cells with data | Excel Discussion (Misc queries) |