WENN(UND(E9=0;D9>0);0;WENN(E9<=0;180;0)+WENN(D9=0; 90;REST(GRAD(ARCTAN(E9/D9))+180;180)))
If E9 = 0 AND D9 > 0 Then
a=0
Else
If E9 <= 0
a=180
else
a=0
end if
end if
If D9 = 0 Then
b=90
Else
b=REST(GRAD(ARCTAN(E9/D9))+180
end if
Range("A1")=a+b
das letzte wenn versteh ich ned ganz
1. was macht REST ?
2. warum hat diese Wenn ;180 noch dabei...
____________________________________
\'I think I spider\'
|