सामग्री सारणी
Microsoft Excel हा एक अतिशय बहुमुखी स्प्रेडशीट प्रोग्राम आहे. आपण कल्पना देखील करू शकत नाही अशा विस्तृत कार्ये करण्याची ऑफर देते. तुम्ही Excel मध्ये दोन पत्त्यांमधील ड्रायव्हिंग अंतर देखील मोजू शकता. जर तुमच्याकडे पत्त्यांची यादी त्यांच्यातील फरक शोधण्यासाठी असेल तर तुम्ही अर्थातच एमएस एक्सेल वापरू शकता. तुम्ही अंतर स्वहस्ते देखील मोजू शकता. पण ते खूप वेळ घेणारे असेल. तुमच्याकडे शेकडो हजारो अंतर मोजण्यासाठी आहेत. अशा प्रकारे, या लेखात, मी तुम्हाला एक्सेलमधील दोन पत्त्यांमधील ड्रायव्हिंग अंतर कसे मोजायचे ते दर्शवेल.
सराव वर्कबुक डाउनलोड करा
तुम्ही खालील लिंकवरून एक्सेल फाइल डाउनलोड करू शकता आणि सोबत सराव करू शकता. ते.
दोन पत्त्यांमधील अंतर मोजा ड्रायव्हिंग डिस्टन्सची गणना करण्यासाठी त्रिकोणमितीय फंक्शन्स वापरणेयेथे, एक्सेलमधील दोन पत्त्यांमधील ड्रायव्हिंग अंतर मोजण्यासाठी मी तुम्हाला भिन्न त्रिकोनोमेट्रिक फंक्शन्स एकत्र करण्यास दाखवतो.
देण्यासाठी तुम्ही एक उदाहरण, मी दोन पत्ते घेतले आहेत. पहिला पत्ता मॅकआर्थर पार्क, कॅम्डेन NSW, ऑस्ट्रेलिया आहे. त्याचे अक्षांश आणि रेखांश अनुक्रमे 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
❸ त्यानंतर, एंटर बटण दाबा.
आता, तुम्हाला दिसेल की सूत्राने मॅकआर्थर पार्क, कॅम्डेन NSW, ऑस्ट्रेलिया, आणि जर्सी सिटी, न्यू जर्सी, यूएसए मधील ड्रायव्हिंग अंतर मैलांमध्ये मोजले आहे. अशा प्रकारे, तुम्हाला सेल D8 मध्ये परिणाम दिसेल जो 2445.270922 मैल आहे.
फॉर्म्युला ब्रेकडाउन
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – the 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.449864893802199
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90- C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) – 0.365377540842758 * 0.449864893802199 बनते. आउटपुट – 0.815242434644958
- मग ACOS फंक्शन मूल्य अर्कोसाइन करते. आउटपुट – 0.617648629071256
- शेवटी, मूल्याचा 3959 – 0.617648629071256 *3959 ने गुणाकार केल्यास परिणाम मैलांमध्ये मिळतो. आउटपुट – 2445.270922
अधिक वाचा: एक्सेलमधील दोन पत्त्यांमधील मैल कसे मोजायचे (2 पद्धती)
2. VBA कोड वापरून दोन पत्त्यांमधील अंतराची गणना करा
या विभागात, मी वापरकर्ता-परिभाषित कार्य तयार करण्यासाठी VBA कोड वापरेन. त्यानंतर मी ते फंक्शन एक्सेलमधील दोन पत्त्यांमधील अंतर मोजण्यासाठी वापरेन.
येथे, मी दोन पत्ते वापरत आहे. पहिला पत्ता मॅकआर्थर पार्क, कॅम्डेन NSW, ऑस्ट्रेलिया आहे. त्याचे अक्षांश आणि रेखांश अनुक्रमे 34.06312149 आणि -118.2783975 आहेत. दुसरा पत्ता जर्सी सिटी, न्यू जर्सी, यूएसए आहे. त्याचे अक्षांश आणि रेखांश अनुक्रमे 40.71799929 आणि -74.04276812 आहेत.
मी येथे प्रत्येक पत्त्यासाठी निर्देशांक तयार करेन. समन्वय म्हणजे अक्षांश आणि रेखांश यांचे संयोजन. निर्देशांक निर्माण करण्यासाठी,
- पत्त्याचे अक्षांश टाइप कराप्रथम.
- नंतर स्वल्पविराम घाला.
- त्यानंतर त्याच पत्त्याचे रेखांश टाईप करा.
म्हणून पहिल्या पत्त्याचा समन्वय आहे 34.0631214903094 ,-118.27839753751 . आणि दुसऱ्या पत्त्याचा समन्वय आहे 40.7179992930381,-74.0427681204225 .
VBA कोडला API <आवश्यक आहे 7> ड्रायव्हिंग अंतर मोजण्यासाठी नकाशाचा. API म्हणजे ऍप्लिकेशन प्रोग्रामिंग इंटरफेस. तुम्ही Google Map किंवा Bing Map तुम्हाला जे आवडते ते कनेक्ट करण्यासाठी तुम्ही API वापरू शकता.
पण Google तयार करणे नकाशा API देय आहे. याउलट, तुम्ही Bing MAP चे API विनामूल्य तयार करू शकता.
अशा प्रकारे, मी Bing MAP API <वापरत आहे. 7>येथे.
- विनामूल्य Bing MAP API तयार करण्यासाठी, येथे क्लिक करा .
मी एक तयार केले आहे API . मी API खाली संलग्न करत आहे:
AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F
आता, लिहिण्याची वेळ आली आहे. 6>VBA
कोड. त्यासाठी,- VBA संपादक उघडण्यासाठी ALT + F11 दाबा.
- आता Insert वर जा. ➤ मॉड्युल नवीन मॉड्यूल उघडण्यासाठी.
VBA एडिटर उघडल्यानंतर, खालील समाविष्ट करा उघडलेल्या मॉड्यूलमध्ये VBA कोड.
3484
कोड ब्रेकडाउन
- येथे , मी Driving_Distance नावाचे वापरकर्ता-परिभाषित कार्य तयार केले आहे.
- मग मी 3 पॅरामीटर्स वापरले: प्रारंभ स्थान , गंतव्य ,आणि मुख्य मूल्य. हे दोन पत्त्यांचे स्थान आणि अनुक्रमे API मूल्य आहेत.
- मग मी First_Value , द्वितीय_Value<7 सारखे अनेक व्हेरिएबल्स वापरले>, अंतिम_मूल्य , mitHTTP , & mitUrl. हे व्हेरिएबल्स भिन्न मूल्ये संचयित करण्यासाठी वापरले जातात.
- नंतर मूल्ये एकत्र केली ( mitUrl मध्ये संग्रहित) आणि अनेक ऑब्जेक्ट पद्धती वापरल्या ( Open , SetRequestHeader , पाठवा ). अशा प्रकारे मी API द्वारे ड्रायव्हिंग अंतर मोजण्यात व्यवस्थापित केले.
हा VBA कोड Driving_Distance<नावाचे वापरकर्ता-परिभाषित कार्य तयार करतो. 7>.
फंक्शन 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 आहे. <13 C8 हे Bing MAP चे API आहे.
फंक्शन गणना करते दोन पत्त्यांमधील अंतर मैलांमध्ये. सेल E10 तपासा. तो नंबर दिसेल, 2790 .
तर मॅकआर्थर पार्कमधील ड्रायव्हिंग अंतर,कॅम्डेन NSW, ऑस्ट्रेलिया, आणि जर्सी सिटी, न्यू जर्सी, यूएसए हे 2790 मैल आहे.
अधिक वाचा: एक्सेलमधील दोन पत्त्यांमधील अंतर कसे मोजायचे (3 मार्ग)
सराव विभाग
तुम्हाला खालील स्क्रीनशॉटप्रमाणे एक्सेल शीट मिळेल, प्रदान केलेल्या एक्सेल फाईलच्या शेवटी, जिथे तुम्ही या लेखात चर्चा केलेल्या सर्व पद्धतींचा सराव करू शकता.
निष्कर्ष
सारांश, मी 2 वर चर्चा केली आहे एक्सेलमधील दोन पत्त्यांमधील अंतर मोजण्याचे मार्ग. आणि खालील टिप्पणी विभागात कोणतेही प्रश्न विचारण्यास अजिबात संकोच करू नका. आम्ही सर्व संबंधित प्रश्नांना लवकरात लवकर उत्तर देण्याचा प्रयत्न करू. आणि अधिक एक्सप्लोर करण्यासाठी कृपया आमच्या वेबसाइटला भेट द्या Exceldemy .