[mso] Re: Excel 2000 Personal.xls
- From: "Linda F. Johnson" <linda@xxxxxxxxxxxxxxxxxxxxxxxxxxx>
- To: <mso@xxxxxxxxxxxxx>
- Date: Wed, 20 Dec 2006 22:06:38 -0500
Sorry, Robert .... That is not a "formula" ... It's VBA, so someone besides
me will have to help you with that.
Linda F. Johnson
Linda's Computer Stop
Author, MOS: Excel 2003 Study Guide, published by John Wiley and Sons
http://personal-computer-tutor.com
-----Original Message-----
From: mso-bounce@xxxxxxxxxxxxx [mailto:mso-bounce@xxxxxxxxxxxxx] On Behalf
Of Robert Carneal
Sent: Wednesday, December 20, 2006 9:12 PM
To: mso@xxxxxxxxxxxxx
Subject: [mso] Re: Excel 2000 Personal.xls
Linda and everyone-
Here is the formula I wrote; not perfect, but shouldn't it work?
Function Latify(Decimal_Deg) As Variant
With Application
Degrees = Int(Decimal_Deg) 'Get Integer of Argument
Port = Decimal_Deg - Degrees 'Get portion of Degrees
MinutesO = Port * 60 'Get Minutes value
Minutes = Int(MinutesO) 'Get Integer port Minutes
Port = MinutesO - Minutes 'Get dec port of Minutes
SecondsO = Port * 60 'Get Seconds value
' Finished calculating, do Formatting....
Seconds = Format(SecondsO, "00.0000") ' Format Seconds
Minutes = Format(Minutes, "00") ' Format Degrees
Degrees = Format(Degrees, "00") ' Format Minutes
'Put it all together...
Latify = Degrees & Minutes & Seconds
End With
End Function
*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or
MicrosoftOffice@xxxxxxxxxxxxxxxx
To send mail to the group, simply address it to mso@xxxxxxxxxxxxx
To Unsubscribe from this group, visit the group's homepage and use the dropdown
menu at the top. This will allow you to unsubscribe your email address or
change your email settings to digest or vacation (no mail).
http://www.freelists.org/webpage/mso
If you are using Outlook and you see a lot of unnecessary code in your email
messages, read these instructions that explain why and how to fix it:
http://personal-computer-tutor.com/abc3/v28/greg28.htm
*************************************************************
- Follow-Ups:
- [mso] Re: Excel 2000 Personal.xls
- From: Steve Moghaddam
- References:
- [mso] Re: Excel 2000 Personal.xls
- From: Robert Carneal
Other related posts:
- » [mso] Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- » [mso] Re: Excel 2000 Personal.xls
- [mso] Re: Excel 2000 Personal.xls
- From: Steve Moghaddam
- [mso] Re: Excel 2000 Personal.xls
- From: Robert Carneal