Cách nối Sheet trong EXCEL

Cách nối Sheet trong EXCEL



Nối những Sheet thành một Sheet duy nhất
Nếu như bạn cần nối nhiều Sheet trong Excel lại với nhau thành một Sheet duy nhất thì bạn có thể thực hiện bằng Macro

Trolydatu.com - Công cụ tầm soát cổ phiếu


Cách thức tạo Macro trong Excel như sau
• Mở Excel
• Bấm tổ hợp phím Alt-F11
• Cửa sổ Microsoft Visual Basic mở ra . Trong cửa sổ này bạn chọn Insert > Module sau đó bạn dán theo nội dung dưới đây
Sub MergeSheets()
Const NHR = 1

Dim MWS As Worksheet
Dim AWS As Worksheet
Dim FAR As Long
Dim LR As Long

Set AWS = ActiveSheet

For Each MWS In ActiveWindow.SelectedSheets
If Not MWS Is AWS Then
FAR = AWS.UsedRange.Cells(AWS.UsedRange.Cells.Count).Row + 1
LR = MWS.UsedRange.Cells(MWS.UsedRange.Cells.Count).Row
MWS.Range(MWS.Rows(NHR + 1), MWS.Rows(LR)).Copy AWS.Rows(FAR)
End If
Next MWS
End Sub
• Quay trở lại Excel
• Đánh dấu chọn những Sheet bạn muốn nối bằng cách giữ phím Ctrl và bấm chuột trái vào tên Sheet bên dưới
• Chọn Sheet bạn muốn gộp toàn bộ các Sheet . Chọn menu Tools > Macro > chạy MergeSheets là hoàn tất


Ngày đăng: 10 December 2017 2677 lượt đọc


Bài viết liên quan

USP - Công cụ tạo dựng thương hiệu
Công cụ thiết kế bố cục website – Balsamiq Mockups
Các định dạng quảng cáo trên YouTube
Hướng dẫn cài đặt Customer Chat Facebook (Livechat Facebook)
Google cập nhật tính năng mới cho phép người dùng kiểm soát quảng cáo nhắc nhở
OTA là gì? Khách sạn cần làm gì để sử dụng OTA hiệu quả?