'S e prògram cliath-dhuilleag gu math ioma-chruthach a th' ann am Microsoft Excel. Tha e a’ tabhann raon farsaing de ghnìomhan a dhèanamh nach urrainn dhut eadhon smaoineachadh. Faodaidh tu eadhon an astar dràibhidh eadar dà sheòladh obrachadh a-mach ann an Excel. Ma tha liosta de sheòlaidhean agad gus an diofar eatorra a lorg, faodaidh tu MS Excel a chleachdadh gu dearbh. Faodaidh tu cuideachd an astar obrachadh a-mach le làimh. Ach bheir sin cus ùine. Leis gu bheil ceudan de mhìltean de astaran agad airson obrachadh a-mach. Mar sin san artaigil seo, seallaidh mi dhut mar a nì thu obrachadh a-mach an astar dràibhidh eadar dà sheòladh ann an Excel.

Luchdaich sìos Leabhar-obrach Cleachdaidh

Faodaidh tu am faidhle Excel a luchdachadh sìos bhon cheangal a leanas agus cleachd e còmhla ri it.

2 dhòigh èifeachdach air an astar dràibhidh eadar dà sheòladh obrachadh a-mach ann an Excel

1 A' cleachdadh Gnìomhan Trigonometric gus Astar Dràibhidh a thomhas

An seo, seallaidh mi dhut diofar ghnìomhan trigonometric a chur còmhla gus an astar dràibhidh eadar dà sheòladh ann an Excel obrachadh a-mach.

Gus a thoirt seachad thusa eisimpleir, tha mi air dà sheòladh a ghabhail. 'S e a' chiad sheòladh Pàirc MhicArtair, Camden NSW, Astràilia . Is e leud agus domhan-leud 34.06312149 agus -118.2783975 fa leth. 'S e an dàrna seòladh Jersey City, New Jersey, USA . 'S e leud agus domhan-leud a tha ann 40.71799929 agus -74.04276812 fa leth.

A-nis, cuiridh mi còmhla na ACOS , COS , SIN , & Gnìomhan RADIANS gus foirmle a chruthachadh. Obraichidh am foirmle gu h-èifeachdach an astar dràibhidh eadar dà sheòladh ann am mìltean.

Airson sin,

❶ Tagh ceal D8 an toiseach.

❷ An uairsin cuir a-steach an fhoirmle a leanas sa chill.

❸ Às dèidh sin, brùth air a' phutan ENTER .

A-nis, chì thu gu bheil am foirmle air obrachadh a-mach an astar dràibhidh eadar Pàirce MhicArtair, Camden NSW, Astràilia, agus Jersey City, New Jersey, USA ann am mìltean. Mar sin, chì thu an toradh ann an cealla D8 a tha 2445.270922 mìle.

> Briseadh sìos foirmle

• COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – na gnìomhan RADIANS tionndaidh na luachan gu radians agus tha an gnìomh COS a’ toirt seachad cosine nan luachan, tha na cosines airson domhan-leud air an iomadachadh an uairsin. Toradh – 0.365377540842758
• COS(RADIANS(D6-D5)) - a’ toirt seachad luach cosine airson an eadar-dhealachaidh domhan-leud eadar an dà sheòladh. Toradh - 0.716476936499882

• SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – obrachadh a-mach an iomraidh de longitudes bho 90 radian agus ag iomadachadh nan luachan sine. Toradh – 0.627884682513118

• SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-) D5)) – a’ fàs0.627884682513118 * 0.716476936499882 . Toradh – 0.449864893802199

• COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-) C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) - a’ tighinn gu 0.365377540842758 * 0.449864893802199. Toradh – 0.815242434644958

• An uairsin bidh an gnìomh ACOS a’ daingneachadh an luach. Toradh – 0.617648629071256

• Mu dheireadh, ag iomadachadh an luach le 3959 – 0.617648629071256 *3959 bheir sin an toradh ann am mìltean. Toradh – 2445.270922

Leugh Tuilleadh: Mar a nì thu àireamhachadh mhìltean eadar dà sheòladh ann an Excel (2 dhòigh)

