Copy and paste to the last Row of columb A

[tran1728]

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

 

[ozgrid.com]

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

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

 

[Asraf]

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

 

[Jacob Skaria]

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)

 

[Asraf]

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

 

[Dave Peterson]

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

 

[tran1728]

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