Discussion :

[jbggg]

Bonjour,

voici ce qu'il faudrait que j'écrive:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
If (Range("I11").Value - Range("I10").Value) > 0 And (Range("J11").Value - Range("J10").Value) > 0 Then
Range("C11") = Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value))
Else
 
If (Range("I11").Value - Range("I10").Value) > 0 And (Range("J11").Value - Range("J10").Value) < 0 Then
Range("C11") = 200 - (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
Else
 
If (Range("I11").Value - Range("I10").Value) < 0 And (Range("J11").Value - Range("J10").Value) < 0 Then
Range("C11") = 200 = (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
Else
 
If (Range("I11").Value - Range("I10").Value) < 0 And (Range("J11").Value - Range("J10").Value) > 0 Then
Range("C11") = 400 - (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
 
End If
End If
End If
End If

mais ai-je le droit d'utiliser "and"

[wilfried_42]

Bonjour

voici ce que tu peux ecrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
If (Range("I11").Value - Range("I10").Value) > 0 then
      if (Range("J11").Value - Range("J10").Value) > 0 Then
              Range("C11") = Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value))
      Else
              Range("C11") = 200 - (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
      end if
Else
      If (Range("J11").Value - Range("J10").Value) < 0 Then
              Range("C11") = 200 = (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
      Else
              Range("C11") = 400 - (Arctan((Range("I11").Value - Range("I10").Value) / (Range("J11").Value - Range("J10").Value)))
      end if
end if

si j'ai tout compris

[jbggg]

comment utilise-t-on arctan.

parce qu'il me dis qu'il faut que je déclare arctan en tant que variable.

[ouskel'n'or]

Oui, parce que la fonction est "Atn et qu'elle s'applique à un angle exprimé en radians

La fonction Atn prend le rapport entre deux côtés d'un triangle rectangle (number) et renvoie l'angle correspondant en radians. Il s'agit du rapport entre la longueur du côté opposé à l'angle et la longueur du côté adjacent.

Le résultat est compris entre -pi/2 et pi/2 radians.

Pour convertir des degrés en radians, multipliez-les par pi/180. Inversement, pour convertir des radians en degrés, multipliez-les par 180/pi.

Tu sauras faire pour des grades ?

PS - Tu n'as pas de touche F1 sur ton clavier ?

[jbggg]

si