วิธีการคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel

  • แบ่งปันสิ่งนี้
Hugh West

Microsoft Excel เป็นโปรแกรมสเปรดชีตที่หลากหลายมาก มันเสนอการทำงานที่หลากหลายที่คุณไม่สามารถจินตนาการได้ คุณยังสามารถคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel หากคุณมีรายการที่อยู่เพื่อค้นหาความแตกต่างระหว่างที่อยู่ คุณสามารถใช้ MS Excel ได้ คุณยังสามารถคำนวณระยะทางด้วยตนเองได้อีกด้วย แต่นั่นจะใช้เวลานานเกินไป ในขณะที่คุณคำนวณระยะทางนับแสน ดังนั้นในบทความนี้ ผมจะแสดงวิธีการคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel

ดาวน์โหลดแบบฝึกหัดแบบฝึกหัด

คุณสามารถดาวน์โหลดไฟล์ Excel ได้จากลิงก์ต่อไปนี้และแบบฝึกหัดพร้อมกับ it.

คำนวณระยะทางขับรถระหว่างสองที่อยู่.xlsm

2 วิธีที่มีประสิทธิภาพในการคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel

1 การใช้ฟังก์ชันตรีโกณมิติเพื่อคำนวณระยะทางขับรถ

ที่นี่ ฉันจะแสดงให้คุณรวม ฟังก์ชันตรีโกณมิติที่แตกต่างกัน เพื่อคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel

เพื่อให้ คุณยกตัวอย่าง ฉันได้รับสองที่อยู่ ที่อยู่แรกคือ MacArthur Park, Camden NSW, Australia ละติจูดและลองจิจูดคือ 34.06312149 และ -118.2783975 ตามลำดับ ที่อยู่ที่สองคือ เจอร์ซีย์ซิตี รัฐนิวเจอร์ซีย์ สหรัฐอเมริกา ละติจูดและลองจิจูดคือ 40.71799929 และ -74.04276812 ตามลำดับ

ตอนนี้ ฉันจะรวม ACOS , COS , SIN , & RADIANS ทำหน้าที่สร้างสูตร สูตรจะคำนวณระยะทางขับรถระหว่างที่อยู่สองแห่งในหน่วยไมล์ได้อย่างมีประสิทธิภาพ

ด้วยเหตุนี้

❶ เลือกเซลล์ D8 ก่อน

❷ จากนั้นแทรก สูตรต่อไปนี้ในเซลล์

=ACOS(COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) * COS(RADIANS(D6-D5))) *3959

❸ หลังจากนั้น กดปุ่ม ENTER

ตอนนี้ คุณจะเห็นว่าสูตรได้คำนวณระยะทางขับรถระหว่าง MacArthur Park, Camden NSW, Australia, และ Jersey City, New Jersey, USA ในหน่วยไมล์ ดังนั้น คุณจะเห็นผลลัพธ์ในเซลล์ D8 ซึ่งเท่ากับ 2445.270922 ไมล์

รายละเอียดสูตร

  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – ฟังก์ชัน RADIANS แปลงค่าเป็นเรเดียนและฟังก์ชัน COS จัดเตรียมโคไซน์ของค่า จากนั้นจึงคูณโคไซน์สำหรับละติจูด เอาต์พุต – 0.365377540842758
  • COS(RADIANS(D6-D5)) – ให้ค่าโคไซน์สำหรับความแตกต่างของลองจิจูดระหว่างสองแอดเดรส เอาต์พุต – 0.716476936499882
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – คำนวณการผัน ของลองจิจูดจาก 90 เรเดียน แล้วคูณค่าไซน์ เอาต์พุต – 0.627884682513118
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6- D5)) – กลายเป็น0.627884682513118 * 0.716476936499882. เอาต์พุต – 0.449864893802199
  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90- C6)) *SIN(เรเดียน(90-C5)) *COS(เรเดียน(D6-D5)) – กลายเป็น 0.365377540842758 * 0.449864893802199 เอาต์พุต – 0.815242434644958
  • จากนั้น ACOS ฟังก์ชัน arccosine จะกำหนดค่า เอาต์พุต – 0.617648629071256
  • สุดท้าย คูณค่าด้วย 3959 – 0.617648629071256 *3959 จะได้ผลลัพธ์เป็นไมล์ เอาต์พุต – 2445.270922

