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

Thanks,

Don

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


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

Thanks,

Don

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

On Fri, 11 Feb 2005 17:14:06 -0800, "Don"
wrote:

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

Thanks,

Don

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


"Gord Dibben" <gorddibbATshawDOTca wrote in message
...
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

On Fri, 11 Feb 2005 17:14:06 -0800, "Don"
wrote:

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

Thanks,

Don

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
first <bg


"Gord Dibben" <gorddibbATshawDOTca wrote in message
.. .
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

On Fri, 11 Feb 2005 17:14:06 -0800, "Don"
wrote:

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

Thanks,

Don



.

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
wrote in message
...
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
first <bg


"Gord Dibben" <gorddibbATshawDOTca wrote in message
. ..
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

On Fri, 11 Feb 2005 17:14:06 -0800, "Don"
wrote:

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

Thanks,

Don



.

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


Gord

On Fri, 11 Feb 2005 20:55:53 -0800,
wrote:

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
first <bg


"Gord Dibben" <gorddibbATshawDOTca wrote in message
. ..
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

On Fri, 11 Feb 2005 17:14:06 -0800, "Don"
wrote:

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

Thanks,

Don



.