Excel là công cụ tuyệt vời để tự động hóa nhiều phép tính và mẫu. Bạn có thể tạo nhiều loại lịch tháng qua Excel. Nếu bạn đang tìm cách làm điều này, bạn đã đến đúng nơi. Trong bài viết này, tôi sẽ chỉ cho bạn 3 cách hiệu quả để tạo lịch tháng trong Excel.
Bạn có thể tải sổ làm việc thực hành của chúng tôi tại đây miễn phí!
3 cách hiệu quả tạo lịch tháng trong Excel
1. Tạo lịch tháng từ mẫu Excel
Excel có sẵn một số mẫu dựng sẵn cho lịch. Bạn có thể tạo lịch tháng từ bất kỳ mẫu nào bằng cách làm theo các cách dưới đây.
📌 Các bước:
- Trước hết, vào tab File.
- Sau đó, chọn tùy chọn New (Mới) từ tab File mở rộng.
- Kế tiếp, một cửa sổ New sẽ xuất hiện.
- Tiếp theo, gõ calendar (lịch) vào ô tìm kiếm và nhấp vào biểu tượng Start searching (Bắt đầu tìm kiếm).
- Kết quả, các mẫu có sẵn sẽ xuất hiện dưới dạng gợi ý.
- Bây giờ, chọn bất kỳ mẫu nào bạn thích và nhấp vào nút Create (Tạo).
Kết quả, bạn sẽ thấy một lịch xuất hiện trong cửa sổ Excel mới theo mẫu. Với mẫu chúng tôi chọn, kết quả sẽ như sau.
Đọc thêm: Cách tạo lịch trong Excel không dùng mẫu (2 ví dụ)
2. Tạo lịch tháng tùy chỉnh trong Excel 2003 | 2007 | 2010 | 2013 | 2016 và các phiên bản mới hơn
Bây giờ, có thể bạn không thích bất kỳ mẫu dựng sẵn nào, mà muốn tự làm lịch tháng theo ý thích riêng. Về mặt này, bạn có thể tạo lịch tháng trong Excel bằng cách thực hiện các bước dưới đây.
📌 Các bước:
- Thứ nhất, tạo tiêu đề cho tháng của bạn và chọn 7 hàng và 7 cột.
- Sau đó, trên vùng chọn, nhấp vào biểu tượng All Borders (Tất cả đường viền) từ tab Home.
- Kết quả, tất cả các ô sẽ có đường viền.
- Tiếp theo, tại hàng được chọn đầu tiên, ghi tên các ngày trong tuần và định dạng theo ý muốn.
- Bây giờ, chọn 6 hàng và 7 cột còn lại >> vào tab Home >> nhóm Cells >> công cụ Format >> tùy chọn Row Height… (Chiều cao hàng).
- Kết quả, cửa sổ Row Height sẽ xuất hiện.
- Điền giá trị 40 vào hộp văn bản Row height: và nhấp vào nút OK.
- Sau đó, trên vùng chọn trước, vào tab Home >> nhóm Cells >> công cụ Format >> tùy chọn Column Width… (Chiều rộng cột).
- Kết quả, cửa sổ Column Width sẽ xuất hiện.
- Sau đó, điền giá trị 12 vào hộp văn bản Column width: và nhấp vào nút OK.
- Bây giờ, trên vùng chọn trước, chuột phải và chọn tùy chọn Format Cells… (Định dạng ô) từ menu ngữ cảnh.
- Lúc này, cửa sổ Format Cells sẽ xuất hiện.
- Kế tiếp, vào tab Alignment (Căn chỉnh) >> chọn tùy chọn Right (Indent) trong danh sách Horizontal: >> chọn tùy chọn Top trong danh sách Vertical: >> nhấp vào nút OK.
Vậy là định dạng lịch của bạn đã sẵn sàng. Bây giờ, hãy tìm trên Google ngày đầu tiên của tháng tiếp theo của năm tới và điền giá trị tương ứng vào các ngày trong tuần. Cuối cùng, lịch tháng nên trông như thế này.
Đọc thêm: Cách tạo lịch tương tác trong Excel (2 cách dễ dàng)
3. Tạo lịch tháng bằng VBA
Một cách khác để tạo lịch tháng là sử dụng mã VBA. Bạn có thể làm theo các bước dưới đây để thực hiện việc này.
📌 Các bước:
- Ngay từ đầu, tạo một trang tính mới và vào tab Developer (Nhà phát triển) >> công cụ Visual Basic.
- Kết quả, cửa sổ Microsoft Visual Basic for Applications sẽ xuất hiện.
- Tiếp theo, vào tab Insert >> chọn tùy chọn Module (Mô-đun).
- Kết quả, một mô-đun mới tên Module1 đã được tạo.
- Kế tiếp, chuột phải kép vào Module1 và viết mã VBA dưới đây vào cửa sổ mã.
Mã VBA này được lấy từ docs.microsoft.com.
Sub CalendarMaker()
ActiveSheet.Protect DrawingObjects:=False, Contents:=False, _
Scenarios:=False
Application.ScreenUpdating = False
On Error GoTo MyErrorTrap
Range("a1:g14").Clear
MyInput = InputBox("Type in months and years")
If MyInput = "" Then Exit Sub
StartDay = DateValue(MyInput)
If Day(StartDay) <> 1 Then
StartDay = DateValue(Month(StartDay) & "/1/" & _
Year(StartDay))
End If
Range("a1").NumberFormat = "mmmm yyyy"
With Range("a1:g1")
.HorizontalAlignment = xlCenterAcrossSelection
.VerticalAlignment = xlCenter
.Font.Size = 18
.Font.Bold = True
.RowHeight = 35
End With
With Range("a2:g2")
.ColumnWidth = 11
.VerticalAlignment = xlCenter
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.Orientation = xlHorizontal
.Font.Size = 12
.Font.Bold = True
.RowHeight = 20
End With
Range("a2") = "Sunday"
Range("b2") = "Monday"
Range("c2") = "Tuesday"
Range("d2") = "Wednesday"
Range("e2") = "Thursday"
Range("f2") = "Friday"
Range("g2") = "Saturday"
With Range("a3:g8")
.HorizontalAlignment = xlRight
.VerticalAlignment = xlTop
.Font.Size = 18
.Font.Bold = True
.RowHeight = 21
End With
Range("a1").Value = Application.Text(MyInput, "mmmm yyyy")
DayofWeek = Weekday(StartDay)
CurYear = Year(StartDay)
CurMonth = Month(StartDay)
FinalDay = DateSerial(CurYear, CurMonth + 1, 1)
Select Case DayofWeek
Case 1: Range("a3").Value = 1
Case 2: Range("b3").Value = 1
Case 3: Range("c3").Value = 1
Case 4: Range("d3").Value = 1
Case 5: Range("e3").Value = 1
Case 6: Range("f3").Value = 1
Case 7: Range("g3").Value = 1
End Select
For Each cell In Range("a3:g8")
RowCell = cell.Row
ColCell = cell.Column
If cell.Column = 1 And cell.Row = 3 Then
ElseIf cell.Column <> 1 Then
If cell.Offset(0, -1).Value >= 1 Then
cell.Value = cell.Offset(0, -1).Value + 1
If cell.Value > (FinalDay - StartDay) Then
cell.Value = ""
Exit For
End If
End If
ElseIf cell.Row > 3 And cell.Column = 1 Then
cell.Value = cell.Offset(-1, 6).Value + 1
If cell.Value > (FinalDay - StartDay) Then
cell.Value = ""
Exit For
End If
End If
Next
For x = 0 To 5
Range("A4").Offset(x * 2, 0).EntireRow.Insert
With Range("A4:G4").Offset(x * 2, 0)
.RowHeight = 65
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlTop
.WrapText = True
.Font.Size = 10
.Font.Bold = False
.Locked = False
End With
With Range("A3").Offset(x * 2, 0).Resize(2, _
7).Borders(xlLeft)
.Weight = xlThick
.ColorIndex = xlAutomatic
End With
With Range("A3").Offset(x * 2, 0).Resize(2, _
7).Borders(xlRight)
.Weight = xlThick
.ColorIndex = xlAutomatic
End With
Range("A3").Offset(x * 2, 0).Resize(2, 7).BorderAround _
Weight:=xlThick, ColorIndex:=xlAutomatic
Next
If Range("A13").Value = "" Then
Range("A13").Offset(0, 0) _
.Resize(2, 8).EntireRow.Delete
ActiveWindow.DisplayGridlines = False
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.ScrollRow = 1
Application.ScreenUpdating = True
Exit Sub
MyErrorTrap:
MsgBox "You may not have entered your Month and Year correctly." _
& Chr(13) & "Spell the Month correctly" _
& " (or use 3 letter abbreviation)" _
& Chr(13) & "and 4 digits for the Year"
MyInput = InputBox("Type in Month and year for Calendar")
If MyInput = "" Then Exit Sub
Resume
End Sub- Sau đó, nhấn Ctrl+S.
- Lúc này, hộp thoại Microsoft Excel sẽ xuất hiện. Nhấp vào nút No ở đây.
- Kết quả, hộp thoại Save As (Lưu dưới dạng) sẽ xuất hiện.
- Kế tiếp, chọn tùy chọn Save as type: (Lưu dưới dạng) là .xlsm và nhấp vào nút Save (Lưu).
- Bây giờ, đóng cửa sổ mã và vào tab Developer >> công cụ Macros.
- Kết quả, cửa sổ Macro sẽ xuất hiện.
- Tiếp theo, chọn macro CalendarMaker và nhấp vào nút Run (Chạy).
- Kết quả, hộp thoại Microsoft Excel sẽ xuất hiện.
- Ở đây, ghi 3 chữ cái đầu của tháng và 4 chữ số của năm.
- Cuối cùng, nhấp vào nút OK.
Vậy là bạn sẽ thấy lịch của tháng sau được tạo trong trang tính của bạn và kết quả trông như thế này.
Tạo lịch tháng tương tác/động trong Excel bằng công thức
Bây giờ, nếu bạn muốn tạo lịch tháng tương tác/động trong Excel bằng công thức, bạn phải làm thêm một số bước. Hãy làm theo các bước dưới đây cẩn thận để đạt được điều này.
📌 Các bước:
- Thứ nhất, tạo hai bảng hỗ trợ, một với danh sách ngày lễ và một với danh sách tên tháng.
- Bây giờ, tạo mẫu lịch tháng tùy chỉnh theo ý thích.
- Tiếp theo, cho mục đích động, chúng ta muốn tự động hóa tên tháng.
- Để làm điều này, chọn ô H4 >> vào tab Data >> nhóm Data Tools >> công cụ Data Validation >> tùy chọn Data Validation….
- Kế tiếp, cửa sổ Data Validation sẽ xuất hiện.
- Sau đó, vào tab Settings (Cài đặt) >> chọn tùy chọn List (Danh sách) từ danh sách Allow: >> tham chiếu ô E5:E16 tại hộp văn bản Source: >> nhấp vào nút OK.
- Kết quả, bạn sẽ thấy có danh sách thả xuống ở ô H4 và bạn có thể chọn tháng bằng cách nhấp chuột.
- Sau khi chọn tháng là Jan (Tháng 1), nhấp vào ô B6 và chèn công thức sau.
=IF(MONTH(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1),2))=MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($D$4,MATCH($H$4,'Helper Columns'!$E$5:$E$16,0),1),2),"")
- Kế tiếp, nhấn nút Enter.
- Vậy là bạn có thể lấy tất cả các ngày theo ngày trong tuần cho tháng tiếp theo chính xác.
- Nhưng, các giá trị chưa ở định dạng phù hợp.
- Để sửa điều này, chuột phải vào toàn bộ vùng chọn B6:H11 và chọn tùy chọn Format Cells… từ menu ngữ cảnh.
- Kết quả, hộp thoại Format Cells sẽ xuất hiện.
- Vào tab Number (Số) >> chọn tùy chọn Custom (Tùy chỉnh) từ ngăn Category: >> ghi dd vào hộp văn bản Type: >> nhấp vào nút OK.
- Vậy là ngày lịch của bạn đã được định dạng đúng và bạn có thể thấy lịch đầy đủ cho tháng tiếp theo.
- Bây giờ, để đánh dấu cuối tuần khác biệt, chọn ô cuối tuần >> vào tab Home >> nhóm Font >> biểu tượng Fill Color >> chọn màu Orange, Accent 2, Lighter 40%.
- Bây giờ, để đánh dấu ngày lễ, chọn ô B6:H11 >> vào tab Home >> công cụ Conditional Formatting (Định dạng có điều kiện) >> tùy chọn New Rule… (Quy tắc mới).
- Kết quả, cửa sổ Edit Formatting Rule (Chỉnh sửa quy tắc định dạng) sẽ xuất hiện.
- Tiếp theo, chọn tùy chọn cuối cùng từ danh sách Select a Rule Type: >> ghi công thức dưới đây vào thanh công thức Format values where this formula is true: >> nhấp vào tùy chọn Format….
=ISNUMBER(VLOOKUP('Dynamic Monthly Calender'!B6,'Helper Columns'!$C$5:$C$15,1,0))
- Kế tiếp, vào tab Fill từ cửa sổ xuất hiện >> chọn màu đỏ >> nhấp vào nút OK.
- Kết quả, cửa sổ Edit Formatting Rule sẽ xuất hiện lại với bản xem trước. Nhấp vào nút OK.
Vậy là bạn nhận được lịch tháng tương tác của mình, nơi cuối tuần hiển thị màu khác và ngày lễ cũng hiển thị màu khác. Bạn có thể thay đổi tháng bằng danh sách thả xuống ở ô H4 và do đó, các ngày trong tuần, cuối tuần và ngày lễ cũng sẽ thay đổi động.
Tạo lịch năm trong Excel
Bây giờ, nếu bạn muốn tạo lịch năm trong Excel, bạn có thể làm theo các bước dưới đây.
📌 Các bước:
- Ngay từ đầu, tạo mẫu cho ngày và tháng theo ý thích của bạn.
- Sau đó, nhấp vào ô B6 và chèn công thức sau.
=IF(MONTH(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1),2))=MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1)+SEQUENCE(6,7)-WEEKDAY(DATE($B$3,MATCH($B$4,'Helper Columns'!$E$5:$E$16,0),1),2),"")
- Kế tiếp, nhấn nút Enter.
- Kết quả, bạn sẽ thấy các ngày sẽ được đặt theo các ngày cụ thể của tháng tiếp theo.
- Nhưng, do vấn đề không gian và định dạng, nó có thể hiển thị ### đôi khi.
- Để khắc phục, chọn toàn bộ tập dữ liệu của tháng và chuột phải vào các ô.
- Tiếp theo, chọn tùy chọn Format Cells….
- Kết quả, cửa sổ Format Cells sẽ xuất hiện.
- Bây giờ, vào tab Number >> chọn tùy chọn Custom từ ngăn Category: >> ghi dd vào hộp văn bản Type: >> nhấp vào nút OK.
- Lặp lại các quy trình này cho từng tháng của năm tới.
- Vậy là bạn sẽ nhận được các ngày theo ngày trong tuần cho cả năm.
- Bây giờ, để đánh dấu cuối tuần, chọn ô cuối tuần >> vào tab Home >> nhóm Font >> biểu tượng Fill Color >> chọn màu Orange, Accent 2, Lighter 40%.
- Sau đó, để đánh dấu ngày lễ tháng 1, chọn tất cả các ngày của tháng >> vào tab Home >> công cụ Conditional Formatting >> chọn tùy chọn New Rule….
- Kết quả, cửa sổ Edit Formatting Rule sẽ xuất hiện.
- Tiếp theo, chọn tùy chọn cuối cùng từ Select a Rule Type: >> chèn công thức sau vào hộp văn bản Format values where this formula is true: >> nhấp vào nút Format….
=ISNUMBER(VLOOKUP(B6,'Helper Columns'!$C$5:$C$15,1,0))
- Sau đó, vào tab Fill >> chọn màu Đỏ >> nhấp vào nút OK.
- Kết quả, cửa sổ Edit Formatting Rule sẽ xuất hiện lại với bản xem trước. Nhấp vào nút OK.
Lặp lại các quy trình này cho tất cả các tháng khác sử dụng cùng công thức và định dạng động và do đó bạn sẽ nhận được lịch năm động của mình.
Đọc thêm: Cách tạo lịch tuần trong Excel (3 cách phù hợp)
Cách tạo lịch trình tháng trong Excel
Bạn cũng có thể dễ dàng tạo lịch trình tháng trong Excel. Để làm điều này, hãy làm theo các bước dưới đây cẩn thận.
📌 Các bước:
- Ban đầu, vào tab File.
- Sau đó, chọn tùy chọn New từ tab File mở rộng >> ghi Monthly Schedule vào ô tìm kiếm >> nhấp vào biểu tượng Start searching.
- Kết quả, một số mẫu sẽ xuất hiện.
- Tiếp theo, nhấp vào mẫu 12-Month Calendar (Lịch 12 tháng).
- Sau đó, nhấp vào nút Create.
Kết quả, một file Excel mới sẽ được tạo, và như vậy bạn sẽ nhận được lịch trình tháng mong muốn trong Excel.
Kết luận
Vậy, trong bài viết này, tôi đã chỉ cho bạn cách tạo lịch tháng trong Excel. Tôi đề xuất bạn đọc kỹ toàn bộ bài viết và áp dụng kiến thức cho nhu cầu của mình. Bạn cũng có thể tải sổ làm việc miễn phí của chúng tôi để thực hành. Tôi hy vọng bạn thấy bài viết này hữu ích và đầy đủ thông tin. Nếu bạn có thêm thắc mắc hoặc đề xuất, vui lòng bình luận tại đây.
Và, truy cập ExcelDemy để học thêm về Excel! Chúc bạn một ngày tốt lành!