VBA-Codierung zum Abrufen von Daten aus der Datenbank mit vorgegebenen Daten

Question

Ich bin sehr neu in der VBA-Codierung und versuchte, den Code für eine bestimmte Aufgabe zu finden. Ich habe eine Datenbank ("Sanitation") mit einer Datumsspalte. Die Datenbank befindet sich auf dem Blatt "Sanitation Schedule". Ich habe ein Formular erstellt, um die erforderlichen Anfangs- und Enddaten festzulegen und sie in Zelle A2 (Startdatum) und A3 (Enddatum) des Blattes "Sanitation Form" zu kopieren. Ich möchte die Zeilen meiner Datenbank zwischen den vorgegebenen Start- und Enddaten auswählen und die Zeilen in ein anderes Blatt "Sanitation Form" kopieren. Es klingt wahrscheinlich sehr einfach, aber es ist aus meinem Wissen. Danke für Ihre Hilfe.

Answer 1

können Sie .Find

Dim StartDate As Date 
StartDate = ThisWorkbook.Worksheets("Sanitation Form").Range("A2").value 
Dim EndDate As Date 
EndDate = ThisWorkbook.Worksheets("Sanitation Form").Range("A3").value 

Startrow = ThisWorkbook.Worksheets("Sanitation").Cells.Find(Format(StartDate, "d-mmm-yy"), ThisWorkbook.Worksheets("Sanitation").Range("A1"), xlValues, xlPart, xlByColumns, xlNext, False, False).Row 
Endrow = ThisWorkbook.Worksheets("Sanitation").Cells.Find(Format(EndDate, "d-mmm-yy"), ThisWorkbook.Worksheets("Sanitation").Range("A1"), xlValues, xlPart, xlByColumns, xlNext, False, False).Row 

verwenden und dann in die Zeilen kopieren zwischen