Discussion: Bizarre
Afficher un message
Vieux 27/02/2006, 22h20   #2 (permalink)
Charly2
XLDnaute Accro
 
Avatar de Charly2
 
Date d'inscription: octobre 2005
Version Excel : Excel 2000 (PC)
Messages: 1 919
Par défaut Re:Bizarre

Salut André,

Surprenant ! C'est un fait !!! J'ai essayé sous vba et voici la procédure et ce que j'obtiens :

Citation:
Sub CalculSurprenant()
'
Dim Nombre#
'
**Nombre = 111111111

**' Nombre^2 - 12345678987654321 transformé en écriture scientifique
**' par XL (résultat = 0)

**Range('A1') = Nombre ^ 2 - 1.23456789876543E+16

**' Nombre^2 - 12345678987654300 (résultat = 20)
**Range('A2') = Nombre ^ 2 - 1.23456789876543E+16

**' Nombre^2 - 12345678987654320 (résultat = 0)
**Range('A3') = Nombre ^ 2 - 1.23456789876543E+16

**' 12345678987654321^(1/2) -> résultat = 111 111 111
**Range('A4') = 1.23456789876543E+16 ^ (1 / 2)
End Sub
J'en perds mes mathématiques !!!

A+
__________________
Amicalement,
Charly2
Charly2 est déconnecté   Réponse avec citation