ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   adding subtracting angles/degrees (https://www.excelbanter.com/excel-programming/274151-adding-subtracting-angles-degrees.html)

Jimmy

adding subtracting angles/degrees
 
Hi guys/gals,

I am trying to figure out how to add and subtract two degrees. I am
speaking about compass/directional degrees (or angles if you prefer).

I need to be able to subtract lets say 45 degrees from a heading/angle
of 020 and arrive at the appropriate result. In this case 335.


Also how can I display the result or format the field to display a
leading "zero" ie 020.

Thanks in advance

Chip Pearson

adding subtracting angles/degrees
 
Jimmy,

Try the following functions

Function AddDegrees(X As Double, Y As Double) As Double
AddDegrees = (X + Y) Mod 360
End Function
Function SubtractDegrees(X As Double, Y As Double) As Double
SubtractDegrees = (X - Y) - ((X - Y < 0) * 360)
End Function

You can use a custom number format of "000" to preserve the
leading zero.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Jimmy" wrote in message
...
Hi guys/gals,

I am trying to figure out how to add and subtract two degrees. I

am
speaking about compass/directional degrees (or angles if you

prefer).

I need to be able to subtract lets say 45 degrees from a

heading/angle
of 020 and arrive at the appropriate result. In this case 335.


Also how can I display the result or format the field to display

a
leading "zero" ie 020.

Thanks in advance




Ron Rosenfeld

adding subtracting angles/degrees
 
On Mon, 11 Aug 2003 20:19:33 GMT, Jimmy wrote:

Hi guys/gals,

I am trying to figure out how to add and subtract two degrees. I am
speaking about compass/directional degrees (or angles if you prefer).

I need to be able to subtract lets say 45 degrees from a heading/angle
of 020 and arrive at the appropriate result. In this case 335.


Also how can I display the result or format the field to display a
leading "zero" ie 020.

Thanks in advance


I think this will work as a worksheet formula:

=MOD(Heading+Change,360)

To subtract, enter Change as a negative number.

=mod(20 + (-45),360) -- 335

Format/Cells/Number/Custom Type: 000
or, if you want to be fancy, 000\°

To insert the degree sign, hold down the <alt key while typing -- on the
NUMERIC KEYPAD -- 0176.


--ron

Jimmy

adding subtracting angles/degrees
 
Thanks Guys,

That is what I was looking for.


Cheers



All times are GMT +1. The time now is 10:23 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com