Tách sheet thành file trong Exel

‘- Exel là chương trình tuyệt vời dùng cho tính toán các bảng tính phục vụ công việc học tập, kế toán, lập kế hoạch…

– Trong quá trình dùng Exel chúng ta gặp phải những file Exel có rất nhiều Sheet, và chúng ta thường mong muốn :

- Tách hoặc copy các Sheet ra từng file, lấy tên Sheet làm tên của file.
- Giữ nguyên mọi thuộc tính của các Sheet nguồn, kể cả công thức, name, Pass...

– Công việc này được thực hiện khá dễ dàng với VBA của EXEL.
– Để thực thi VBA chúng ta mở Exel và nhấn tổ hợp phím “ALT + F11”, lúc này sẽ hiện ra 1 Box, chúng ta vào Tool -> Macros…

Sub tachsheet()

Application.ScreenUpdating = False

Application.DisplayAlerts = False

Dim sh As Worksheet

For Each sh In Worksheets

    sh.Copy

    ActiveWorkbook.SaveAs ThisWorkbook.Path & " & sh.Name

                    

                Tags: exel, tach sheet, thu thuat exel