Xin mọi người giúp đỡ hàm hay code để thực hiện được công việc ẩn, hiện cột dòng,... (1 người xem)

[LegendVLU]

Chào mọi người, để phục vụ cho công việc thuận tiện hơn nên mình có lập 1 file EXCELL nhưng còn 1 số vướng mắc không giải quyết được, như: ẩn hiện cột, dòng tùy ý ( có danh sách chọn chẳn hạn) còn hàm điều kiện nữa ( mình có để trong file). Mong mọi người giúp. Thanks so much!

 

[nghiaphuc]

Chào mọi người, để phục vụ cho công việc thuận tiện hơn nên mình có lập 1 file EXCELL nhưng còn 1 số vướng mắc không giải quyết được, như: ẩn hiện cột, dòng tùy ý ( có danh sách chọn chẳn hạn) còn hàm điều kiện nữa ( mình có để trong file). Mong mọi người giúp. Thanks so much!

Bạn xem trong file đính kèm, nhấn Ctrl+Shift+S để hiện Form, sau khi chọn 2 list Cột và Hàng (chọn = hiện, bỏ chọn = ẩn) thì bạn nhấn nút Cập nhật để áp dụng.

 

[LegendVLU]

Thanks nghiaphuc, có thể chỉ mình cách thực hiện được không (nếu càng chi tiết càng hay) VBA mình mù tịt, có mua sách VBA căn bản nhưng chưa có thời gian nghiên cứu (xem wa cũng chưa biết ) còn cái hàm ở Cột 10, có thể giúp mình luôn không. Thank You!

 

[LegendVLU]

Có ai biết hàm nào có chức năng như thế này không: =hàm(A1=định dạng ngày/tháng /năm;True; False). vd: Ô A1: 05/2/2015; B1: 06/2/2015 ; Ô C1: khi 2 ô A1 và B1 là ngày thì trả kết quả TRUE chẳng hạn. Mong mọi người chỉ giúp. Thank so much!

 

[LegendVLU]

Chào anh nghiaphuc, cảm ơn anh lần nữa vì đã giúp, tôi có gửi tin nhắn cho anh vì còn 1 số thắc mắc chưa giải quyết được (không biết anh có nhận được không vì check "tin đã gửi" không thấy gì hết) nên gửi ở đây thêm lần nữa.

Vấn đề là thế này: khi ẩn/ hiện dòng cột xong (VD: ẩn cột 9 đến cột N, dòng 15 đến dòng N), đóng FORM lại, sau đó lại mở FORM lên (phím tắt Ctrl + Shift +S) thì những dòng cột lúc nãy chọn ẩn, không hiện trong checkbox nữa (muốn hiện lại phải chọn thủ công xong unhide) xin anh hướng dẫn giúp cách khắc phục không ẩn những mục bỏ chọn trong From. Xin chân thành cảm ơn

 

[nghiaphuc]

Chào anh nghiaphuc, cảm ơn anh lần nữa vì đã giúp, tôi có gửi tin nhắn cho anh vì còn 1 số thắc mắc chưa giải quyết được (không biết anh có nhận được không vì check "tin đã gửi" không thấy gì hết) nên gửi ở đây thêm lần nữa.

Vấn đề là thế này: khi ẩn/ hiện dòng cột xong (VD: ẩn cột 9 đến cột N, dòng 15 đến dòng N), đóng FORM lại, sau đó lại mở FORM lên (phím tắt Ctrl + Shift +S) thì những dòng cột lúc nãy chọn ẩn, không hiện trong checkbox nữa (muốn hiện lại phải chọn thủ công xong unhide) xin anh hướng dẫn giúp cách khắc phục không ẩn những mục bỏ chọn trong From. Xin chân thành cảm ơn

Bạn thay Sub UserForm_Initialize bởi Sub sau nhé:
[GPECODE=vb]Private Sub UserForm_Initialize()
Dim i As Long, Cll As Range
With Sheet1
Set Cll = .[A4]
Do While Not IsEmpty(Cll)
LstCot.AddItem Cll: Set Cll = Cll.Offset(, 1)
Loop
Set Cll = .[A5]
Do While Not IsEmpty(Cll)
LstHang.AddItem Cll: Set Cll = Cll.Offset(1)
Loop
For i = 0 To LstCot.ListCount - 1
LstCot.Selected(i) = (.Columns(i + 1).Hidden = False)
Next
For i = 0 To LstHang.ListCount - 1
LstHang.Selected(i) = (.Rows(i + 5).Hidden = False)
Next
End With
End Sub[/GPECODE]

 

[LegendVLU]

Đã thành công, quá xá zui, cảm ơn anh!