2. Obraich a-mach an astar dràibhidh eadar dà sheòladh a' cleachdadh còd VBA

San earrann seo, cleachdaidh mi còd VBA gus gnìomh a tha air a mhìneachadh leis a' chleachdaiche a chruthachadh. An uairsin cleachdaidh mi an gnìomh sin gus obrachadh a-mach an astar dràibhidh eadar dà sheòladh ann an Excel.

An seo, tha mi a’ cleachdadh dà sheòladh. 'S e a' chiad sheòladh Pàirc MhicArtair, Camden NSW, Astràilia . Is e leud agus domhan-leud 34.06312149 agus -118.2783975 fa leth. 'S e an dàrna seòladh Jersey City, New Jersey, USA . Is e leud agus domhan-leud 40.71799929 agus -74.04276812 fa leth.

Aig an aon àm cruthaichidh mi co-chomharran airson gach seòladh. Tha co-chomharran na mheasgachadh de leud agus domhan-leud. Gus co-chomharran a ghineadh,

• Taidhp domhan-leud seòladhan toiseach.
• An uairsin cuir a-steach cromag.
• Às deidh an t-seòrsa sin, bidh an aon sheòladh a’ dol. ,-118.27839753751 . Agus is e co-chomharran an dàrna seòladh 40.7179992930381,-74.0427681204225 .

  

  Feumaidh an còd VBA API 7> de mhapa gus an astar dràibhidh obrachadh a-mach. Tha an API a’ seasamh airson Eadar-aghaidh Prògramadh Iarrtasan. 'S urrainn dhut API a chleachdadh gus Google Map no Mapa Bing a cheangal rud sam bith as fheàrr leat.

  Ach cruthaich Google Tha Map API air a phàigheadh. Air an làimh eile, 's urrainn dhut API den Bing MAP a chruthachadh saor an-asgaidh.

  Mar sin, tha mi a' cleachdadh Bing MAP API 7> an seo.

  • Gus Bing MAP API an-asgaidh a chruthachadh , cliog an seo .

  Tha mi air faidhle a chruthachadh API . Tha mi a' ceangal an API gu h-ìosal:

  AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

  

  A-nis, tha an t-àm ann an <1 a sgrìobhadh 6> Còd VBA . Airson sin,

  • Brùth ALT + F11 gus an Deasaiche VBA fhosgladh.
  • A-nis theirig gu Cuir a-steach ➤ Modal gus modal ùr fhosgladh.

  

  An dèidh dhut an Deasaiche VBA fhosgladh, cuir a-steach a leanas Còd VBA sa mhodal a chaidh fhosgladh.

  2121

  

  Briseadh sìos a’ Chòd

• An-seo , tha mi air gnìomh a chaidh a mhìneachadh leis a’ chleachdaiche a chruthachadh air a bheil Driving_Distance.
• An uairsin chleachd mi 3 paramadairean: àite tòiseachaidh , ceann-uidhe ,agus luach iuchrach. Seo suidheachadh an dà sheòladh agus an luach API fa leth.
• Chleachd mi an uair sin grunn chaochladairean leithid First_Value , Dara_Luach , Luach_mu dheireadh , mitHTTP , & mitUrl. Tha na caochladairean seo gan cleachdadh gus diofar luachan a stòradh.
• An uairsin thug iad còmhla na luachan (stòradh am broinn mitUrl ) agus chleachd sinn grunn dhòighean nì ( Fosgail , SetRequestHeader , Send ). Seo mar a chaidh agam air an astar dràibhidh obrachadh a-mach tron ​​ API .

Tha an còd VBA seo a’ gineadh gnìomh a tha air a mhìneachadh leis a’ chleachdaiche air a bheil Driving_Distance .

Tha feum aig a' ghnìomh Driving_Distance 3 argamaidean uile gu lèir.

Seo co-chàradh coitcheann a' ghnìomh Driving_Distance .

A-nis, tha an t-àm ann an gnìomh a chaidh a shònrachadh leis a' chleachdaiche a chur an sàs. Airson sin,

• Tagh cealla E10 .
• An uairsin cuir a-steach am foirmle a leanas:

• A-nis, brùth ENTER .

Briseadh Foirmle