Din MyCell as Range


Gord Dibben MS Excel MVP

On Wed, 16 Jul 2008 11:25:01 -0700, Judi<<
wrote:

Now I have this one. I defined z as long, but VBA is telling me that MyCell
needs to be defined too, how do you define a cell?

Thanks again,
Judi <<


Option Explicit

Sub CountCells()

Dim z As Long

z = 0

For Each MyCell In Selection
z = z + 1
Next

MsgBox "There are " & z & " cells in the selection."

End Sub