Viết Module chung trong VBA của Excel.

[khanhvc2003]

Em đã xây dựng một Macro bằng cách record lại các thao tác chèn dữ liệu (Vào Data\Import Extenal Data\Import Data)từ file excel khác với tên Sheet tương ứng. Do làm nhiều lần với nhiều như khác nhau, khi xem lại code thì thấy hầu như các phần là giống nhau, chỉ khác tên file và tên sheet thôi.

Bây giờ em muốn gộp lại thành một Module với các tham biến là tên file Excel và tên Sheet thôi.

Ví dụ:
-có:
Sub Ghi_Dulieu()

-code 1
-code 2
.............
-code n


End Sub

đổi thành:
Sub Ghi_Dulieu(Tên file, Tên Sheet tương ứng)
Code
End Sub
---
Sub ThucHien_SaveAs()

Ghi_Dulieu(tên file, tên sheet)

Và thực hiện Save as với tên YYYYMMDD (hiện tại) & "Tên cần lưu"

End sub
----
Em có đính kèm file em đã Recorded macro.
Mong các cao tăng chỉ giáo.