Code Unmerge và Fill down (1 người xem)

[FPT_online]

Kính gửi các anh chị!

Em có bài 1 file bị Merge. Em muốn khi mở file chọn toàn bộ bảng tính và Unmerge thì sẽ fill toàn bộ như trong VD. Mọi người giúp em nhé. Em cám ơn

 

[giaiphap]

Bạn nói rõ hơn chứ nói kiểu này mình chẳng hiểu gì cả.

 

[FPT_online]

Em có nói rõ trong VD rồi ạ, mở file lên là chắc sẽ hiểu ngay thôi

 

[phulien1902]

Kính gửi các anh chị!

Em có bài 1 file bị Merge. Em muốn khi mở file chọn toàn bộ bảng tính và Unmerge thì sẽ fill toàn bộ như trong VD. Mọi người giúp em nhé. Em cám ơn

Bạn thử:

Sub abc()
Columns(6).UnMerge
Range([F3], [g65536].End(3)).SpecialCells(4).FormulaR1C1 = "=R[-1]C"
End Sub

 

[FPT_online]

Bạn thử:

Sub abc()
Columns(6).UnMerge
Range([F3], [g65536].End(3)).SpecialCells(4).FormulaR1C1 = "=R[-1]C"
End Sub

Cám ơn anh đã giúp em. Có gì chưa được em hỏi lại ạ