Tự động ẩn sổ làm việc cá nhân (Microsoft Excel)
Ken đang gặp sự cố với sổ làm việc Personal.xls của mình. Khi cần làm việc, anh ấy sẽ ẩn nó đi. Nếu anh ta quên ẩn nó khi hoàn thành, thì lần sau khi anh ta khởi động Excel, sổ làm việc Personal.xls sẽ hiển thị ngay lập tức. Vì nó trông giống như một trang tính mới, trống, anh ấy thường bắt đầu nhập vào đó và điều này làm rối tung sổ làm việc Personal.xls của cô ấy.
Anh ấy tự hỏi liệu có cách nào để tự động buộc ẩn Personal.xls nếu anh ấy quên ẩn nó theo cách thủ công hay không.
Có một số điều bạn cần lưu ý. Đầu tiên, nếu bạn chỉ thực hiện thay đổi đối với macro trong Personal.xls, bạn không cần phải hiện sổ làm việc để làm việc trên các macro đó. Thay vào đó, hãy hiển thị trình soạn thảo VBA và sử dụng trình duyệt đối tượng để đảm bảo rằng bạn đang làm việc trên các macro trong sổ làm việc Personal.xls. Khi bạn hoàn tất việc chỉnh sửa macro, bạn có thể lưu chúng mà không cần hiển thị sổ làm việc.
Nếu điều này vẫn không hiệu quả với bạn — có lẽ bạn có một số lý do khác để hiển thị Personal.xls — thì bạn có thể thực hiện một số loại thay đổi chỉnh sửa đối với trang tính đầu tiên trong sổ làm việc. Ví dụ: đặt văn bản “ĐÂY LÀ CÁ NHÂN” vào ô A1 của sổ làm việc. Làm điều gì đó để làm cho nó nổi bật (đậm, màu sắc, nhấp nháy, v.v.), và bạn sẽ không bao giờ bỏ lỡ rằng bạn đang làm việc trong sổ làm việc Personal.xls khi bạn khởi động Excel lần đầu.
Nếu bạn muốn một cách tiếp cận macro để đảm bảo rằng sổ làm việc bị ẩn, thì bạn có thể thêm mã sau vào đối tượng ThisWorkbook cho Personal.xls:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Windows("PERSONAL.XLS").Visible = False ThisWorkbook.Save End Sub
Macro được thực thi ngay trước khi sổ làm việc bị đóng (khi xảy ra khi Excel được thoát). Nó ẩn sổ làm việc và sau đó lưu nó. Bằng cách đó, lần tiếp theo bạn khởi động Excel, Personal.xls sẽ tự động bị ẩn.
_Lưu ý: _
Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.
ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.
Mẹo này (3371) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: