Dear Markkim,

your code is correct, but please use it within procedure like...

Sub selection_area()
Dim rcell As Range
For Each rcell In Selection
rcell.Value = 1
Next
End Sub

-- 
Thanks & regards,
Noorain Ansari
 *http://excelmacroworld.blogspot.com/*<http://excelmacroworld.blogspot.com/>
*http://noorain-ansari.blogspot.com/* <http://noorain-ansari.blogspot.com/>


On Thu, Sep 22, 2011 at 12:05 PM, Markkim <mark....@gmail.com> wrote:

> Hi all
>
> Well, I am not sure what's going on here..
>
>
> I selected few cells then run the following code (for test purpose)
>
> dim rcell as range
>
> for each rcell in selection
>
> rcell.value = 1
>
> Next
>
>
> Then I gets complie error message:
>
> For Each may only iterate over a collection object or an array ..
>
>
> I ran the same code on my colleuge's computer..  and it works..
>
>
> Wow... Never happen to me... Not sure what's going on here..
>
> I googled for 1 hour.. but can not find a solution..
>
>
> Can anyone help me with this??
>
> I thought It might have to do with Object library..    it seems
> fine..
>
>
> Thanks in Advance
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Reply via email to