software

Does anyone know of an add-in that will return a valid zip code when
given a street address, city and state?--
GoFigure
------------------------------------------------------------------------
GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
View this thread: www.excelforum.com/showthread...hreadid=493332I would have thought the UPS web page was better suited for this job.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

quot;GoFigurequot; gt; wrote in
message ...
gt;
gt; Does anyone know of an add-in that will return a valid zip code when
gt; given a street address, city and state?
gt;
gt;
gt; --
gt; GoFigure
gt; ------------------------------------------------------------------------
gt; GoFigure's Profile:
www.excelforum.com/member.php...foamp;userid=4274
gt; View this thread: www.excelforum.com/showthread...hreadid=493332
gt;

Sure but if one has many addresses (20 - 100) and one does this on a
weekly basis, it becomes a tedious time-waster.

- Al

Bob Phillips Wrote:
gt; I would have thought the UPS web page was better suited for this job.
gt;
gt; --
gt; HTH
gt;
gt; Bob Phillips
gt;
gt;--
GoFigure
------------------------------------------------------------------------
GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
View this thread: www.excelforum.com/showthread...hreadid=493332MS's MapPoint can lookup zip codes. Of course I don't expect you have it
but if you were desperate enough...

Sub TestShowZip()
Dim Street As String
Dim City As String
Dim State As String
Street = quot;417 Robinsonquot;
City = quot;North Tonawandaquot;
State = quot;NYquot;
ShowZip Street, City, State
End Sub

Sub ShowZip(Street As String, City As String, State As String)
Dim MApp As MapPoint.Application
Dim MMap As MapPoint.Map
Dim Loc As MapPoint.Location
Set MApp = New MapPoint.Application
Set MMap = MApp.ActiveMap
Set Loc = MMap.FindAddress(Street, City, State)
If Not Loc Is Nothing Then _
MsgBox Loc.StreetAddress.PostalCode
End Sub--
Jim
quot;GoFigurequot; gt; wrote in
message ...
|
| Sure but if one has many addresses (20 - 100) and one does this on a
| weekly basis, it becomes a tedious time-waster.
|
| - Al
|
| Bob Phillips Wrote:
| gt; I would have thought the UPS web page was better suited for this job.
| gt;
| gt; --
| gt; HTH
| gt;
| gt; Bob Phillips
| gt;
| gt;
|
|
| --
| GoFigure
| ------------------------------------------------------------------------
| GoFigure's Profile:
www.excelforum.com/member.php...foamp;userid=4274
| View this thread: www.excelforum.com/showthread...hreadid=493332
|
I have a worksheet here at work which does this. Let me know if you would
like mailed or forwarded.

NMG

quot;Jim Rechquot; wrote:

gt; MS's MapPoint can lookup zip codes. Of course I don't expect you have it
gt; but if you were desperate enough...
gt;
gt; Sub TestShowZip()
gt; Dim Street As String
gt; Dim City As String
gt; Dim State As String
gt; Street = quot;417 Robinsonquot;
gt; City = quot;North Tonawandaquot;
gt; State = quot;NYquot;
gt; ShowZip Street, City, State
gt; End Sub
gt;
gt; Sub ShowZip(Street As String, City As String, State As String)
gt; Dim MApp As MapPoint.Application
gt; Dim MMap As MapPoint.Map
gt; Dim Loc As MapPoint.Location
gt; Set MApp = New MapPoint.Application
gt; Set MMap = MApp.ActiveMap
gt; Set Loc = MMap.FindAddress(Street, City, State)
gt; If Not Loc Is Nothing Then _
gt; MsgBox Loc.StreetAddress.PostalCode
gt; End Sub
gt;
gt;
gt; --
gt; Jim
gt; quot;GoFigurequot; gt; wrote in
gt; message ...
gt; |
gt; | Sure but if one has many addresses (20 - 100) and one does this on a
gt; | weekly basis, it becomes a tedious time-waster.
gt; |
gt; | - Al
gt; |
gt; | Bob Phillips Wrote:
gt; | gt; I would have thought the UPS web page was better suited for this job.
gt; | gt;
gt; | gt; --
gt; | gt; HTH
gt; | gt;
gt; | gt; Bob Phillips
gt; | gt;
gt; | gt;
gt; |
gt; |
gt; | --
gt; | GoFigure
gt; | ------------------------------------------------------------------------
gt; | GoFigure's Profile:
gt; www.excelforum.com/member.php...foamp;userid=4274
gt; | View this thread: www.excelforum.com/showthread...hreadid=493332
gt; |
gt;
gt;
gt;


Neil, if you'd be so kind to email it '
), I'd like to take a look at it.

Jim, yes, I do have MapPoint. I bought it because I thought it'd be
better than Streets amp; Trips. Was I disappointed.

Thanks,

- Al--
GoFigure
------------------------------------------------------------------------
GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
View this thread: www.excelforum.com/showthread...hreadid=493332gt;gt;I do have MapPoint.

How about that? I forgot to mention that you have to set a reference to
MapPoint under Tools, References in the VBE to run my code.

--
Jim
quot;GoFigurequot; gt; wrote in
message ...
|
| Neil, if you'd be so kind to email it '
| ), I'd like to take a look at it.
|
| Jim, yes, I do have MapPoint. I bought it because I thought it'd be
| better than Streets amp; Trips. Was I disappointed.
|
| Thanks,
|
| - Al
|
|
| --
| GoFigure
| ------------------------------------------------------------------------
| GoFigure's Profile:
www.excelforum.com/member.php...foamp;userid=4274
| View this thread: www.excelforum.com/showthread...hreadid=493332
|

Thanks, Jim.

- Al

Jim Rech Wrote:
gt; gt;gt;I do have MapPoint.
gt;
gt; How about that? I forgot to mention that you have to set a reference
gt; to
gt; MapPoint under Tools, References in the VBE to run my code.
gt;
gt; --
gt; Jim--
GoFigure
------------------------------------------------------------------------
GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
View this thread: www.excelforum.com/showthread...hreadid=493332Hi,
Took another look at mine and it doesn't drill down to individual address
level, just area, county, state etc. Sorry!

quot;GoFigurequot; wrote:

gt;
gt; Thanks, Jim.
gt;
gt; - Al
gt;
gt; Jim Rech Wrote:
gt; gt; gt;gt;I do have MapPoint.
gt; gt;
gt; gt; How about that? I forgot to mention that you have to set a reference
gt; gt; to
gt; gt; MapPoint under Tools, References in the VBE to run my code.
gt; gt;
gt; gt; --
gt; gt; Jim
gt;
gt;
gt; --
gt; GoFigure
gt; ------------------------------------------------------------------------
gt; GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
gt; View this thread: www.excelforum.com/showthread...hreadid=493332
gt;
gt;


Thanks anyway for your offer Neil.

- Al

Neil Mitchell-Goodson Wrote:
gt; Hi,
gt; Took another look at mine and it doesn't drill down to individual
gt; address
gt; level, just area, county, state etc. Sorry!
gt;--
GoFigure
------------------------------------------------------------------------
GoFigure's Profile: www.excelforum.com/member.php...foamp;userid=4274
View this thread: www.excelforum.com/showthread...hreadid=493332