Cách xóa các hàng và cột không mong muốn trong bảng tính Excel
( Sẽ không mất nhiều thời gian như cái nhìn đầu tiên có thể gợi ý và nó an toàn!)
Có hai tờ được đề cập trong thủ tục dưới đây.
Hãy gọi trang tính gốc của bạn YourOriginalSheet
(nó đại diện cho tên thật của trang tính gốc của bạn).
Chúng ta hãy gọi bảng khác ShortSheet
, sẽ chứa một bản sao chỉ các ô có liên quan.
(1) Trong YourOriginalSheet
, Select
và Copy
phạm vi của các tế bào có liên quan (không dán bất cứ nơi nào chưa).
(2) Thêm một trang tính mới có tên ShortSheet
, đặt con trỏ vào ô biểu thị góc trên bên trái của phạm vi được sao chép (có thể A1
) và dán như vậy:
(2a) Paste Special...
> Formulas
[nhấp chuột phải vào ô góc trên bên trái]
(2b) Paste Special...
>Values
(2c) Paste Special...
>Formats
(2đ) Paste Special...
>Column Widths
(2e) Bao gồm các Paste Special
tùy chọn khác mà bạn nghĩ có thể giúp làm cho trang tính trông đẹp hơn.
(3) Nhấn Ctrl-Shift-End
để tìm góc dưới bên phải của ShortSheet
để đảm bảo nó chứa tất cả dữ liệu liên quan.
(4) Save
sách bài tập. ( Save As ...
một tệp mới nếu bạn muốn sao lưu.)
(5) Xóa YourOriginalSheet
(Dữ liệu liên quan hiện được lưu trong ShortSheet
.)
(6) Đổi tên ShortSheet
thành tên thật của trang tính gốc của bạn`.
Không có gì thay đổi ngoại trừ làm cho sổ làm việc nhỏ hơn rất nhiều, vì vậy tất cả các macro, tham chiếu bên ngoài vào bảng tính này, v.v. vẫn nên hoạt động.
Đây là một macro
để thực hiện các bước trong (2).
Sub pasteSpecialAll()
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
Trước khi sử dụng macro Select
và Copy
phạm vi có liên quan, như đã được thực hiện trong bước (1).
Tôi đã lưu macro của mình trong Personal.xlsb
sổ làm việc để sử dụng trong tương lai ở mọi nơi và gán phím Ctrl + Shift + V
cho nó.