Viết code VBA thế nào để ẩn cột A trong excel? (1 người xem)

[phamduylong]

Chuyển câu hỏi của ptkhanh_nt sang chủ đề mới

xin các sư huynh chỉ giúp.
Viết code VBA thế nào để ẩn cột A trong excel?

 

[Mr Okebab]

Chuyển câu hỏi của ptkhanh_nt sang chủ đề mới

Bác xem nhé :

Range("A1").EntireColumn.Hidden = True

Thân!

 

[chibi]

Hoặc đây nữa

Columns(1).Hidden = True

 

[ptkhanh_nt]

Cám ơn các bạn đã giúp đỡ tôi rất nhiệt tình.
Xin chân thành biết ơn!

xin các sư huynh chỉ giúp
Viết code thế nào mà khi thay đổi dữ liệu mới tại vùng A1:B2 thì xuất hiện thông báo và không cho thay đổi dữ liệu cũ.

 

[ndu96081631]

xin các sư huynh chỉ giúp
Viết code thế nào mà khi thay đổi dữ liệu mới tại vùng A1:B2 thì xuất hiện thông báo và không cho thay đổi dữ liệu cũ.

Cái này thì Protect sheet là được, cần gì code nhỉ?
Mà cho dù là muốn viết code thì tôi nghĩ nó cũng dựa trên cơ sở protect sheet mà thôi

 

[ongtrungducmx25]

bạn có tham khảo file này nhé có thể ẩn hiện cột A:A như ý muốn ............

 

[ptkhanh_nt]

xin các sư huynh chỉ giúp
Viết code thế nào mà khi thay đổi dữ liệu mới tại vùng A1:B2 thì xuất hiện thông báo và không cho thay đổi dữ liệu cũ.

 

[nonliving]

làm ơn cho mình hỏi, mình muốn ẩn các cột khác nhau; ví dụ cột A, cột F cùng một lúc thì làm thế nào?

cảm ơn nhiều.

 

[Hoàng Trọng Nghĩa]

làm ơn cho mình hỏi, mình muốn ẩn các cột khác nhau; ví dụ cột A, cột F cùng một lúc thì làm thế nào?

cảm ơn nhiều.

Bạn tham khảo File đính kèm nhé!

Private Sub CommandButton1_Click()
  If CommandButton1.Caption = "UnHide" Then
    [A:B,F:F,H:H].EntireColumn.Hidden = False
    CommandButton1.Caption = "Hide"
  Else
    [A:B,F:F,H:H].EntireColumn.Hidden = True
    CommandButton1.Caption = "UnHide"
  End If
End Sub

 

[TrungChinhs]

Bạn thử code ẩn - hiện cột này xem sao (khỏi cần if - else)

Sub Hide_Column_A()
    tmp = [A:B,F:F,H:H].EntireColumn.Hidden
    [A:B,F:F,H:H].EntireColumn.Hidden = Not tmp
End Sub

 

[buithinhvan77]

Bạn thử code ẩn - hiện cột này xem sao (khỏi cần if - else)

Sub Hide_Column_A()
    tmp = [A:B,F:F,H:H].EntireColumn.Hidden
    [A:B,F:F,H:H].EntireColumn.Hidden = Not tmp
End Sub

Các bác ơi! Tìm mãi mới thấy chủ đề mình cần.
Nếu muốn hiện hoặc ẩn các cột như trên thì em cũng làm được, hoặc Recod các thao tác ẩn hiện là được. Nhưng vấn đề đặt ra là em muốn tạo một Form cho phép mình chọn các cột cần ẩn (hoặc hiện ) như thế nào đây ạ!
VD: Từ cột A muốn ẩn 5, 6, 7, .... côt tiếp theo thì tạo như thế nào?