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ụ: nếu tôi ẩn các cột C: M và tôi muốn hiện cột F, thì tôi cần phải hiện toàn bộ phạm vi và sau đó ẩn lại C: E và G: M. (Có nhiều cách khác mà tôi có thể hoàn thành nhiệm vụ tương tự, nhưng không có cách nào trong số đó đặc biệt được yêu thích.)

Tuy nhiên, tôi thấy rằng một cột duy nhất có thể được hiển thị rất dễ dàng bằng cách sử dụng macro. 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 không thể chọn cột, thì 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 (2405) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: