ZIP Code Lookup Template

In this template tutorial, I'm going to show you how to perform a ZIP code lookup. You will be able to enter a ZIP code and have the system return the city and state for that ZIP code (yes, works with most foreign countries too). If it doesn't exist in the database, you will be prompted to add it.

S M L XL FS

Lessons

Database Files

Free Version

Want to learn more about this template and how it's built? The first video above is the FREE TechHelp version of the template and shows how to work with a single city/state for a ZIP code. Click on the download link to get a copy of the FREE template created in the video.

Extended Version

In the Extended Version of this tutorial, if the ZIP code exists but there is only ONE city in the database for that ZIP code, it will return it and populate your customer form. If the ZIP code exists but there are multiple cities, a form will appear allowing the user to select which city to use.

ZIP Code Lookup Template Microsoft Access

You can purchase your copy of this tutorial for just $5.99 by clicking on the button below. You get the full 27 minute extended video tutorial plus an editable template:

Customize For Your Needs

If you would like to discuss customizing this database for your needs, please see my consulting page for details on rates and other information.

Use ZIPLookupF from other forms Link
Ray White
7 months ago

Hi Richard
Question:
On the ZIPLookupF you have the code
    Forms!CustomerF!City = City
    Forms!CustomerF!State = State
    Forms!CustomerF!Country = Country Read More...

Richard Rost
7 months ago

Yeah, that's a limitation of how I built it. A trick I've used to make a form flexible so it can be called from any number of different forms is to store the name of the CALLING form (the form that opened it) in a hidden field on ZipLookupF. So you might have:

Docmd.OpenForm "ZipLookupF"
Forms!ZipLookupF!HiddenCallingFormName = "ClientF"

Now in the ZipLookupF instead of "hard coding" CustomerF, you could say:

Forms(HiddenCallingFormName)!City = City
Forms(HiddenCallingFormName)!State = State

I use this trick in my Calendar Seminar and Templates so that ANY form can call the Calendar popup.

Good question!

Richard Rost
7 months ago

Or to make THAT code even MORE flexible, you could say:

Docmd.OpenForm "ZipLookupF"
Forms!ZipLookupF!HiddenCallingFormName = Me.Name

And now you can just drop that code into ANY form without having to edit the form name.

Show 5 More Replies...

Richard Rost
7 months ago

Basically, there are multiple ways to reference an open form in Access. I've generally taught:

Forms!CustomerF!FirstName

But this is also acceptable, and allows for programmability:

Forms("CustomerF")!FirstName

Ray White
7 months ago

Thanks Richard
I'll try that out.

Richard Rost
7 months ago

My pleasure.

Ray White
7 months ago

That works GREAT.. Thanks Richard
So now I can use my frmZipCodeSelector from any other form.
Just put the HiddenCallingFormName text box on the frmZipCodeSelector and have it hidden.

*********************************************************************
Then in the cmdSet button on the frmZipCodeSelector form:

Private Sub cmdSetZip_Click()
    Forms(HiddenCallingFormName)!City = City
    Forms(HiddenCallingFormName)!State = State
    DoCmd.Close acForm, "frmZipCodeSelector", acSaveYes
End Sub
*************************************************************

This will be in the form that calls the frmZipCodeSelector

Private Sub OpenZIPForm()
    DoCmd.OpenForm "frmZipCodeSelector", , , "ZipCode=""" & ZipCode

Richard Rost
7 months ago

You got it.