Wie liste ich alle Daten zwischen zwei Daten in Excel auf?
In einigen Fällen müssen Sie möglicherweise alle Daten zwischen diesen beiden angegebenen Daten in Excel auflisten, wenn Sie das spezifische Start- und Enddatum haben. In diesem Lernprogramm werden nun die Methoden zum Auflisten aller Daten zwischen zwei Daten in Excel beschrieben.
Listen Sie alle Daten zwischen zwei Daten nach Formeln auf
Listen Sie alle Daten zwischen zwei Daten von VBA auf
Listen Sie alle Daten zwischen zwei Daten von Kutools for Excel auf
Listen Sie alle Daten zwischen zwei Daten nach Formeln auf
Hier stelle ich Formeln vor, mit denen Sie schnell alle Daten zwischen zwei angegebenen Daten in Excel auflisten können.
1. Geben Sie das Start- und Enddatum in zwei Zellen ein, hier tippe ich sie in die Zellen A1 und A2. Siehe Screenshot:
2. Gehen Sie dann zu Zelle C1, um diese Formel einzugeben = A1 + 1 hinein, dann klicken Sie Enter Schlüssel. Siehe Screenshot:
3. Geben Sie dann in Zelle C2 diese Formel ein =IF($A$1+ROW(A1)>=$A$2-1,"",C1+1) Ziehen Sie dann den Handle zum automatischen Ausfüllen nach unten zu den Zellen, bis eine leere Zelle angezeigt wird. Siehe Screenshots:
Dann können Sie sehen, dass alle Daten zwischen zwei angegebenen Daten in der Spalte aufgelistet sind.
Hinweis:
In den obigen Formeln ist A1 das Startdatum, A2 das Enddatum und C1 das erste Datum im Datumsbereich.
Listen Sie alle Daten zwischen zwei Daten von VBA auf
Wenn Sie an Makrocode interessiert sind, können Sie mit dem folgenden VBA alle Daten zwischen zwei angegebenen Daten in Excel auflisten.
1. Geben Sie das Start- und Enddatum in zwei Zellen ein, hier tippe ich die Zellen A1 und B1 ein. Siehe Screenshot:
2. Drücken Sie Alt + F11 Schlüssel zum Öffnen Microsoft Visual Basic für Applikationen Fenster.
3. Dann klick Insert > Modul und kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Popping ein Modul Fenster.
VBA: Alle Daten zwischen zwei Daten auflisten.
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 Sub
4 Klicken Führen Sie or F5 Um die VBA auszuführen, wird ein Dialogfeld angezeigt, in dem Sie das Startdatum auswählen und dann auf klicken können OKWählen Sie dann im zweiten Dialogfeld das Enddatum aus. Siehe Screenshot:
5 Klicken OKWählen Sie dann eine Zelle aus, um die Daten zu löschen, und klicken Sie dann auf OK. Jetzt können Sie sehen, dass alle Daten zwischen zwei Daten aufgelistet sind. Siehe Screenshots:
Note: Die von diesem VBA generierte Liste enthält das Start- und Enddatum.
Listen Sie alle Daten zwischen zwei Daten von Kutools for Excel auf
Eigentlich, wenn Sie installiert haben Kutools for Excel - ein praktisches Add-In-Tool, das Sie auch verwenden können Zufällige Daten einfügen um dieses Problem zu lösen.
Kutools for Excel, mit mehr als 300 Praktische Excel-Funktionen, steigern Ihre Arbeitseffizienz und sparen Arbeitszeit. | ||
Nach der kostenlose Installation Kutools für Excel, bitte gehen Sie wie folgt vor:
1. Wählen Sie eine Spalte aus, in der Sie Daten zwischen zwei Daten auflisten möchten, und klicken Sie auf Kutoolen > Insert > Zufällige Daten einfügen. Siehe Screenshot:
2. Dann in der Zufällige Daten einfügen Dialog, klicken Sie auf Datum Wählen Sie dann die Start- und Enddaten aus der Registerkarte Aus und To Liste, dann denken Sie daran, zu überprüfen Workday, Wochenende und Einzigartige Werte Kontrollkästchen. Siehe Screenshot:
3 Klicken Ok um den Dialog zu schließen, und einen anderen Kutools for Excel Das Dialogfeld wird angezeigt. Klicken Sie einfach auf Ja. Dann können Sie sehen, dass die Daten zwischen Start- und Enddatum aufgelistet sind. Siehe Screenshots:
4. Jetzt müssen Sie die Datumsliste in der von Ihnen gewünschten Reihenfolge sortieren. Klicken Datum > Sortieren Sie vom Ältesten zum Neuesten. Dann können Sie sehen, dass die Daten vom ältesten zum neuesten Datum sortiert sind. Siehe Screenshots:
Mit der Zufällige Daten einfügen Dienstprogramm, können Sie auch zufällige Ganzzahl, zufällige Zeichenfolge und zufällige Zeit usw. einfügen. Klicken Sie hier, um mehr über das Einfügen zufälliger Daten zu erfahren.
Listen Sie alle Daten zwischen zwei Daten auf
Relative Artikel:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!