Your zip codes are in A1:A1000
Your district numbers and zip codes are in C1:L100, with the district numbers in A1:L1
Right click the sheet tab for the sheet that contains your data, choose view code and paste this code in.
Adjust your ranges to match your actual data ranges and run it.
'Loop through zip code list
For Each Zip In Range("A1:A1000")
'Find Zip in District table
Set District = .Find(Zip, lookat:=xlWhole)
'If found, put value from Row 1 in Column B
If Not District Is Nothing Then _
Zip.Offset(0, 1) = Cells(1, District.Column)