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

2 réponses

  1.  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

    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
    2. pijaku Modérateur
      Peux tu me copier/coller le code tel que tu l'as essayé???
    3. mylord666 Auteur
      le même que tu m''as indique ligne 85 de ton petit module
    4. pijaku Modérateur
      Essaye de changer Diviz par un autre mot... Toto par exemple
    5. mylord666 Auteur
      ok je fais le test merci de l'info
  2. mylord666 Auteur
    merci beaucoup je vais tester cela bonne fin de journée

    Discussions similaires

    exo pix
    Xtyller

    2 réponses
    tout en majuscules (excel)
    txiki

    35 réponses