Excel VBA: Fetch Google Map latitude, longitude by clicking -


this have done: have show google map in excel or browser using address or location or latitude , longitude showing in ie or default browser , tried in ms web browser component in excel opening in compatibility mode. tried microsoft power map required installation.

i need on: opened map need select location/address need latitude , longitude value update in excel sheet.

in addition simple way, need send latitude , longitude google map , same time need receive latitude , longitude map clicking map. in excel web browser no scripts running.

to solve you'll have overcome 2 obstacles:

  1. find event on webbrowser control fires when browser loaded new url.
  2. parse lat , long url

thankfully, google's newer map's url super friendly parsing... , microsoft's webbrowser control has nice hooks built in.

you have code looks like:

sub webbrowsergo()     webbrowser1.navigate2 ("https://www.google.com/maps/@39.1240533,-79.8562553,16z") end sub

that send web browser control somewhere in west virginia, think.

now, in worksheet's vba code, can use webbrowser_navigatecomplete2 event hook in. event fire once url has loaded. if moves map or changes zoom.

in worksheet's vba code, hit first drop down box @ top of vbe , choose webbrowser control (probably named webbrowser1 or something). in second drop down box, find navigatecomplete2 event.

it looks like:

enter image description here

your vbe make new sub , can add following:

private sub webbrowser1_navigatecomplete2(byval pdisp object, url variant)     debug.print "navigation complete, url=" & url      dim strlat string, strlong string      strlat = split(url, "@")(1)     strlat = split(strlat, ",")(0)      strlong = split(url, ",")(1)      debug.print strlat, strlong         end sub

so, pretty simple stuff. use navigate2complete event of webbrowser control fires every time webcontrol updates, , has nice parameter called url contains url loaded webbrowser control. use split() parse , grab lat , long.

debug.print writes out variables vbe's immediate window. go view>>immediate window turn on if don't have already. obviously, can change push lat , long worksheet or something.


Comments

Post a Comment

Popular posts from this blog

Redirect to a HTTPS version using .htaccess -

i need modify .htaccess file redirect urls https version without "www". http://example.com --> https://example.com http://www.example.com --> https://example.com https://www.example.com --> https://example.com this how .htaccess file looks like: rewriteengine on rewritecond %{request_filename} !-d rewritecond %{request_filename} !-f rewriterule ^(.*)$ redirect.php?id=$1&page=$2 [qsa,l] what modifications need make .htaccess in order forward https without "www"? it depends on doing current code. looks file called redirect trying display php page seo friendly url. think might confusing people. anyway, need , force https without www, need 1 more rule above. also second rule needs two capture groups in rewriterule test string because wanting 2 different values using $1 , $2 references. rewriteengine on #rediect www non www and/or http https --- combinations. rewritecond %{http_host} !^example\.com [nc,or] rewritecond %{https} !^...
Read more

Unlimited choices in BASH case statement -

consider simple bash snippet: case $option in 1) image=${options[0]%.tar} ;; 2) image=${options[1]%.tar} ;; 3) image=${options[2]%.tar} ;; 4) image=${options[3]%.tar} ;; *) echo "invalid option" exit 1 esac in real script numbers goes 30. makes pretty long. can somehow specify cases variable? something this: case $option in $i) image=${options[$(($i-1))]%.tar} any pointer appreciated. you can match against multiple patterns in single clause: case $option in 1|2|3: echo "$option one, 2 or three" ;; esac if still typing you, can use simple pattern matching: case $option in # following matches # - single-digit numbers 0-9 # - two-digit numbers starting either 1 or 2 # - number 30 [0-9]|[12][0-9]|30) image=${options[$(($option-1))]%.tar} ;; *) echo "invalid option" 1>&2 exit 1 esac
Read more

javascript - jQuery: Add class depending on URL in the best way -

i have html progress meter: <div class="col-md-3" style="margin-left: -20px;"> <div class="progress-pos active" id="progess-1"> <div class="progress-pos-inner"> login </div> </div> </div> <div class="col-md-3 progress-pos-container"> <div class="progress-pos" id="progess-2"> <div class="progress-pos-inner"> scan items </div> </div> </div> <div class="col-md-3 progress-pos-container"> <div class="progress-pos" id="progess-3"> <div class="progress-pos-inner"> confirm address </div> </div> </div> <div class="col-md-3 progress-pos-container"> <div class="progress-pos" id="progess-4"> <div class="progress-pos-in...
Read more