Pam muốn sắp xếp các tab trang tính của mình theo thứ tự bảng chữ cái. Đây không phải là một lệnh trong Excel, nhưng bằng cách sử dụng macro ngắn, bạn có thể thêm nó vào Thanh công cụ Truy nhập Nhanh của mình.
Xem video
- Pam muốn sắp xếp các tab trang tính theo thứ tự bảng chữ cái
- Sắp sử dụng macro trong sổ làm việc macro cá nhân
- Alt + T + M + S và thay đổi bảo mật macro để cho phép macro
- Ghi macro Hello World vào sổ làm việc macro cá nhân
- Nhập mã mới vào Sổ làm việc Macro Cá nhân
- Gán mã đó cho một nút QAT
Bản ghi video
Học Excel từ Podcast, Tập 2084: Sắp xếp các tab trang tính theo thứ tự bảng chữ cái
Chào mừng bạn trở lại netcast, tôi là Bill Jelen. Câu hỏi hôm nay từ Pam: Có cách nào để sắp xếp theo thứ tự bảng chữ cái các tab trang tính không? Chà, không có cách tích hợp nào để làm điều đó nhưng chúng tôi có thể làm điều đó với macro. Và bây giờ, đây là một Macro thực sự nên có trong sổ làm việc macro cá nhân, được chứ? Vì vậy, nếu bạn chưa từng thực hiện macro trước đây, chúng ta sẽ thực hiện Alt + T cho Tom và cho Mary, S cho Sam. Và hãy chắc chắn rằng, bạn chuyển từ Vô hiệu hóa tất cả macro không có thông báo sang Vô hiệu hóa macro có thông báo.
Được rồi, nhấn Alt + F8 và xem bạn có macro nào không, hãy nhớ chọn Macro trong: Tất cả Sổ làm việc Mở. Nếu bạn không có bất kỳ thứ gì bắt đầu dưới dạng PERSONAL.XLSB, bạn cần thực hiện các bước tùy chọn này. Nếu bạn đã có thứ gì đó với PERSONAL.XLSB thì chỉ cần chờ một giây, được chứ?
Vì vậy, chúng ta sẽ đi đến tab Chế độ xem và chúng ta sẽ Ghi một Macro mới. Nó sẽ được gọi là HelloWorld. Không gian, không gian. Và chúng tôi sẽ lưu macro trong Sổ làm việc Macro Cá nhân, bấm OK. Và chỉ cần nhập một nơi nào đó Hello World, tương tự như vậy, sau đó đi xuống đây bên cạnh Sẵn sàng và nhấp vào Dừng. Được rồi, bây giờ sẽ buộc bạn phải có Sổ làm việc Macro Cá nhân. Được rồi, nếu bạn chưa bao giờ sử dụng macro trước đây, bạn có thể không có.
Tại thời điểm này, chúng tôi sẽ nhấn Alt + F11 và nếu bạn chưa bao giờ sử dụng macro, bạn sẽ nhận được màn hình màu xám này ở đây. Chúng ta sẽ chuyển đến View, Project Explorer và chúng ta sẽ tìm PERSONAL.XLSB mới. Nếu bạn đã có Mô-đun ở đó, tất nhiên là bạn sẽ mở các mô-đun và nhấp đúp vào Mô-đun 1. Bây giờ, tôi đã có một vài macro trong Sổ làm việc Macro Cá nhân của mình nhưng tôi sẽ xuống ngay đây để hàng cuối cùng, hãy đặt một vài khoảng trắng.
Được rồi, vì vậy bạn sẽ nhập mã này mà tôi đã dán vào. Và chúng ta sẽ nói về macro này khi tôi chạy nó. Vì vậy, tôi sẽ chạy nó từng dòng một bằng cách nhấn phím F8. Và một điều tôi học được ở đây là sau khi sắp xếp xong, có một chút bối rối khi kết thúc trên một trang tính khác, vì vậy tôi nhớ chúng ta đang ở trang tính nào, vì vậy sau này, tôi có thể chọn nó ngay trước khi macro làm xong.
Được rồi, chúng tôi ở đây. Hãy quay lại Excel và bạn sẽ thấy trang đầu tiên ở đó có tên là Tiêu đề. Chúng tôi hiện đang sử dụng trang tính có tên Câu hỏi. Tôi muốn thêm một trang tính mới trước Tiêu đề, vì vậy chúng tôi thực hiện Worksheets.Add và sau đó tôi muốn đổi tên trang tính đó. Hiện có trong Sheet1 dưới dạng TempSortSheet. Hãy cẩn thận, đây phải là một cái tên mà bạn sẽ không bao giờ sử dụng. Giống như đừng gọi đây là Báo cáo thu nhập, được chứ? Chỉ cần sử dụng một cái gì đó rất ngẫu nhiên để khi chúng tôi - bạn sẽ gặp lỗi nếu bạn đã có một trang tính có tên là TempSortSheet. Và sau đó những gì tôi nhận thấy là tôi đã sử dụng Worksheet.Count này lặp đi lặp lại, vì vậy tôi sẽ đặt nó vào một biến để nói WSC dễ dàng hơn Worksheets.Count sau này. Vì vậy, chúng tôi có 150 trang tính và chúng tôi có danh sách các trang tính đó.
Được rồi, vậy là bạn đang lần đầu tiên vượt qua vòng lặp mà tôi đi từ 1 đến 250. Lần đầu tiên qua vòng lặp tới trang tính hoàn toàn mới mà chúng tôi đã thêm, TempSortSheet, trên Hàng 1 Cột 1, chúng tôi sẽ để đặt Giá trị = vào Trang tính đầu tiên. Được rồi, và điều đó sẽ ổn thôi, vâng, TempSortSheet ở ngay đó. Nhưng tôi sẽ để điều này chạy một vài lần nữa. Tôi sẽ nhấn F8 và bạn sẽ thấy rằng chúng tôi đang nhận tất cả các tab trang tính theo thứ tự mà chúng xuất hiện trong sổ làm việc và giả sử tôi bắt đầu nhận được những tab có số tài khoản, được rồi. Và tôi sẽ để nó chạy, tôi không muốn phải nhấn F8 300 lần. Vì vậy, tôi sẽ nhấp vào đây và vào Debug, Run To Cursor là Ctrl + F8 sẽ hoàn thành việc đó. Và hãy xem chúng tôi có danh sách tất cả 150 tab trang tính.Thật tuyệt vời.
Và bây giờ đây là nơi chúng ta tận dụng sức mạnh của Excel. Có rất nhiều bài đăng trực tuyến bao gồm cả ở bảng tin, nơi họ thực sự thử và sắp xếp. Họ viết cách sắp xếp của riêng họ để di chuyển các trang tính xung quanh và chúng ta sẽ tận dụng lợi thế của Excel ở đây vì Excel có cách sắp xếp và tôi đang sử dụng mã từ Excel 2003. Tôi thích mã này, dễ nhớ hơn. Tôi sẽ bắt đầu trong A1, Thay đổi kích thước nó thành 150 ô, nơi tôi sắp xếp. Chìa khóa sẽ là A1. Chà, đó là điều duy nhất có thể. Thứ tự sẽ Tăng dần và hãy đảm bảo chỉ định rằng có một Tiêu đề, được chứ? Chúng tôi không muốn TempSortSheet của chúng tôi sắp xếp thành dữ liệu. Được rồi, ở ngay đây. RẦM! Điều đó thực hiện việc sắp xếp và chúng ta không cần phải viết mã sắp xếp bong bóng. Và sau đó chúng ta sẽ đi từ Hàng 2 là A120,tấm để di chuyển là A120. Tại sao " " ? Ahh, trong trường hợp bạn có tên trang tính, giống như chúng tôi đã có hồi đầu tuần này, chẳng hạn như trang tính có tên 123 sẽ gây nhầm lẫn cho Excel. Và sau đó, chúng ta sẽ chuyển nó đến đâu? Chúng ta sẽ chuyển sang không phải Hàng 2 mà sau trang đầu tiên. Vì vậy, MoveAfter trở thành 1. Vì vậy, chúng tôi sẽ lấy trang tính của chúng tôi có tên A120 và di chuyển nó sau trang tính đầu tiên như vậy, F8, và ở đó nó đã hoạt động. Chạy ba dòng đó một lần nữa. A124 đến đúng chỗ.sẽ lấy trang tính của chúng tôi có tên A120 và di chuyển nó sau trang tính đầu tiên như vậy, F8, và ở đó nó hoạt động. Chạy ba dòng đó một lần nữa. A124 đến đúng chỗ.sẽ lấy trang tính của chúng tôi có tên A120 và di chuyển nó sau trang tính đầu tiên như vậy, F8, và ở đó nó hoạt động. Chạy ba dòng đó một lần nữa. A124 đến đúng chỗ.
Tại thời điểm này, bây giờ chúng ta biết nó đang hoạt động, chúng ta có thể thực hiện Ctrl + F8 để thực hiện tất cả các bước di chuyển - 150 bước di chuyển vừa xảy ra ở đó. Và bây giờ, tôi sẽ xóa trang tính ban đầu là TempSortSheet đã xóa của chúng tôi. Nhưng trước khi xóa nó, tôi không muốn họ nói với bất kỳ ai đang chạy mã rằng chúng tôi sắp xóa trang tính. Vì vậy, tôi chỉ cần xóa nó và sau đó chọn trang tính gốc và hiển thị thông báo rằng các sổ làm việc đã được sắp xếp như vậy.
Được rồi, bây giờ chúng ta đã có macro, chúng ta biết macro đang hoạt động và nó nằm trong sổ làm việc macro cá nhân, một vài điều chúng tôi muốn làm: Alt + F11 quay lại đây và đảm bảo rằng bạn đang ở trong macro cá nhân sổ làm việc, bấm vào đó và bấm Lưu. Nếu bạn không lưu nó ngay bây giờ, sau này khi bạn đóng Excel, nó sẽ hiển thị thông báo này về 'Bạn có muốn lưu các thay đổi vào PERSONAL.XLSB không?' và bạn sẽ hoàn toàn quên và không lưu các thay đổi, phải không? Vì vậy, tôi luôn đảm bảo lưu các thay đổi và sau đó Alt + Tab nơi tôi Tùy chỉnh Thanh công cụ Truy cập Nhanh, chọn từ Macro, tìm một cái có tên là SortSheets, thêm cái đó vào Thanh công cụ Truy cập Nhanh. Tôi không thích sơ đồ, vì vậy chúng tôi sẽ tìm kiếm thứ gì đó nói từ A đến Z hoặc bạn biết đấy, vì vậy hãy để 's sử dụng cái này và đặt một tab nhỏ ở đó Sort Sheets như thế, bấm OK, bấm OK.
Được rồi, đây là bài kiểm tra. Tôi sẽ chèn một sổ làm việc mới. Tôi sẽ tạo một số bản sao của các tờ giấy và chúng tôi sẽ sắp xếp chúng theo một chuỗi kỳ lạ, Z rồi đến Y rồi đến M rồi đến B, như thế. Nhấp vào Sắp xếp Trang tính và BAM! Họ quay lại đây theo đúng trình tự. Thật tuyệt làm sao.
Được rồi, vậy là tập hôm nay, Pam muốn sắp xếp các tab của trang tính theo thứ tự bảng chữ cái. Chà! Chúng tôi đã sử dụng macro. Trước tiên, thay đổi bảo mật macro và ghi macro Hello World vào sổ làm việc macro cá nhân, sau đó nhập mã vào Sổ làm việc Macro Cá nhân và gán mã đó cho nút Thanh công cụ truy cập nhanh.
Tôi muốn cảm ơn Pam vì câu hỏi đó. Tôi muốn cảm ơn bạn đã ghé qua. Chúng tôi sẽ gặp bạn lần sau cho một netcast khác từ.
Tải tập tin
Tải file mẫu tại đây: Podcast2084.xlsm
