A header like a print header?

You have to do it manually or use a macro.

Rightclick on the Excel icon to the left of the File dropdown on the worksheet
menu bar.
Select view code and paste this into the code window:

Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
   Dim myMin As Date
   Dim myMax As Date
   Dim myStr As String
   Dim myRng As Range
   
   With Worksheets("sheet9999")
       Set myRng = .Range("a:a")
       myMin = Application.Min(myRng)
       myMax = Application.Max(myRng)
       myStr = "Date Range: " & Format(myMin, "mm/dd/yyyy") _
                  & " - " & Format(myMax, "mm/dd/yyyy")
       .PageSetup.LeftHeader = myStr
   End With
End Sub

Change sheet9999 to the correct name.