อ่านเพิ่มเติม: วิธีคำนวณไมล์ระหว่างสองที่อยู่ใน Excel (2 วิธี)

2. คำนวณระยะทางขับรถระหว่างสองที่อยู่โดยใช้โค้ด VBA

ในส่วนนี้ ฉันจะใช้โค้ด VBA เพื่อสร้างฟังก์ชันที่ผู้ใช้กำหนด จากนั้นฉันจะใช้ฟังก์ชันนั้นเพื่อคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel

ที่นี่ ฉันกำลังใช้ที่อยู่สองแห่ง ที่อยู่แรกคือ MacArthur Park, Camden NSW, Australia ละติจูดและลองจิจูดคือ 34.06312149 และ -118.2783975 ตามลำดับ ที่อยู่ที่สองคือ เจอร์ซีย์ซิตี รัฐนิวเจอร์ซีย์ สหรัฐอเมริกา ละติจูดและลองจิจูดคือ 40.71799929 และ -74.04276812 ตามลำดับ

ที่ I จะสร้างพิกัดสำหรับแต่ละที่อยู่ พิกัดคือการรวมกันของละติจูดและลองจิจูด หากต้องการสร้างพิกัด

  • พิมพ์ละติจูดของที่อยู่ก่อน
  • จากนั้นใส่เครื่องหมายจุลภาค
  • หลังจากนั้นพิมพ์ลองจิจูดของแอดเดรสเดียวกัน

ดังนั้นพิกัดของแอดเดรสแรกคือ 34.0631214903094 ,-118.27839753751 . และพิกัดของแอดเดรสที่สองคือ 40.7179992930381, -74.0427681204225 .

โค้ด VBA ต้องใช้ API ของแผนที่เพื่อคำนวณระยะทางในการขับขี่ API ย่อมาจาก Application Programming Interface คุณสามารถใช้ API เพื่อเชื่อมต่อกับ Google Map หรือ Bing Map ตามที่คุณต้องการ

แต่การสร้าง Google แผนที่ API จ่ายแล้ว ในทางตรงกันข้าม คุณสามารถสร้าง API ของ Bing MAP ได้ฟรี

ดังนั้น ฉันจึงใช้ Bing MAP API ที่นี่

  • หากต้องการสร้าง Bing MAP API ฟรี คลิกที่นี่

ฉันได้สร้าง API . ฉันกำลังแนบ API ด้านล่าง:

AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

ตอนนี้ ได้เวลาเขียน รหัส VBA สำหรับสิ่งนั้น

  • กด ALT + F11 เพื่อเปิด ตัวแก้ไข VBA
  • ตอนนี้ไปที่ แทรก โมดูล เพื่อเปิดโมดูลใหม่

หลังจากเปิด ตัวแก้ไข VBA ให้ใส่ ต่อไปนี้ VBA รหัสในโมดูลที่เปิดอยู่

9980

รายละเอียดรหัส

  • ที่นี่ ฉันได้สร้างฟังก์ชันที่ผู้ใช้กำหนดชื่อ Driving_Distance
  • จากนั้นฉันใช้พารามิเตอร์ 3 ตัว: ตำแหน่งเริ่มต้น , ปลายทาง ,และ ค่าคีย์ นี่คือตำแหน่งของที่อยู่ทั้งสองและค่า API ตามลำดับ
  • จากนั้นฉันใช้ตัวแปรหลายตัว เช่น First_Value , Second_Value , Last_value , mitHTTP , & mitUrl. ตัวแปรเหล่านี้ใช้เพื่อเก็บค่าต่างๆ
  • จากนั้นจึงรวมค่า (เก็บไว้ภายใน mitUrl ) และใช้วิธีอ็อบเจกต์ต่างๆ ( เปิด , SetRequestHeader , ส่ง ) นี่คือวิธีที่ฉันจัดการเพื่อคำนวณระยะทางการขับขี่ผ่าน API

