Tôi thường xuyên ẩn và hiện các cột trong trang tính của mình. Nếu tôi có toàn bộ phạm vi cột bị ẩn, tôi thấy phiền khi hiện một cột duy nhất trong số tất cả những cột bị ẩn. Ví dụ, tôi có thể ẩn các cột C: M và sau đó muốn hiện cột F. Có một số cách có thể được thực hiện:

  • Hiện toàn bộ phạm vi và sau đó ẩn C: E và G: M.

  • Nhập ô F1 vào hộp Tên và sau đó sử dụng các điều khiển có sẵn thông qua công cụ Định dạng trên tab Trang đầu của ruy-băng để hiện cột.

Nhập ô F1 vào hộp Tên, sau đó nhấn Ctrl + Shift + 0 * để hiện cột.

Cũng có một số cách khác để bỏ ẩn cột, nhưng (như tôi đã nói), tôi thấy những cách tiếp cận như vậy thật phiền phức. Việc hiển thị một cột hoặc một dải cột rất dễ thực hiện thông qua một macro nhỏ.

Hãy xem xét những điều sau:

Sub UnhideSingleColumn()

Dim Col As String     Dim rng As Range

StartHere:

Col = InputBox("Enter column to unhide.", "Unhide Column")

If Col = "" Then Exit Sub     On Error Resume Next     ' if not a valid range, an error occurs     Set rng = ActiveSheet.Columns(Col)

If Err.Number <> 0 Then         On Error GoTo 0         Err.Clear         MsgBox "Invalid input! Please input a valid column."

GoTo StartHere     End If

rng.EntireColumn.Hidden = False

MsgBox "Column " & UCase(Col) & " is now visible.", _       vbOKOnly, "Unhide Specified Column"

Set rng = Nothing     On Error GoTo 0 End Sub

Macro sẽ nhắc người dùng hiển thị cột nào, rồi cố gắng chọn cột đó. Nếu cột không thể được chọn, thì một lỗi sẽ được tạo ra và người dùng lại được yêu cầu nhập. Nếu cột có thể được chọn, thì thuộc tính .Hidden của nó sẽ bị tắt, do đó làm cho cột hiển thị.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (11471) áp dụng cho Microsoft Excel 2007, 2010, 2013 và 2016.