Formule IsNA VBA

[marjo_38]

Bonjour,

J'ai un petit problème dans ma macro et je ne sais pas bien utiliser les formules en VBA. Je voudrais que si le resultat de ma formule est égal à NA alors le msgbox s'affiche sinon le userform customers_List6 s'affiche.
Voici ma macro :

Private Sub CommandButton2_Click()
If Formula = IsNA(Range("Q3").Value) Then
MsgBox "Le N° de client n'existe pas", vbOKOnly, "Attention"
Unload Customers_List7
Else
Customers_List7.Hide
Customers_List6.show
End If
End Sub

Merci beaucoup à la personne qui pourra m'aider....

 

[dixit]

Re : Formule IsNA VBA

bonjour,
If WorksheetFunction.IsNA(Range("Q3")) Then MsgBox "c'est N/A"
voir sur mon site perso les explications au sujet de l'utilisation des fonctions Excel sous vba (d'où WorksheetFunction)
bye

 

[marjo_38]

Re : Formule IsNA VBA

Merci beaucoup ca marche!!!
Je vais aller voir sur votre site pour en savoir plus.
Merci

 

[Pierrot93]

Re : Formule IsNA VBA

Bonjour Marjo, Dixit

une autre solution me semble t'il :

If IsError(Range("I1").Value) Then MsgBox "erreur"

bon après midi
@+