Xin mã copy công thức ô phía trên trong VBA (Ctrl + D trong VBA) (1 người xem)

[ThangAcc]

Các bác cho em xin mã code để copy công thức ô phía trên xuống ô phía dưới trong VBA (Trong Excel ta ấn Ctrl + D là ok), nhưng trong VBA em không biết làm thế nào?

 

[Hoàng Trọng Nghĩa]

Các bác cho em xin mã code để copy công thức ô phía trên xuống ô phía dưới trong VBA (Trong Excel ta ấn Ctrl + D là ok), nhưng trong VBA em không biết làm thế nào?

Đã nó có như vậy rồi thì cứ Ctrl+D đi cho nó khỏe! Còn không thì như vầy:

Sub Macro1()
Selection.FillDown
End Sub

 

[ThangAcc]

Tại em đang làm cái số quỹ (tự động update từ phiếu thu, phiếu chi), đến đoạn số dư thì không biết làm sao copy cái công thức phía trên xuống.
Đã test thử ok, cảm ơn bác nhiều.

Nhưng mà có cách nào để fill chỉ công thức không ạ? FillDown nó fill toàn bộ

 

[nghiaphuc]

Nhưng mà có cách nào để fill chỉ công thức không ạ? FillDown nó fill toàn bộ

Vậy thì bạn thay câu lệnh

Selection.FillDown

bởi 2 câu lệnh:

Selection.Offset(-1).Copy
Selection.PasteSpecial xlPasteFormulas

 

[sealand]

Lệnh chỉ Fill công thức viết có dang như sau:

Rg.SpecialCells(xlCellTypeFormulas).Resize(2).FillDown

 

[iloveit]

Đã nó có như vậy rồi thì cứ Ctrl+D đi cho nó khỏe! Còn không thì như vầy:

Sub Macro1()
Selection.FillDown
End Sub

Nếu bây giờ em muốn double click vào ô bên dưới thì nó fill down thì sửa lại như thế nào ạ?