Mục lục
Microsoft Excel là một chương trình bảng tính rất linh hoạt. Nó cung cấp để thực hiện một loạt các nhiệm vụ mà bạn thậm chí không thể tưởng tượng được. Bạn thậm chí có thể tính khoảng cách lái xe giữa hai địa chỉ trong Excel. Nếu bạn có một danh sách các địa chỉ để tìm sự khác biệt giữa chúng, tất nhiên bạn có thể sử dụng MS Excel. Bạn cũng có thể tính toán khoảng cách bằng tay. Nhưng điều đó sẽ quá tốn thời gian. Như bạn có hàng trăm hàng ngàn khoảng cách để tính toán. Vì vậy, trong bài viết này, tôi sẽ hướng dẫn các bạn cách tính khoảng cách lái xe giữa hai địa chỉ trong Excel.
Tải sách bài tập thực hành
Bạn có thể tải file Excel theo link sau và thực hành cùng it.
Tính khoảng cách lái xe giữa hai địa chỉ.xlsm
2 cách hiệu quả để tính khoảng cách lái xe giữa hai địa chỉ trong Excel
1 .Sử Dụng Các Hàm Lượng Giác Để Tính Khoảng Cách Lái Xe
Sau đây, tôi sẽ chỉ cho bạn cách kết hợp các hàm lượng giác khác nhau để tính khoảng cách lái xe giữa hai địa chỉ trong Excel.
Để cung cấp bạn là một ví dụ, tôi đã lấy hai địa chỉ. Địa chỉ đầu tiên là MacArthur Park, Camden NSW, Australia . Vĩ độ và kinh độ của nó lần lượt là 34.06312149 và -118.2783975 . Địa chỉ thứ hai là Thành phố Jersey, New Jersey, Hoa Kỳ . Vĩ độ và kinh độ của nó là 40.71799929 và -74.04276812 tương ứng.
Bây giờ, tôi sẽ kết hợp ACOS , COS , SIN , & RADIANS các hàm để tạo công thức. Công thức sẽ tính toán hiệu quả khoảng cách lái xe giữa hai địa chỉ theo dặm.
Để làm được điều đó,
❶ Trước tiên, hãy chọn ô D8 .
❷ Sau đó chèn công thức sau trong ô.
=ACOS(COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) * COS(RADIANS(D6-D5))) *3959
❸ Sau đó, nhấn nút ENTER .
Bây giờ, bạn sẽ thấy rằng công thức đã tính toán khoảng cách lái xe giữa MacArthur Park, Camden NSW, Australia, và Jersey City, New Jersey, USA tính bằng dặm. Như vậy, bạn sẽ thấy kết quả ở ô D8 là 2445.270922 miles.
Phân tích công thức
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – các hàm RADIANS chuyển đổi các giá trị thành radian và hàm COS cung cấp cosin của các giá trị, sau đó cosin cho vĩ độ được nhân lên. Đầu ra – 0.365377540842758
- COS(RADIANS(D6-D5)) – cung cấp giá trị cosin cho chênh lệch kinh độ giữa hai địa chỉ. Đầu ra – 0,716476936499882
- SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – tính toán chuyển hướng của kinh độ từ 90 radian và nhân các giá trị sin. Đầu ra – 0.627884682513118
- SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6- D5)) – trở thành0,627884682513118 * 0,716476936499882. Đầu ra – 0,449864893802199
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-C5) C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) – trở thành 0,365377540842758 * 0,449864893802199. Đầu ra – 0,815242434644958
- Sau đó, hàm ACOS tạo ra giá trị. Đầu ra – 0,617648629071256
- Cuối cùng, nhân giá trị với 3959 – 0,617648629071256 *3959 sẽ cho kết quả tính bằng dặm. Đầu ra – 2445.270922
Đọc thêm: Cách tính số dặm giữa hai địa chỉ trong Excel (2 phương pháp)
2. Tính khoảng cách lái xe giữa hai địa chỉ bằng mã VBA
Trong phần này, tôi sẽ sử dụng mã VBA để tạo hàm do người dùng xác định. Sau đó, tôi sẽ sử dụng hàm đó để tính khoảng cách lái xe giữa hai địa chỉ trong Excel.
Ở đây, tôi đang sử dụng hai địa chỉ. Địa chỉ đầu tiên là MacArthur Park, Camden NSW, Australia . Vĩ độ và kinh độ của nó lần lượt là 34.06312149 và -118.2783975 . Địa chỉ thứ hai là Thành phố Jersey, New Jersey, Hoa Kỳ . Kinh độ và vĩ độ của nó lần lượt là 40,71799929 và -74,04276812 .
Tại đây, tôi sẽ tạo tọa độ cho từng địa chỉ. Một tọa độ là sự kết hợp của vĩ độ và kinh độ. Để tạo tọa độ,
- Nhập vĩ độ của địa chỉđầu tiên.
- Sau đó chèn dấu phẩy.
- Sau đó nhập kinh độ của cùng một địa chỉ.
Vậy tọa độ của địa chỉ đầu tiên là 34.0631214903094 ,-118.27839753751 . Và tọa độ của địa chỉ thứ hai là 40.7179992930381,-74.0427681204225 .
Mã VBA yêu cầu API của bản đồ để tính khoảng cách lái xe. API là viết tắt của Giao diện lập trình ứng dụng. Bạn có thể sử dụng API để kết nối Google Map hoặc Bản đồ Bing bất cứ điều gì bạn muốn.
Nhưng tạo Google API bản đồ được thanh toán. Ngược lại, bạn có thể tạo miễn phí API của Bing MAP .
Vì vậy, tôi đang sử dụng Bing MAP API tại đây.
- Để tạo API Bing MAP miễn phí, nhấp vào đây .
Tôi đã tạo một API . Tôi đính kèm API bên dưới:
AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F
Bây giờ, đã đến lúc viết VBA mã. Để làm được điều đó,
- Nhấn ALT + F11 để mở Trình chỉnh sửa VBA .
- Bây giờ hãy chuyển đến Chèn ➤ Mô-đun để mở một mô-đun mới.
Sau khi mở VBA Editor , hãy chèn đoạn sau Mã VBA trong mô-đun đã mở.
8322
Phân tích mã
- Tại đây , tôi đã tạo một chức năng do người dùng xác định có tên là Driving_Distance.
- Sau đó, tôi sử dụng 3 tham số: vị trí bắt đầu , điểm đến ,và giá trị khóa. Đây là vị trí của hai địa chỉ và giá trị API tương ứng.
- Sau đó, tôi đã sử dụng một số biến như First_Value , Second_Value , Last_value , mitHTTP , & mitUrl. Các biến này được sử dụng để lưu trữ các giá trị khác nhau.
- Sau đó, kết hợp các giá trị (được lưu trữ trong mitUrl ) và sử dụng một số phương thức đối tượng ( Open , SetRequestHeader , Gửi ). Đây là cách tôi quản lý để tính toán khoảng cách lái xe thông qua API .
Mã VBA này tạo ra một hàm do người dùng xác định có tên là Driving_Distance .
Hàm Driving_Distance yêu cầu tổng cộng 3 đối số .
Đây là cú pháp chung của hàm Driving_Distance .
=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)
Bây giờ, đã đến lúc áp dụng chức năng do người dùng xác định. Đối với điều đó,
- Chọn ô E10 .
- Sau đó chèn công thức sau:
=Driving_Distance(E5,E6,C8)
- Bây giờ, hãy nhấn ENTER .
Phân tích công thức
- E5 là Tọa độ_Điểm_đầu .
- E6 là Tọa độ_Điểm cuối .
- C8 là API của Bing MAP .
Hàm tính toán khoảng cách lái xe giữa hai địa chỉ tính bằng dặm. Kiểm tra ô E10 . Nó sẽ thấy số, 2790 .
Vậy khoảng cách lái xe giữa MacArthur Park,Camden NSW, Úc, và Thành phố Jersey, New Jersey, Hoa Kỳ cách 2790 dặm.
Đọc thêm: Cách tính khoảng cách giữa hai địa chỉ trong Excel (3 cách)
Phần thực hành
Bạn sẽ nhận được một trang tính Excel như ảnh chụp màn hình sau, ở cuối tệp Excel được cung cấp, nơi bạn có thể thực hành tất cả các phương pháp được thảo luận trong bài viết này.
Kết luận
Tóm lại, tôi đã thảo luận 2 cách tính khoảng cách lái xe giữa hai địa chỉ trong excel. Và đừng ngần ngại đặt bất kỳ câu hỏi nào trong phần bình luận bên dưới. Chúng tôi sẽ cố gắng trả lời tất cả các truy vấn có liên quan càng sớm càng tốt. Và vui lòng truy cập trang web của chúng tôi Exceldemy để khám phá thêm.