Macro Tạo Trang tính từ Ô - Mẹo Excel

Mục lục

Bạn có một cột văn bản. Đối với mỗi văn bản trong cột, bạn muốn chèn một trang tính mới và đặt tên trang tính đó cho giá trị trong ô.

Xem video

  • Pam muốn tạo một trang tính cho từng số tài khoản
  • Hiện tại, cô ấy đang sử dụng Hiển thị các trang Bộ lọc Báo cáo
  • Tìm kiếm một cách nhanh hơn
  • Lưu sổ làm việc dưới dạng XLSM
  • Kiểm tra Bảo mật Macro bằng alt = "" + TMS và đặt ở cấp thứ hai
  • Alt + F11
  • Chèn mô-đun
  • Nhập mã như hình
  • Alt + Q để quay lại Excel
  • Alt + F8
  • Chọn macro và nhấp vào Tùy chọn
  • Gán cho Ctrl + Shift + W

Bản ghi video

Học Excel từ Podcast, Tập 2082: Tạo Macro Trang tính

Chào mừng bạn trở lại netcast, tôi là Bill Jelen. Chà, tuần trước tôi đã ở Bloomington và Indianapolis, Indiana thực hiện hai cuộc hội thảo ở đó và Pam từ hội thảo Indy nói rằng cô ấy có bảng tính này, và đối với mỗi ô trong Cột A, cô ấy muốn tạo một bảng tính mới và sau đó tôi thực hiện phần này , hãy đặt ô tương ứng từ Cột B vào Ô B1.

Ý tôi là hiện tại, Pam lưu ý rằng cô ấy đang làm điều này một cách rất thông minh, làm thế nào để tạo ra tất cả các bảng tính đó nhưng nó vẫn còn là một rắc rối. Cô ấy đi tới Chèn, Pivot Table, OK và sau đó từ Pivot Table mới đó, cô ấy đặt Tài khoản vào vùng Bộ lọc rồi đến Dữ liệu trong vùng giá trị như vậy. Và sau đó, cô ấy đi tới Tùy chọn, Hiển thị các trang Bộ lọc Báo cáo, Hiển thị tất cả các trang của tài khoản và BAM! Cô ấy nhận được các mục đích như cô ấy muốn. Bây giờ dữ liệu đang ở sai vị trí, cô ấy thực sự nói rằng tại thời điểm này cô ấy chỉ cần nhóm mọi thứ và sau đó xóa những bảng tổng hợp như vậy, được không? Vì vậy, đó là phương pháp cô ấy đang sử dụng ngay bây giờ và tôi muốn xem liệu tôi có thể làm điều gì đó nhanh hơn với trang tính đó không.

Vì vậy, cách chúng ta sẽ làm điều này là bạn sẽ phải chọn trước các trang tính, chọn trước các trang tính. Ngoài ra, nếu bạn chưa từng thực hiện macro trước đây, hãy nhấn Alt + T cho Tom, M cho Mary, S cho Sam và thay đổi từ lựa chọn đầu tiên sang lựa chọn thứ hai. Ngoài ra, thực sự rất quan trọng, tôi đảm bảo rằng tệp của bạn được lưu dưới dạng .xlsx. Nó sẽ không hoạt động nếu bạn để nó theo cách đó, bạn phải thực hiện Tệp, Lưu Dưới dạng và chọn Sổ làm việc Hỗ trợ Macro Excel này. Cái trên cùng là mặc định và cái trên cùng là định dạng tệp khủng khiếp không được phép sử dụng macro.

