Thử Code dưới cho Sheets("Thang 3.2016"):..................... tự ẩn đi hoặc chèn vào khi tháng có ngày khác nhau không? Ví dụ tháng có 28 ngày thì chỉ để 28 cột chấm công còn tháng có 31 ngày thì tự động chèn vào thêm cột
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = vbNullString Then Exit Sub
If Target.Address = "$O$6" Then
Select Case Target.Value
Case 1, 3, 5, 7, 8, 10, 12
Columns("AF:AG").Hidden = False
Case 2
Columns("AF:AG").Hidden = True
Case 4, 6, 9, 11
Columns("AG").Hidden = True
End Select
End If
End Sub
Tham khảo cách định dạng ngày theo hệ thống VN.E có 1 bảng chấm công bao gồm nhiều sheet, mỗi sheet là 1 tháng. Vậy bây giờ e chỉ muốn thể hiện trên 1 sheet và khi thay dữ liệu tháng và năm tại ô O6 và N6 thì bảng chấm công sẽ thể hiện kết quả chấm công của tháng đó. Xin các anh chị chỉ giúp với!!!!