Ecco la macro che ho utilizzato per cercare la città e copiare solo le righe (che contengono il nome della città inserita) nel foglio 2:

Sub cerca()
Sheets("Foglio1").Select
Set Rng = ActiveSheet.Range("D11200")
riga = 1
citta = Application.InputBox("", "Inserisci la città", "")
If citta <> False Then
'citta = UCase(citta)

For Each cell In Rng.Cells
If cell.Value = citta Then
Rows(cell.Row).Select
Selection.Copy
Sheets("Foglio2").Select
Rows(riga).Select
ActiveSheet.Paste
Sheets("Foglio1").Select
riga = riga + 1
End If

Sulla falsariga di questa
Next
End If
Application.Goto Reference:="Cerca"
End Sub

Quello che non riesco a fare è la stessa cosa ma con le date.
Inserita una data di partenza e di fine (attraverso la imput box) che la macro mi copi tutte le righe comprese tra le due date.
Spero di essere stato più chiaro.
Grazie.