How to convert decimal degrees to degrees minutes seconds in Excel?
Geographic/UTM Coordinate Converter. You can convert between geographic coordinates and Universal Transverse Mercator (UTM) coordinates using this form. Geographic coordinates are entered and displayed in decimal degrees. Negative numbers indicate West longitudes and South latitudes. UTM coordinates are entered and displayed in meters.
Sometimes, you may have a list of data shown as decimal degrees in a worksheet, and now you need to convert the decimal degrees to degrees, minutes and seconds formatting as shown as following screenshots, how can you get the conversation quickly in Excel?
Office Tab Enable Tabbed Editing and Browsing in Office, and Make Your Work Much Easier...
Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%
- Reuse Anything: Add the most used or complex formulas, charts and anything else to your favorites, and quickly reuse them in the future.
- More than 20 text features: Extract Number from Text String; Extract or Remove Part of Texts; Convert Numbers and Currencies to English Words.
- Merge Tools: Multiple Workbooks and Sheets into One; Merge Multiple Cells/Rows/Columns Without Losing Data; Merge Duplicate Rows and Sum.
- Split Tools: Split Data into Multiple Sheets Based on Value; One Workbook to Multiple Excel, PDF or CSV Files; One Column to Multiple Columns.
- Paste Skipping Hidden/Filtered Rows; Count And Sum by Background Color; Send Personalized Emails to Multiple Recipients in Bulk.
- Super Filter: Create advanced filter schemes and apply to any sheets; Sort by week, day, frequency and more; Filter by bold, formulas, comment...
- More than 300 powerful features; Works with Office 2007-2019 and 365; Supports all languages; Easy deploying in your enterprise or organization.
Convert decimal degrees to degrees, minutes, seconds with VBA
Amazing! Using Efficient Tabs in Excel Like Chrome, Firefox and Safari!
Save 50% of your time, and reduce thousands of mouse clicks for you every day!
Please follow the steps below to convert decimal degrees to degrees, minutes, and seconds with VBA code.
1. Hold ALT button and press F11 on the keyboard to open a Microsoft Visual Basic for Application window.
2. Click Insert > Module, and copy the VBA into the module.
VBA: Convert decimal degree to degree, minutes and seconds
3. Click Run button or press F5 to run the VBA.
4. A dialog displayed on the screen, and you can select the cells you want to the convert. See screenshot:
5. Click OK, then the selected data is converted to degree, minutes and seconds. See screenshot:
Tip: Using the above VBA code will lost your original data, so you’d better copy the data before running the code.
Convert degrees, minutes, seconds to decimal degrees with VBA
Sometimes, you may want to convert the data in degrees/minutes/seconds formatting to decimal degrees, the following VBA code can help you quickly get it done.
1. Hold ALT button and press F11 on the keyboard to open a Microsoft Visual Basic for Application window.
2. Click Insert > Module, and copy the VBA into the module.
VBA: Convert degree, minutes and seconds to decimal degree
3. Save the code and close the window, select a blank cell, for instance, the Cell A1, enter this formula =ConvertDecimal('10° 27' 36'') ('10° 27' 36'' stands the degree you want to convert to decimal degree, you can change it as you need), then click Enter button. See screenshots:
Relative articles
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
- To post as a guest, your comment is unpublished.The code has a assumes there is a space after ° and '. Change the 2's to 1's in the code to solve it.
Function ConvertDecimal(pInput As String) As Double
'Updateby20140227
Dim xDeg As Double
Dim xMin As Double
Dim xSec As Double
xDeg = Val(Left(pInput, InStr(1, pInput, '°') - 1))
xMin = Val(Mid(pInput, InStr(1, pInput, '°') + 1, _
InStr(1, pInput, '') - InStr(1, pInput, _
'°') - 1)) / 60
xSec = Val(Mid(pInput, InStr(1, pInput, '') + _
1, Len(pInput) - InStr(1, pInput, '') - 1)) _
/ 3600
ConvertDecimal = xDeg + xMin + xSec
End Function - To post as a guest, your comment is unpublished.Works like a champ! Thanks for sharing!!!
- To post as a guest, your comment is unpublished.Check your results. this code is wrong.
- To post as a guest, your comment is unpublished.please
i want you help and write a computer program on paper to convert decimal of degree to degree minute and second.
317.5986740026
from ahans.- To post as a guest, your comment is unpublished.step 1, Multiply numbers after decimal with 60 (0.5986740026*60)minutes=35.92044015 mean 35 mints
spet 2, multiply the decimal after minute ie 0.9204401*60=55.2264
so 317 degree 35 minuts 55 sec
- To post as a guest, your comment is unpublished.Not sure whats wrong with the code in the post from Ernie, but this is what I use to convert decimal degrees to DMS degrees in the spread sheet without using VB. The reference to the cell E33 is the cell containing the decimal degrees value.
=CONCAT(FIXED(INT(B32), 0) , '°', FIXED(((B32 - INT(B32)) * 60), 0), '', FIXED(((B32 - INT(B32) - INT(B32 - INT(B32))) * 3600), 0 ,TRUE), '')
Good luck.- To post as a guest, your comment is unpublished.HI CORNY, NOT WORK FOR ME, EXCEL DO NOT ACCEPT THE FUNCTION..... WHATS WRONG? CAN YOU HELP ME?
- To post as a guest, your comment is unpublished.Hello,
I used the scrip to convert decimal to DMS however the code is wrong somewhere as it turned out 37.856908,-120.912469 to 37D 51M 25S, -121D 5M 15S
This is way off....
Anyone have a fix for this? - To post as a guest, your comment is unpublished.works great but how would i adapt the code to get more numbers for seconds?
- To post as a guest, your comment is unpublished.I want to plot the positions on a map and we not worry about N, S, E or W. I'm sure these could be added in with 'if' statements.
I have just used a very simple line of functions within the Excel spreadsheet.
I want to go from Degrees (Decimal) to Degrees, Seconds (Decimal) Changing the negative values to positives as I know which hemispheres I am in. For me, cell E4 contained the target Lat or Long (Decimal).
This is a bit easier than putting in some VBA code and can be enlarged to do DD,MM,SS
=CONCATENATE(TRUNC(ABS(E4)),'°',FIXED((ABS(E4)-TRUNC(ABS(E4)))*60,2),'') - To post as a guest, your comment is unpublished.Found this code very helpful. Great stuff!
- To post as a guest, your comment is unpublished.The most important thing to realize is that you cannot simply use superscript and small letter o for the degree symbol - this may be obvious to some, but not to me. I tried the superscript letter o and it did not work, I deleted the superscript letter o, and used Alt 0176 for the actual degree symbol and it worked!! I am confused as to why after the seconds there are extra sets of double quotes?
36'') whereas in the subsequent comment if one simply uses =ConvertDecimal(A1) only a single set of quotes are used for seconds. Odd we can use single and double quotes and the thing works for minutes and seconds but superscript letter o does not?
To check 27/60 = .45 smf 36/3600 = .01 add the two = .46 and add that to the degrees = 10.46 degrees. Hope this helps others? Mort - To post as a guest, your comment is unpublished.Really helpful.
Thank you. - To post as a guest, your comment is unpublished.there is some error in code i tried to convert 26°10'55.416' using this code which results as 26.00139 which should be 26.18206 (Calculated & Verified.. please let me know if anyone knows the reason.
- To post as a guest, your comment is unpublished.[quote name='Rajansinh Zala']there is some error in code i tried to convert 26°10'55.416' using this code which results as 26.00139 which should be 26.18206 (Calculated & Verified.. please let me know if anyone knows the reason.[/quote]
It seems the code expects a space after the ° and ' symbols.
26° 10' 55.416' gives the correct answer.
You can enter your input in a cell (eg A1) and get the result in another cell by using the formula =ConvertDecimal(A1). This is convenient if you have a many numbers to be converted.