Formule division

Résolu

mylord666 -

Bonjour,

comment écrire une division en vba
exemple
G= H / 1000
cela me réponds toujours 0 la division s'effectue pas
merci beaucoup

Afficher la suite

A voir également

2 réponses

Réponse 1 / 2
mylord666 Auteur
merci beaucoup je vais tester cela bonne fin de journée

0
Réponse 2 / 2
pijaku Modérateur
Bonjour,

Si H = 0, dans ton cas, le résultat sera toujours 0...

Essaie ceci :
```
Sub Main()
Dim Nbprem As Long, Nbdeuz As Long, Resulta As Double
Nbprem = 1523
Nbdeuz = 96
Resulta = Diviz(Nbprem, Nbdeuz)
Debug.Print Resulta
End Sub

Function Diviz(dividende As Long, diviseur As Long) As Double
Diviz = dividende / diviseur
End Function 
```
0
1. mylord666 Auteur
  
  bonjour je viens de le tester j'obtiens une erreur il admet pas le mot DIVIZ tu peux m'aider merci d'avance
  
  0
2. pijaku Modérateur
  
  Peux tu me copier/coller le code tel que tu l'as essayé???
  
  0
3. mylord666 Auteur
  
  le même que tu m''as indique ligne 85 de ton petit module
  
  0
4. pijaku Modérateur
  
  Essaye de changer Diviz par un autre mot... Toto par exemple
  
  0
5. mylord666 Auteur
  
  ok je fais le test merci de l'info
  
  0