diepminhhong
Thành viên mới

- Tham gia
- 4/8/09
- Bài viết
- 46
- Được thích
- 8
Bạn thử với:Các bác có thể giúp em copy (Trong file đính kèm e gửi) giúp em với được không ạ. E cảm ơn nhiều ạ.
Sub abc()
Sheet1.Range("A3:D18").SpecialCells(xlCellTypeBlanks).Value = 2
End Sub