Có một số macro ngắn bạn có thể thêm vào Sổ làm việc Macro Cá nhân của mình và sau đó thêm vào QAT. Trong mẹo này, bạn sẽ thấy cách tạo Sổ làm việc Macro Cá nhân, nhập một số macro rồi gán chúng cho các biểu tượng trên QAT.
Tạo Sổ làm việc Macro Cá nhân
Bắt đầu từ bất kỳ sổ làm việc nào. Đi tới Xem, Macro, Ghi Macro. Trong hộp thoại Record Macro, hãy nhập tên một từ, chẳng hạn như HelloWorld. Chọn Sổ làm việc Macro Cá nhân. Bấm OK.
Nhập Hello vào ô hiện hoạt và nhấn Enter. Sau đó, chọn Xem, Macro, Dừng ghi. Các bước này sẽ tạo Personal.xlsb trên máy tính của bạn, nơi bạn có thể lưu trữ các macro mới.
Mở VBA Editor và Tìm Module1 trong Personal.xlsb
Từ Excel, nhấn Alt + F11. (Nếu bạn không có Alt + F11, bạn có thể thêm lệnh Visual Basic vào QAT và nhấp vào đó.
Lần đầu tiên bạn sử dụng trình chỉnh sửa VBA, nó có thể là một dải màu xám rộng lớn. Từ menu VBA, chọn View, Project Explorer.
Tìm mục nhập có tên VBAProject (PERSONAL.XLSB). Nhấp vào biểu tượng + để mở rộng.
Tìm kiếm và mở rộng Mô-đun. Nhấp chuột phải vào Module1 và chọn Mã Chế độ xem.
Bạn sẽ thấy mã HelloWorld của mình. Sau End Sub, hãy nhập bất kỳ quy trình nào trong số này.
Sub VeryHideActiveSheet() ActiveSheet.Visible = xlVeryHidden End Sub Sub ShowAllSheets() For Each sh In ActiveWorkbook.Worksheets sh.Visible = True Next sh End Sub Sub UpperSelection() For Each cell In Selection.SpecialCells(2, 2) ' 2, 2 means xlCellTypeConstants, Text cell.Value = UCase(cell.Value) Next End Sub Sub LowerSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = LCase(cell.Value) Next End Sub Sub ProperSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = Application.WorksheetFunction.Proper(cell.Value) Next End Sub Khi bạn tùy chỉnh QAT, hãy chọn Macro từ menu thả xuống trên cùng bên trái.
Khi bạn chọn macro và nhấp vào Thêm >> biểu tượng sẽ mặc định thành biểu đồ dòng. Nhấp vào Sửa đổi ở dưới cùng bên phải. Chọn một biểu tượng mới. Nhập một chú giải công cụ tốt.
Dưới đây là giải thích về cách sử dụng năm macro này:
- Rất ẩn : Trang tính có thể hiển thị, ẩn hoặc rất ẩn. Ít người biết về trang tính Rất ẩn vì bạn phải sử dụng VBA để tạo chúng. Một trang tính bị Ẩn rất nhiều sẽ không hiển thị trong Trang chủ, Định dạng, Ẩn và Hiện, Trang tính. (Cảm ơn -Sagar Malik)
- Hiển thị tất cả các trang tính : Dễ dàng chọn 12 trang tính và ẩn chúng trong một lệnh duy nhất. Nhưng sau đó việc bỏ ẩn các trang tính là một đề xuất xảy ra một lần. Macro này sẽ hiện tất cả các trang tính (kể cả các trang tính rất ẩn).
- Vùng chọn phía trên : Chuyển đổi tất cả văn bản trong vùng chọn thành chữ hoa.
- Lựa chọn dưới : Chuyển đổi tất cả văn bản trong vùng chọn thành chữ thường.
- Lựa chọn thích hợp : Chuyển đổi tất cả văn bản trong vùng chọn thành chữ hoa / thường.
Cảm ơn MF Wong đã gợi ý một số macro này.
