Formule division

Résolu
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -  
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

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

A voir également:

2 réponses

pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour je viens de le tester j'obtiens une erreur il admet pas le mot DIVIZ tu peux m'aider merci d'avance
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Peux tu me copier/coller le code tel que tu l'as essayé???
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
le même que tu m''as indique ligne 85 de ton petit module
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Essaye de changer Diviz par un autre mot... Toto par exemple
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
ok je fais le test merci de l'info
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
merci beaucoup je vais tester cela bonne fin de journée
0