Hoàng Nhật Phương
Thành viên gắn bó



- Tham gia
- 5/11/15
- Bài viết
- 1,895
- Được thích
- 1,219
+ Cách làm thủ công:Xin chào tất cả các bạn,
Tôi đang vướng mắc một vấn đề như đã tiêu đề đã nêu ạ và cụ thể đã nêu chi tiết trong file đính kèm,
Mong được các bạn xem file và giúp đỡ ạ.
Oanh Thơ xin cảm ơn rất nhiều
Sub abc()
Range("D4:D" & Cells(Rows.Count, 7).End(xlUp).Row).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
End Sub
Trên diễn đàn có bài hướng dẫn trường hợp này rồi nhưng mình không tìm được cho bạn.