Macros

[Don]

How do I create a macro that will type the word "Round"
in cells A1 thru A3000 one at a time?

Thanks,

Don

 

[Steve]

If you need it one cell at a time

Sub test()

Range("A1:A3000").Select
For Each c In Selection
c.Value = "Round"
Next c
End Sub

But this faster:

Sub test()
Range("A1:A3000").Select
Selection.Value = "Round"
End Sub

 

[Gord Dibben]

Don

Sub round()
For Each cel In Range("a1:a3000")
cel.Value = "Round"
Next
End Sub

There has to more to this<g>

You can do the same thing manually.

Type A1:A3000 in the Name Box and ENTER

Type Round in A1 and hit CTRL + ENTER


Gord Dibben Excel MVP

 

[Steve]

One of these days I'll get out of the habit of selecting first <bg>

 

[Guest]

It didn't work.

What else can I try?

Don

-----Original Message-----
One of these days I'll get out of the habit of selecting

 

[Steve]

Don

Everything you've seen so far should work in terms of the question you
asked. Did you get the word 'Round' written into every cell in the range? If
not what happened when you ran your macro?
What is the overall goal of your project? How does the prolem you wish to
solve assist you achieve your goal?

Steve

 

[Gord Dibben]

What is "it" and what happened(or didn't) when you ran the macro or took the
manual method?


Gord