Help I need to write a function that calculates a clock bearing (1-12) from bearing angles (0-360) degrees. Where 12 o'clock is straight ahead and bearing on the border (eg 45 degrees) can return either adjacent value.
Function is bearing(ByVal bearing As Double) As Integer

Conceptually I know what to do but starting to write the function I'm clueless :-(