Problems with For Each

[DKY]

I have the code below but it gives me an error and tells me to defin
the variable 'cell' in the For Each cell In Selection part. Why is i
doing that?


Code
-------------------
LRow = Cells(Rows.Count, "E").End(xlUp).Row
Range("A2:A" & LRow).Select
' START CHANGE NUMBER TO TEXT
For Each cell In Selection
cell.NumberFormat = "@"
cell.Value = Trim(cell.Value)

' If cell.Value <> "" Then
' TempString = Trim(UCase(cell.Value))
' cell.Value = TempString
' End If
Next cel

 

[Jake Marx]

Hi DKY,

If you're using Option Explicit, you'll have to declare "cell" as an Object
or Range variable. So put the following line of code above your loop and
you should be fine:

Dim cell As Range

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]

 

[DKY]

Oh, I just removed Option Explicit. What's Option Explicit for anyway

 

[Norman Jones]

Hi DKY,

The Option Explicit statement requires that all variables be declared and
that the be declared explicitly.

See Chip Pearson's 'Using Variables (Properly) In VBA' page at:

http://www.cpearson.com/excel/variables.htm

for a detailed discussion of the issue.

Perhaps, prior to reading the above, you might profitably visit Chip's
'Declaring Variables In VBA' page at:

http://www.cpearson.com/excel/DeclaringVariables.htm

 

[Piranha]

DKY

I asked the same question. Here is the answer.

http://www.excelforum.com/showthread.php?t=384692

this Help?