postnumre et numerisk system til mærkning geografiske regioner i USA . ZIP er en forkortelse , der står for Zone Improvement Plan , en henvisning til den idé, at bruge de fem cifrede numre ville øge effektiviteten i at levere post i hele landet. Det er nyttigt at finde afstanden mellem to givne postnumre til en lang række formål, herunder rejseplanlægning, og logistik. Ofte vil regneark indeholde data som rejseplaner , som har postnumre , så det kan være nyttigt at beregne disse afstande ved hjælp af de fastsatte postnumre . Instruktioner
1
Erklær variable for postnumre , du ønsker at finde afstanden mellem ved at skrive følgende kode i toppen af din VBA -program : Hej
Set zip1 = " 12345 " < br >
Set zip2 = " 54321 "
2
Indtast følgende kode under dit postnummer værdier erklæring : Hej
Set objHTTP = CreateObject ( " MSXML2.ServerXMLHTTP " ) < br >
URL = " http://maps.google.com/maps/nav?output=js&oe=utf8&q=from : " & zip1 & " + til : " & zip2
objHTTP.Open " GET" , URL, False
objHTTP.setRequestHeader "User -Agent ", " Mozilla/4.0 ( compatible; MSIE 6.0; Windows NT 5.0 ) "
objHTTP.send ("")
3
Tryk F5 for at køre din makro og returnere afstanden mellem de to postnumre .