Copy and paste to the last Row of columb A
 

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

Copy and paste to the last Row of columb A
 

Double click the Fill Handle of B1 when you have it selected.

http://www.ozgrid.com/Excel/excel-fill-handle.htm



--
Regards
Dave Hawley
www.ozgrid.com
"tran1728" wrote in message
...
Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

Copy and paste to the last Row of columb A
 

Hello tran1728

you can try this.

Sub MacroCopy_paste()

Range("B1").Select
Application.CutCopyMode = False
Selection.Copy
Range("A1").Select
Selection.End(xlDown).Select

Cells(ActiveCell.Row, ActiveCell.Column + 1).Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste


End Sub

-Asraf


"tran1728" wrote:

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

Copy and paste to the last Row of columb A
 

Hi Asraf

I dont think the OP is looking for a macro. However; to your response..you
dont need to select the cell. You can try out the below two solutions ()...

Range("B1:B" & Cells(Rows.Count, "A").End(xlUp).Row).Formula = _
Range("B1").Formula

OR use the Autofill method as below

Range("B1").AutoFill Destination:=Range("B1:B" & _
Cells(Rows.Count, "A").End(xlUp).Row)



--
Jacob (MVP - Excel)


"Asraf" wrote:

Hello tran1728

you can try this.

Sub MacroCopy_paste()

Range("B1").Select
Application.CutCopyMode = False
Selection.Copy
Range("A1").Select
Selection.End(xlDown).Select

Cells(ActiveCell.Row, ActiveCell.Column + 1).Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste


End Sub

-Asraf


"tran1728" wrote:

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

Copy and paste to the last Row of columb A
 

AutoFill Destination... yeahh.. new lesson for my macro.. thanks jacob.

"Jacob Skaria" wrote:

Hi Asraf

I dont think the OP is looking for a macro. However; to your response..you
dont need to select the cell. You can try out the below two solutions ()...

Range("B1:B" & Cells(Rows.Count, "A").End(xlUp).Row).Formula = _
Range("B1").Formula

OR use the Autofill method as below

Range("B1").AutoFill Destination:=Range("B1:B" & _
Cells(Rows.Count, "A").End(xlUp).Row)



--
Jacob (MVP - Excel)


"Asraf" wrote:

Hello tran1728

you can try this.

Sub MacroCopy_paste()

Range("B1").Select
Application.CutCopyMode = False
Selection.Copy
Range("A1").Select
Selection.End(xlDown).Select

Cells(ActiveCell.Row, ActiveCell.Column + 1).Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste


End Sub

-Asraf


"tran1728" wrote:

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

Copy and paste to the last Row of columb A
 

Debra Dalgleish shares some techniques he
http://contextures.com/xlDataEntry01.html

tran1728 wrote:

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

--

Dave Peterson

Copy and paste to the last Row of columb A
 

You are right Jacob, thank you so much to ALL.
Thanks again.


"Dave Peterson" wrote:

Debra Dalgleish shares some techniques he
http://contextures.com/xlDataEntry01.html

tran1728 wrote:

Good morning, pls help me,

A B
9800 =A1*2
9800
9800
9800
9800

I want copy formula B1 and Paste B2 to ....., stop a t the last row of A.

Thanks

--

Dave Peterson
.