Làm cách nào để liệt kê tất cả các ngày giữa hai ngày trong Excel?
Trong một số trường hợp, nếu bạn có ngày bắt đầu cụ thể và ngày kết thúc, bạn có thể cần phải liệt kê tất cả các ngày giữa hai ngày cụ thể này trong Excel. Bây giờ hướng dẫn này nói về các phương pháp liệt kê tất cả các ngày giữa hai ngày trong Excel.
Liệt kê tất cả các ngày giữa hai ngày theo công thức
Liệt kê tất cả các ngày giữa hai ngày bằng VBA
Liệt kê tất cả các ngày giữa hai ngày bằng Kutools cho Excel 
Liệt kê tất cả các ngày giữa hai ngày theo công thức
Ở đây tôi giới thiệu các công thức có thể nhanh chóng liệt kê tất cả các ngày giữa hai ngày nhất định cho bạn trong Excel.
1. Gõ ngày bắt đầu và ngày kết thúc vào hai ô, ở đây tôi gõ chúng vào ô A1 và A2. Xem ảnh chụp màn hình:
2. Sau đó chuyển đến ô C1 để nhập công thức này = A1 + 1 vào nó, sau đó nhấp vào đăng ký hạng mục thi Chìa khóa. Xem ảnh chụp màn hình:
3. Sau đó, trong ô C2, nhập công thức này =IF($A$1+ROW(A1)>=$A$2-1,"",C1+1) vào đó, sau đó kéo chốt tự động điền xuống các ô cho đến khi một ô trống xuất hiện. Xem ảnh chụp màn hình:
Sau đó, bạn có thể thấy tất cả các ngày giữa hai ngày nhất định được liệt kê trong cột.
Lưu ý:
Trong các công thức trên, A1 là ngày bắt đầu, A2 là ngày kết thúc và C1 là ngày đầu tiên trong phạm vi ngày.
Liệt kê tất cả các ngày giữa hai ngày bằng VBA
Nếu bạn quan tâm đến mã macro, bạn có thể sử dụng VBA bên dưới để liệt kê tất cả các ngày giữa hai ngày nhất định trong Excel.
1. Gõ ngày bắt đầu và ngày kết thúc bạn vào hai ô, ở đây tôi gõ vào ô A1 và B1. Xem ảnh chụp màn hình:
2. nhấn Alt + F11 chìa khóa để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
3. Sau đó nhấn vào Chèn > Mô-đun và sao chép và dán mã VBA bên dưới vào cửa sổ bật lên Mô-đun cửa sổ.
VBA: Liệt kê tất cả các ngày giữa hai ngày.
Sub WriteDates()
'Updateby20150305
Dim rng As Range
Dim StartRng As Range
Dim EndRng As Range
Dim OutRng As Range
Dim StartValue As Variant
Dim EndValue As Variant
xTitleId = "KutoolsforExcel"
Set StartRng = Application.Selection
Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)
Set EndRng = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set OutRng = OutRng.Range("A1")
StartValue = StartRng.Range("A1").Value
EndValue = EndRng.Range("A1").Value
If EndValue - StartValue <= 0 Then
Exit Sub
End If
ColIndex = 0
For i = StartValue To EndValue
OutRng.Offset(ColIndex, 0) = i
ColIndex = ColIndex + 1
Next
End Sub4. nhấp chuột chạy or F5 để chạy VBA và một hộp thoại bật ra để bạn chọn ngày bắt đầu, sau đó nhấp vào OK, sau đó chọn ngày kết thúc trong hộp thoại bật lên thứ hai. Xem ảnh chụp màn hình:
5. nhấp chuột OK, sau đó chọn một ô để hiển thị ngày tháng, sau đó bấm OK. Bây giờ bạn có thể thấy tất cả các ngày giữa hai ngày được liệt kê. Xem ảnh chụp màn hình:
Chú thích: Danh sách được tạo bởi VBA này bao gồm ngày bắt đầu và ngày kết thúc.
Liệt kê tất cả các ngày giữa hai ngày bằng Kutools cho Excel
Trên thực tế, nếu bạn đã cài đặt Kutools cho Excel - một công cụ bổ sung tiện dụng, bạn cũng có thể sử dụng Chèn dữ liệu ngẫu nhiên để giải quyết vấn đề này.
| Kutools cho Excel, với hơn 300 các hàm Excel tiện dụng, nâng cao hiệu quả làm việc và tiết kiệm thời gian làm việc của bạn. | ||
Sau cài đặt miễn phí Kutools cho Excel, vui lòng làm như sau:
1. Chọn một cột bạn muốn liệt kê các ngày giữa hai ngày và nhấp vào Kutools > Chèn > Chèn dữ liệu ngẫu nhiên. Xem ảnh chụp màn hình:
2. Sau đó trong Chèn dữ liệu ngẫu nhiên thoại, bấm Ngày , sau đó chọn ngày bắt đầu và ngày kết thúc từ Từ và To danh sách, sau đó nhớ kiểm tra Ngày làm việc, Cuối tuần và Giá trị duy nhất hộp kiểm. Xem ảnh chụp màn hình:
3. nhấp chuột Ok để đóng hộp thoại và một Kutools cho Excel hộp thoại bật ra, chỉ cần nhấp vào Có. Sau đó, bạn có thể thấy các ngày giữa ngày bắt đầu và ngày kết thúc được liệt kê. Xem ảnh chụp màn hình:
4. Bây giờ bạn cần sắp xếp danh sách ngày theo thứ tự bạn cần. Nhấp chuột Ngày > Sắp xếp Cũ nhất đến Mới nhất. Sau đó, bạn có thể thấy các ngày được sắp xếp từ ngày cũ nhất đến ngày mới nhất. Xem ảnh chụp màn hình:
Với Chèn dữ liệu ngẫu nhiên tiện ích, bạn cũng có thể chèn số nguyên ngẫu nhiên, chuỗi ngẫu nhiên và thời gian ngẫu nhiên, v.v. Nhấp vào đây để biết thêm về Chèn dữ liệu ngẫu nhiên.
Liệt kê tất cả các ngày giữa hai ngày
Các bài báo tương đối:
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
