Encontra distância entre dois pontos

Esta é uma ferramenta muito útil para Logística.

Você insere uma série de origens e destinos. Pode ser endereço, CEP, cidade, qualquer coisa entendível pelo GMaps. A macro consulta o Google maps para cada linha, e traz a distância e o tempo.

EncontraDist.PNG

Demora um pouco, mas é melhor do que fazer no braço.

Os endereços devem ser entendíveis no GMaps. Se não encontrar, vai voltar um zero.

E o GMaps pode errar também. Se procurar a rua Pernambuco em São Paulo, ele pode retornar a rua São Paulo, em Pernambuco. Portanto, tem que tomar cuidado e não confiar cegamente na informação.

Há um limite de consultas de 2500 consultas diárias por dia no Google Maps, com esta API grátis.

(Atualização em set 2018: O Google mudou a política da API. Agora é necessário abrir uma conta no Google maps.

É só acrescentar o argumento: key=YOUR_KEY no final do link que acessa a API.
Mas é necessário gerar a chave no site do Google e ter uma conta de faturamento.
Contribuição da leitora Lanna Sanches.)

Link para download

Projeto no Github: https://github.com/asgunzi/EncontraDistanciasVBA


Autores:

Arnaldo Gunzi

Maurício Cota

Contribuição: Felipe Allevato


Ideias técnicas com uma pitada de filosofia: https://ideiasesquecidas.com

Ferramentas Excel-VBA: https://ferramentasexcelvba.wordpress.com/

Anúncios

4 comentários sobre “Encontra distância entre dois pontos

  1. Basta inserir nesta linha:

    strAddress = “http://maps.google.com/maps/api/directions/xml?origin=” & swap1 & “,Brasil&destination=” & swap2 & “,Brasil&sensor=false&key=YOUR_KEY”

    Uma dica é copiar e colar um código como este no browser e ver se funciona, modificando o que for necessário.

    Curtir

    1. O Google mudou a API. Agora você vai ter que abrir uma conta no google para usar a API.

      Tendo o código, tem que inserir o mesmo na consulta.

      Basta inserir nesta linha:
      strAddress = “http://maps.google.com/maps/api/directions/xml?origin=” & swap1 & “,Brasil&destination=” & swap2 & “,Brasil&sensor=false&key=YOUR_KEY”

      Uma dica é copiar e colar um código como este no browser e ver se funciona, modificando o que for
      necessário.

      Curtir

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair /  Alterar )

Foto do Google

Você está comentando utilizando sua conta Google. Sair /  Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair /  Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair /  Alterar )

Conectando a %s