Public Function DirectionToDegrees( _
    ByVal vDirection As Variant _
    ) As Variant    DirectionToDegrees("N") = 0
    DirectionToDegrees("SW") = 225
    DirectionToDegrees("ENE") = 67.5
    DirectionToDegrees("WHAT") = -1 ' #4.
    DirectionToDegrees("EW") = -1 ' #5.See also:     DegreesToDirection Function
    SpellDirection FunctionvDirection: String containing an abbreviation for one of the 16 possible compass directions. Function returns Null if vDirection is Null of cannot be fixed up to a String. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.