Tự động copy công thức xuống khi chép dữ liệu vào (1 người xem)

[Emyeuexcel]

Table vẫn làm được nhưng nó sẽ mang hàm theo cả bảng.
Vì mỗi ngày người ta chép dữ liệu vào rất lớn đến 30 ngàn dòng, để cho File đỡ ì ạch người ta mới cần đến VBA.

Dạ, cảm ơn anh @be09 rất nhiều!

Bài đã được tự động gộp: 11/6/20

Mình làm không dùng code mà vẫn chạy ok, bạn làm thử theo cách này nha:
1. Chọn vùng dữ liệu hiện tại => home => format as table
2. Vào excel option => proofing => autocorrect option => autoformat as you type => tick vào 2 dòng dưới
3. Vào công thức chỗ O2, sửa lại tham chiếu chỗ B2 (nhìn hình) => fill xuống dòng cuối trong table
Vậy là ok, table nó sẽ tự mở rộng khi có giá trị mới chèn phía dưới

View attachment 239103
View attachment 239108
View attachment 239106
View attachment 239107

Chào ban!
Cảm ơn bạn và mình ghi nhận cách này của bạn! Mình được học hỏi thêm nhiều!

Bài đã được tự động gộp: 11/6/20

Dùng thử.

Sub CopyCongThuc()
    Dim i As Long
    i = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
    Range("O2").Copy Range("O3:O" & i)
    Range("O3:O" & i).Value = Range("O3:O" & i).Value
    MsgBox "Da copy " & i - 3 & " dòng"
End Sub

Anh ơi!
Theo code của e thì sau khi tắt thông báo bao nhiêu dòng được copy, thì cột O có khung như hình, và mình bỏ trạng thái đó thì nó là dạng text, phù hợp với công thức bên report. Còn theo cách của anh nó biến thành dạng số.

 

[be_09]

Dạ, cảm ơn anh @be09 rất nhiều!

Bài đã được tự động gộp: 11/6/20

Chào ban!
Cảm ơn bạn và mình ghi nhận cách này của bạn! Mình được học hỏi thêm nhiều!

Bài đã được tự động gộp: 11/6/20

Anh ơi!
Theo code của e thì sau khi tắt thông báo bao nhiêu dòng được copy, thì cột O có khung như hình, và mình bỏ trạng thái đó thì nó là dạng text, phù hợp với công thức bên report. Còn theo cách của anh nó biến thành dạng số.
View attachment 239137
View attachment 239138

Thì format cột Ô đặng Te x t rồi chạy code.

 

[Emyeuexcel]

Thì format cột Ô đặng Te x t rồi chạy code.

Vâng, cảm ơn anh!