VBA access probleme de shyntaxe
Résolu/Fermé
[GORe]Donald
Messages postés
8
Date d'inscription
jeudi 14 octobre 2004
Statut
Membre
Dernière intervention
9 janvier 2007
-
8 janv. 2007 à 16:16
[GORe]Donald Messages postés 8 Date d'inscription jeudi 14 octobre 2004 Statut Membre Dernière intervention 9 janvier 2007 - 9 janv. 2007 à 17:58
[GORe]Donald Messages postés 8 Date d'inscription jeudi 14 octobre 2004 Statut Membre Dernière intervention 9 janvier 2007 - 9 janv. 2007 à 17:58
A voir également:
- VBA access probleme de shyntaxe
- Access appdata - Guide
- Exemple base de données access à télécharger gratuit ✓ - Forum Logiciels
- Excel compter cellule couleur sans vba - Guide
- Vba attendre 1 seconde ✓ - Forum VB / VBA
- Acer quick access - Forum logiciel systeme
3 réponses
blux
Messages postés
26753
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
31 mars 2025
3 332
9 janv. 2007 à 13:02
9 janv. 2007 à 13:02
Salut,
je ne connais pas la notion d"edit" dans un formulaire...
Si tu veux récupérer la valeur d'une zone d'un formulaire (textbox, listbox, combobox, case à cocher...), la syntaxe est simple :
nom_de_la_zone.value
Ex :
je ne connais pas la notion d"edit" dans un formulaire...
Si tu veux récupérer la valeur d'une zone d'un formulaire (textbox, listbox, combobox, case à cocher...), la syntaxe est simple :
nom_de_la_zone.value
Ex :
IF Liste1.Value = "1" THEN...
Utilisateur anonyme
9 janv. 2007 à 14:13
9 janv. 2007 à 14:13
Bonjour,
Une fois la valeur affecté, si tu veux sauvegarder la donnée ?
Lupin
Une fois la valeur affecté, si tu veux sauvegarder la donnée ?
Liste1.Value = "1" DoCmd.Save RefreshDatabaseWindow
Lupin
[GORe]Donald
Messages postés
8
Date d'inscription
jeudi 14 octobre 2004
Statut
Membre
Dernière intervention
9 janvier 2007
9 janv. 2007 à 17:58
9 janv. 2007 à 17:58
Je vous remercie tous j'ai trouvé la solution tout seul:
If (IsNull[champ]) Then
MsgBox "Remplissez le champ!"
Else
MsgBox "OK"
End If
If (IsNull[champ]) Then
MsgBox "Remplissez le champ!"
Else
MsgBox "OK"
End If