• Twitter
  • Facebook
  • Google+
  • Instagram
  • Youtube

Sunday, December 8, 2013

Add-Ins Fungsi Konversi Decimal Degrees Pada MS Excel

==FUNGSI KONVERSI DECIMAL DEGREES TO TEXT (..°..'..")==

==FUNGSI KONVERSI TEXT (..°..'..") TO DECIMAL DEGREES==


Pada pembahasan sebelumnya kita telah membahas bagaimana cara menghitung azimuth dari 2 titik yang berkoordinat dengan hasil "DECIMAL DEGREES".

Untuk keperluan laporan dll terkadang kita memerlukan azimuth dalam bentuk "TEXT (..°..'..")" hal ini bisa kita lakukan dengan standar fungsi yg ada dalam Ms.Excel dengan kolom yg berbeda dengan rumus :
1. Derajat ==> =INT(DECIMAL DEGREES) ===> KOLOM 1
2. Menit ==> =(DECIMAL DEGREES - Derajat) * 60 ====> KOLOM 2
3. Detik ==> =(Menit - INT(Menit)) * 60 ====> KOLOM 3

Jika Data Derajat, Menit dan Detik diatas banyak akan lebih rumit dalam pengeditannya jika kita copy data tersebut kedalam Ms.Word untuk keperluan penyusunan laporan karena data tersebut terpisah-pisah dalam banyak kolom sementara kita membutuhkan data tersebut dalam bentuk TEXT (..°..'..").

Untuk memudahkan hal tersebut di atas, maka dengan adanya Fungsi Konversi Decimal Degrees To Text(..°..'..") dan sebaliknya dapat memudahkan kita dalam mengkopi data tersebut dari Ms.Excel ke Ms.Word untuk keperluan penyusunan laporan.

Langkah-lankah aktivasi AddIns ini sama seperti AddIns sebelumnya.
Cara kerja Fungsi ini adalah sebagai berikut :
Misalkan kita mempunyai data azimuth dalam Decimal Degrees = 67,54 pada cell A1, maka cara konversi text adalah :
1. Pada cell B1 (terserah di cell mana) ketik fungsi konversi to text
====> =KonDesToDeg(A1)
2. Hasilnya di cell B1 adalah ===> 67°32'24"
3. Pada cell C1 (terserah di cell mana) ketik fungsi konversi text to decimal degrees
====> =KonDegToDes(B1)
4. Hasilnya di cell C1 adalah ===> 67,54
 
Silahkan DOWNLOAD file disini

===DEMIKIAN SEMOGA BERMANFAAT===

0 comments:

Post a Comment

Contact

Get in touch with me


Adress/Street

12 Street West Victoria 1234 Australia

Phone number

+(12) 3456 789

Website

www.johnsmith.com