
VBA
Fonctions VBA

Permet de tester si le contenu d'un champ est numérique.
Exemple de test sur un champ de formulaire nommé "text_annee"
pSub roc_test_sur_un_champ()
If isNumeric(txt_annee.Value) = False Then
MsgBox "Merci de saisir un chiffre",vbCritical+vbYesNo,"Données Erronées"
End If
End Sub
If isNumeric(txt_annee.Value) = False Then
MsgBox "Merci de saisir un chiffre",vbCritical+vbYesNo,"Données Erronées"
End If
End Sub

Permet de tester si le contenu d'un champ est vide.
Exemple de test sur un champ de formulaire nommé "text_annee"
Sub proc_test_sur_un_champ()
If isEmpty(txt_annee.Value) = False Then
MsgBox "Merci de saisir une donnée",vbCritical+vbYesNo,"Donnée manquante"
End If
End Sub
If isEmpty(txt_annee.Value) = False Then
MsgBox "Merci de saisir une donnée",vbCritical+vbYesNo,"Donnée manquante"
End If
End Sub
-> voir la liste des fonctions VBA par Dominique MANIEZ.