¡Hola! Vengo a este foro buscando un poco de ayuda. Tengo una macro que me saca las coordenadas para una dirección dada utilizando la API de Google Maps. Funcionaba perfectamente hasta hoy, que en vez de devolverme las coordenadas me lo devuelve en blanco. He pensado que quizás me había excedido en las consultas, así que he generado una nueva key de la API, pero aún así el resultado es el mismo. Lo curioso es que si cambio la key y selecciono pocos registros (5-6) me funciona, y si lo vuelvo a hacer para otros pocos registros ya no me funciona... Y no entiendo nada. No se si me podéis echar una manita. Sub LocalizaeRam() On Error Resume Next Dim objXML As Object Dim strData As String Dim strResponse As String 'Dim domResponse As DOMDocument60 Dim i As Integer Dim erg As String myAltura = Selection.Rows.Count For i = 1 To myAltura 'Abre diccionario erg = ActiveCell strData = myURLEncode(erg) 'Cierra diccionario Set objXML = CreateObject("MSXML2.XMLHTTP") objXML.Open "POST", "https://maps.googleapis.com/maps/api/geocode/xml?sensor=false&address=" & strData & "&key=KEY", False objXML.send strResponse = objXML.responseText myLength = Len(strResponse) posx0 = InStr(strResponse, " ") + 5 posx1 = InStr(strResponse, " ") posx = Mid(strResponse, posx0, posx1 - posx0) posy0 = InStr(strResponse, " ") + 5 posy1 = InStr(strResponse, " ") posy = Mid(strResponse, posy0, posy1 - posy0) posAdd0 = InStr(strResponse, " ") + 19 posAdd1 = InStr(strResponse, " ") posAdd = Mid(strResponse, posAdd0, posAdd1 - posAdd0) ActiveCell.Offset(0, 1) = posx ActiveCell.Offset(0, 2) = posy ActiveCell.Offset(0, 3) = posx & "," & posy ActiveCell.Offset(0, 4) = posAdd ActiveCell.Offset(1, 0).Select Next i End Sub

Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis Ingresar

JavaScript está desactivado. Para una mejor experiencia, por favor active JavaScript en su navegador antes de continuar.

Macro Google Maps ha dejado de funcionar

Autor del tema pin_eipol
Fecha de inicio 26 Nov 2018

pin_eipol

New member

26 Nov 2018

¡Hola!
Vengo a este foro buscando un poco de ayuda.

Tengo una macro que me saca las coordenadas para una dirección dada utilizando la API de Google Maps. Funcionaba perfectamente hasta hoy, que...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

Iniciar sesión o registrarme para responder aquí.

Temas similares

Pregunta

Pago por alguien que me haga una fórmula o Macro (Google Sheet)

Respuestas: 0

29 Jun 2024

KERO

Pregunta

Waypoint en macro de Google Earth para Excel

Respuestas: 8

5 Mar 2014

ferherlo

Pregunta

Macro Coordenadas Excel a Google Earth?

Respuestas: 5

3 Jun 2021

Macro Antonio

Pregunta

macro excelx-google earth

Respuestas: 2

6 Oct 2012

panini

Pregunta

Macro

Respuestas: 3

Lunes a la(s) 16:43

Leopoldo Blancas

Resuelto

Macro para hacer una fórmula de Buscar

Respuestas: 6

Miércoles a la(s) 14:11

Marielos Gil

Resuelto

Macro demasiado grande y pesada.

Respuestas: 8

4 Ago 2026

Leopoldo Blancas

Pregunta

Liberar memoria en macro

Respuestas: 2

8 Jul 2026

jeandro

Pregunta

Ejecución de macro 2 incidencias

Respuestas: 12

14 Jul 2026

jelsir79

Pregunta

Ayuda con Macro Excel

Respuestas: 2

1 Jul 2026

Leopoldo Blancas

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Correo electrónico Enlace

Bienvenido a nuestro foro Excel 👋

Tenemos 135.000 usuarios registrados,
y 240.000 preguntas y respuestas Excel.

Primero 👉 regístrate gratis aquí 👈
para ver contenidos y descargas
sin restricciones!

Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.

Aceptar Saber más…

Volver

Arriba