Calculatrice indows

[Hamid]

Bonjour,

J'ai des calculs à développer à partir des nombres à 24 chiffres. Excel ne permet pas de gérer plus que 16 Chiffres sans a jouter l'exp. 10^n.
J'ai pensé à utiliser la calculatrice de windows en copiant les nombres "format txt" à partir d'Ecxcel et en les recopiant sur Excel ou Word "sous le même format" après avoir effectué les calcul.

Ma question est comment automatiser une telle opération "avec une Macro"?

Merci.

 

[POLO]

Hello !
Tiens, tu peux essayer ça et l'adapter à ta guise...
Tu peux même programmer des combinaisons de touches comme 'Alt+F4'...




' Code à copier dans un module
' Ce code effectue l'opération prévue dans la chaine
' se servir d'une boucle pour faire le boulot sur plusieurs chaines.

Dim ReturnValue, I


Sub calcul()


ReturnValue = Shell("Calc.exe", 1)
AppActivate ReturnValue
chaine = "1+5"
For I = 1 To Len(chaine)

If IsNumeric(Mid(chaine, I, 1)) Then
SendKeys Val(Mid(chaine, I, 1)), True
Else
SendKeys Mid(chaine, I, 1), True

End If
I = I + 1

Next I

SendKeys "=", True




End Sub