Kiểm soát nguyên vật liệu theo ngày

[huutuong1984]

Macro hide cột theo điều kiện

Chào mọi người,

Hiện tại tôi muốn nhập liệu theo ngày, do đó muốn tạo 1 macro mà khi mình bấm chạy, nó sẽ tự động hide các cột không phải là ngày hôm đó.

Tôi có làm thử nhưng không biết là sai chỗ nào, với lại không biết gán biến theo cột như thế nào cả.

Do đó nhờ mọi người góp ý nhé.

Thanks all,

 

[huutuong1984]

Hic hic, sao không thấy ai gợi ý giùm mình tí nào vậy nhỉ?

 

[huutuong1984]

Lại một ngày nữa ko có tin tức gì hết!

 

[huutuong1984]

Sorry mọi người, do không tạo được chủ đề mới (không hiểu vì lỗi gì nữa) nên mình sửa lại bài cũ. Mọng mọi người thông cảm và giúp đỡ nhé!

Vui lòng xem bài dưới cùng nhé!

 

[ndu96081631]

Chào mọi người,

Hiện tại tôi muốn nhập liệu theo ngày, do đó muốn tạo 1 macro mà khi mình bấm chạy, nó sẽ tự động hide các cột không phải là ngày hôm đó.

Tôi có làm thử nhưng không biết là sai chỗ nào, với lại không biết gán biến theo cột như thế nào cả.

Do đó nhờ mọi người góp ý nhé.

Thanks all,

Ý bạn tức là chỉ hiện NGÁY HÔM NAY (ngày gõ tại cell L1)... còn lại thì ẩn hết, đúng không?
Vậy dùng code này:

Sub Hidecol()
 Columns("N:HV").EntireColumn.Hidden = True
 Range("N3").Offset(, (Day([L1]) - 1) * 7).Resize(, 7).EntireColumn.Hidden = False
End Sub

 

[Hai Lúa Miền Tây]

Chào mọi người,

Hiện tại tôi muốn nhập liệu theo ngày, do đó muốn tạo 1 macro mà khi mình bấm chạy, nó sẽ tự động hide các cột không phải là ngày hôm đó.

Tôi có làm thử nhưng không biết là sai chỗ nào, với lại không biết gán biến theo cột như thế nào cả.

Do đó nhờ mọi người góp ý nhé.

Thanks all,

hoặc bạn có thể dùng theo cách của mình trong file đính kèm nhé
Thân

 

[sealand]

Mình xóa ô Today() và để bạn nhập ngày cần xem rồi nhấn nút kiểm tra. Bạn sửa lại theo ý bạn sau

 

[huutuong1984]

Thanks mọi người nhiều, kết quả ok lắm!