Go To Column A
 

This seems like something that should be simple enough...

I'm trying to write a macro that first inserts a row and then goes to
column A of that row before executing the rest of its code. I've
tried:

Selection.EntireRow.Insert
ActiveCell.Columns("A:A").Select

which successfully inserts the row but fails to go to the column A.
What is the proper way to do this?

Go To Column A
 

Selection.Entirerow.Insert
Range("A" & Activecell.Row).Select

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

wrote in message
oups.com...
This seems like something that should be simple enough...

I'm trying to write a macro that first inserts a row and then goes to
column A of that row before executing the rest of its code. I've
tried:

Selection.EntireRow.Insert
ActiveCell.Columns("A:A").Select

which successfully inserts the row but fails to go to the column A.
What is the proper way to do this?

Go To Column A
 

ActiveSheet.Cells(ActiveCell.Row, 1).Select

Go To Column A
 

Try

Selection.EntireRow.Insert
Range("A1").Select

Go To Column A
 

Got it to work.

Selection.EntireRow.Insert
Selection.EntireRow.Select
Selection.Columns("A:A").Select

Thanks

Go To Column A
 

That is not what you originally asked. You stated that you wanted to go to
"column A of that row" which would indicate that you wanted to select a
single cell in column A..
wrote in message
oups.com...
Got it to work.

Selection.EntireRow.Insert
Selection.EntireRow.Select
Selection.Columns("A:A").Select

Thanks


This seems like something that should be simple enough...

I'm trying to write a macro that first inserts a row and then goes to
column A of that row before executing the rest of its code. I've
tried:

Selection.EntireRow.Insert
ActiveCell.Columns("A:A").Select

which successfully inserts the row but fails to go to the column A.
What is the proper way to do this?

Go To Column A
 

Actually, this would be better but why SELECT??? It is far better to write
your code so that there are NO selections. Almost NEVER necessary.

ActiveCell.Rows.Insert
Cells(ActiveCell.Row, "a").Select

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
Got it to work.

Selection.EntireRow.Insert
Selection.EntireRow.Select
Selection.Columns("A:A").Select

Thanks