โค้ด VBA นี้สร้างฟังก์ชันที่ผู้ใช้กำหนดซึ่งเรียกว่า Driving_Distance .

ฟังก์ชัน Driving_Distance ต้องการ 3 อาร์กิวเมนต์ ทั้งหมด

นี่คือไวยากรณ์ทั่วไปของฟังก์ชัน Driving_Distance .

=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)

ตอนนี้ ได้เวลาใช้ฟังก์ชันที่ผู้ใช้กำหนด สำหรับสิ่งนั้น

  • เลือกเซลล์ E10 .
  • จากนั้นใส่สูตรต่อไปนี้:
=Driving_Distance(E5,E6,C8)

  • ตอนนี้ กด ENTER .

รายละเอียดสูตร

  • E5 คือ Start_Location_Coordinate .
  • E6 คือ End_Location_Coordinate .
  • C8 คือ API ของ Bing MAP

ฟังก์ชันจะคำนวณ ระยะทางขับรถระหว่างสองที่อยู่เป็นไมล์ ตรวจสอบเซลล์ E10 จะเห็นตัวเลข 2790 .

ดังนั้นระยะทางขับรถระหว่าง สวนแมคอาเธอร์Camden NSW, ออสเตรเลีย, และ เจอร์ซีย์ซิตี้, นิวเจอร์ซีย์, สหรัฐอเมริกา คือ 2,790 ไมล์

อ่านเพิ่มเติม: วิธีคำนวณระยะห่างระหว่างที่อยู่สองแห่งใน Excel (3 วิธี)

ส่วนการปฏิบัติ

คุณจะได้รับแผ่นงาน Excel เช่นภาพหน้าจอต่อไปนี้ ที่ส่วนท้ายของไฟล์ Excel ที่ให้มา ซึ่งคุณสามารถฝึกฝนวิธีการทั้งหมดที่กล่าวถึงในบทความนี้

สรุป

โดยสรุป ฉันได้กล่าวถึง 2 วิธีคำนวณระยะทางขับรถระหว่างสองที่อยู่ใน Excel และอย่าลังเลที่จะถามคำถามใด ๆ ในส่วนความคิดเห็นด้านล่าง เราจะพยายามตอบคำถามที่เกี่ยวข้องทั้งหมดโดยเร็วที่สุด และโปรดเยี่ยมชมเว็บไซต์ของเรา Exceldemy เพื่อสำรวจเพิ่มเติม

Hugh West เป็นผู้ฝึกอบรมและนักวิเคราะห์ Excel ที่มีประสบการณ์สูงและมีประสบการณ์มากกว่า 10 ปีในอุตสาหกรรมนี้ เขาสำเร็จการศึกษาระดับปริญญาตรีสาขาการบัญชีและการเงิน และปริญญาโทสาขาบริหารธุรกิจ Hugh มีความหลงใหลในการสอนและได้พัฒนาแนวทางการสอนที่เป็นเอกลักษณ์ซึ่งง่ายต่อการติดตามและเข้าใจ ความรู้ความเชี่ยวชาญของเขาเกี่ยวกับ Excel ช่วยให้นักเรียนและผู้เชี่ยวชาญหลายพันคนทั่วโลกพัฒนาทักษะและความเป็นเลิศในอาชีพการงาน ฮิวจ์แบ่งปันความรู้ของเขากับคนทั้งโลกผ่านบล็อก โดยเสนอบทช่วยสอน Excel ฟรีและการฝึกอบรมออนไลน์เพื่อช่วยให้บุคคลและธุรกิจบรรลุศักยภาพสูงสุดของตนเอง