Được rồi, chúng ta sẽ chọn dữ liệu đó Alt + F11, mở VBA Editor. Nếu bạn chưa từng làm VBA trước đây, bạn sẽ nhận được màn hình xấu xí này ở đây. Sẽ nói Chèn, Mô-đun và có mô-đun mới của chúng tôi và bạn sẽ nhập mã này: từ Sub CreateSheets (). Ngay sau khi bạn nhập, họ sẽ đặt một Ô cuối nhưng giữa hai ô đó, chúng ta sẽ nói Cho Mỗi ô trong Lựa chọn. Chúng ta sẽ đặt Worksheet và thực sự có lẽ chúng ta nên làm Dim WS này dưới dạng Worksheet. Muốn đặt bảng tính = Worksheets. Thêm vào. Bây giờ, Worksheets.Add cần biết chúng tôi muốn thêm nó vào đâu và điều tôi muốn làm là tôi chỉ muốn thêm trang tính này sau tác phẩm cuối cùng mà cô ấy có trong sổ làm việc. Vì vậy, tôi sẽ nói bây giờ chúng ta có bao nhiêu trang tính. Và ở đây chúng ta hãy thử, giả sử: Debug.Print worksheets.Count.Được rồi, nó cho biết chúng ta có 4, hãy quay lại Excel và kiểm tra xem. 1 2 3 4 vì vậy chúng tôi sẽ thêm nó vào sau trang thứ 4. Vì vậy, sau khi kết thúc, chúng ta sẽ thấy một trang tính mới và trang tính đó là nơi chúng ta sẽ đặt dữ liệu cho tài khoản 100.

Được rồi, WS.Name = cell.Value và sau đó chúng tôi quyết định rằng chúng tôi sẽ sử dụng bất kỳ thứ gì ở bên phải của Tài khoản: Dữ liệu. Và chúng tôi sẽ lấy Dữ liệu đó và đặt nó vào ô B1 của trang tính hoàn toàn mới mà chúng tôi vừa tạo. Vì vậy, từ ô, phải không, đối với mỗi ô, chúng ta sẽ Offset 0 hàng 1 cột và lấy Giá trị đó, được chứ? Vì vậy, chúng tôi có macro của mình: Tệp, Đóng và Quay lại Microsoft Excel và sau đó chúng tôi sẽ nhấn Alt + F8. Alt + F8, CreateSheets, sẽ chuyển đến Tùy chọn. Chàng trai, điều gì sẽ là một điều tốt? Ctrl + Shift + W. W cho trang tính. Vì vậy, tôi giữ phím Shift + W trong đó, nhấp vào OK và chúng ta có thể nhấp vào Hủy. Được rồi, chọn các ô đó rồi nhấn Ctrl + Shift + W. Xem ngay tại đây sau khi Wrap Up - BAM! Nó có chúng trên mỗi cái. Nó lấy dữ liệu từ từng trang tính riêng lẻ. Một con đường tuyệt vời để đi.

Có thể tạo nhiều trang tính trên Fly và tất nhiên, nó sẽ hoạt động nhiều hơn thế. Hãy thực hiện a = ROW * 2 sao chép cái này xuống, xuống, xuống, xuống, xuống và chọn tất cả những cái đó - Ồ, chờ đã, chúng ta phải đặt một số dữ liệu ở đó. Hãy điền vào nó với 2, được rồi. Và sau đó Ctrl + Shift + W. RẦM! Ồ, tôi đã sử dụng một tờ 49. Nhưng hãy nhìn xem, chúng ta đã đi đến gần, kết thúc một cách nhanh chóng. Cách tạo rất nhiều trang tính khác nhau trên Fly.

Được rồi, chủ đề trong tập này: Pam từ Indy muốn tạo trang tính cho từng số tài khoản trong Cột A. Hiện tại, cô ấy đang sử dụng Hiển thị các trang Bộ lọc Báo cáo của Bảng Pivot. Cô ấy đang tìm cách nhanh hơn, được chứ? Vì vậy, chúng tôi sẽ lưu sổ làm việc dưới dạng XLSM. Chúng ta sẽ đi Alt + TMS và đặt thành lựa chọn thứ hai, không phải lựa chọn đầu tiên. Alt + F11, bây giờ chúng ta đang ở trong VBA, Chèn mô-đun, Nhập mã như được hiển thị, Alt + Q để quay lại Excel, Alt + F8, chọn tên macro và nhấp vào Tùy chọn, gán cho Ctrl + Shift + W.

Này, tôi muốn cảm ơn Pam vì đã có mặt trong buổi hội thảo của tôi ở Indianapolis. Chúng tôi đã có một thời gian tuyệt vời ở đó, nhóm tốt. Và 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: Podcast2082.xlsm

thú vị bài viết...