Nhờ Giải thích Code Mở 1 file Excel Trong VBA

[phamtienquan92]

Sub update()
Application.ScreenUpdating = False
ChDir "D:-/2014\Bao Cao"
Workbooks.Open Filename:="D:-/2014\Bao Cao\XUAT HD 2014.xls"
Windows("SXTT Gia cong 2014.xls").Activate
ActiveSheet.Calculate
For Each w In Workbooks
If w.Name <> Workbooks("SXTT Gia cong 2014.xls").Name Then
w.Close savechanges:=False
End If
Next w
End Sub

Nhờ ANh chị giải thích dùm em theo từng dòng lệnh em cảm ơn nhiều!

View more random threads:

• đặt name range bằng code
• Theo dõi thu học phí sinh viên
• Dùng VBA liên kết Form với các Sheet
• Hàm chuyển số sang chữ trong excel
• Hàm tính tổng cò điều kiện trong excel
• làm sao sử dụng hàm WEEKNUM
• Thư viện dành cho dân lập trình Visual Basic
• Tự tạo calendar "độc" = Excel
• Quay phim và chiếu phim trong Excel!!!
• Lọc dữ liệu vào phiếu thu, phiếu chi