Excel VBA Code 3

[LuckyDanger]

Excel Worksheet:
I want to copy the last data input in Column A and paste into another sheet to the next cell in column A where Column B is Blank.

Can anyone help provide a vba code?

Many Thanks

 

[dhulbert]

Tools-Macro-Macro Recorder

Record yourself doing it then have a look at the code it produces work from there and com eback to people when you've had a try.

I love deadlines. I like the whooshing sound they make as they fly by
Douglas Adams
(1952-2001)

 

[LuckyDanger]

Sorry new to this:

After recording I only have:

ActiveCell.Copy
Sheets("2").Select
Range("A3").Select
ActiveSheet.Paste
Sheets("1").Select
Application.CutCopyMode = False

I need to paste into the next blank cell in a row. i.e. Where the next blank cell in Column B is select coresponding rown number in Column A and paste.

Many Thanks
John

 

[Loomah]

Hi
Something like this should do the job

Worksheets("1").[a65536].End(xlUp).Copy _
Worksheets("2").[a65536].End(xlUp).Offset(1)

Have a look at the help files for the methods used here
eg: copy, end, offset

Oh, and there's a VBA forum which is worth visiting and watching to pick up tips & trcks if you're looking to learn VBA. But first port of call should always be the recorder when setting out on the rocky road to VBA knowledge!!


;-)

If a man says something and there are no women there to hear him, is he still wrong?
How do I get the best answers?​

 

[LuckyDanger]

Thanks very much.

It certainly seems a long road to learn but I'll stick with it.

Thanks Again for your help.

 

[DougP]

Thanks Loomah
I needed that too
how 'bout a star !


DougP, MCP, A+