Discussion :

[lololebricoleur]

Bonjour,

A la compilation de mon code VBA, j'ai un message d'erreur "Erreur de complication Membre de méthode ou de données introuvable"

Sur ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Private Sub Form_Load()
 
    If IsNull(Me.DEV_Ref) = True Or Me.DEV_Ref = "" Then Me.Ref_Devis = Ref_Devis()
    If IsNull(Me.DEV_Date_Creation) = True Then Me.DEV_Date_Creation = Date
    Me.DEV_Date_Modification = Date
    If IsNull(Me.DEV_Client) = True Then Me.DEV_Client = Forms("F_Client_Fiche").Form("REP_num")
 
End Sub

Et l'erreur est provoquée par Me.DEV_Ref

Pourtant le champ existe bien dans le formulaire.
Je cherche à comprendre pourquoi mais je ne vois pas.

Avez vous une explication ou/et une solution svp ?
Merci de votre aide

[elgordopresto]

Bonjour,

Plutôt que IsNull, je serais tenté d'utiliser plutôt la fonction NZ() qui permet d'affecter une valeur par défaut.

Pour la première condition on aurait donc çà à la place :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
If Nz(Me.DEV_Ref,"")="" Then Me.Ref_Devis = Ref_Devis()

Peut-être que cela solutionnera le problème...

Bien à vous.

[lololebricoleur]

Merci Elgor, je vais tester ça.
Pour info, l'erreur n'est pas sur le ifnull

[nico84]

Bonjour,

Me. est par défaut donc Me.Ref_Devis est équivalent à Ref_Devis et Me.Ref_Devis = Ref_Devis() c'est super louche

Pour info, isnull retourne un booléen donc = true ne sert à rien. On peut écrire if isnull(...) then ou if not isnull(...) then.

[hyperion13]

Salut
J'ai un doute sur cette syntaxe
Forms("F_Client_Fiche").Form("REP_num")

[lololebricoleur]

Félicitations et merci Nico84 !!

Effectivement, il semble que le fait de nommer ma fonction comme le champ pose problème.
Nom de fonction rectifié en RefDevis() et plus de prob.

Elgor, merci pour ton tuyau. Ca ne résout pas mon prob mais j'ai appris un truc ;-)

Hyperion, l'erreur apparait avant se code donc ce n'est pas lui le problème dans tous les cas. Pas acquis de conscience, j'ai testé sans mais même prob. Après, c'est une syntaxe que j'utilise dans plusieurs cas et qui passe le test sans prob.

Merci à vous pour votre aide