VBA access probleme de shyntaxe

Résolu
[GORe]Donald Messages postés 8 Date d'inscription   Statut Membre -  
[GORe]Donald Messages postés 8 Date d'inscription   Statut Membre -
Bonjour,

J'ai un problème sur la programation VBA dans le programme ACCESS.
Il faudrait que je réccupere des donnée saisies (du texte) dans un edit qui fait parti d'un formulaire.
ACCESS 2003
Par exemple :

dim strdocname As String
dim bdrdocname As String
bdrdocname="exemple"
bdrdocname="exemple2"
If (edit="") Then
Open strdocname:
Else
Open bdrdocname
End If

Comment fait-on pour le edit?

Merci et aurevoir
Configuration: Windows XP
Firefox 2.0.0.1

3 réponses

  1. blux Messages postés 2060 Date d'inscription   Statut Modérateur Dernière intervention   3 455
     
    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 :
    IF Liste1.Value = "1" THEN...
    0
  2. Utilisateur anonyme
     
    Bonjour,

    Une fois la valeur affecté, si tu veux sauvegarder la donnée ?

        Liste1.Value = "1"
        DoCmd.Save
        RefreshDatabaseWindow
    


    Lupin
    0
  3. [GORe]Donald Messages postés 8 Date d'inscription   Statut Membre
     
    Je vous remercie tous j'ai trouvé la solution tout seul:

    If (IsNull[champ]) Then
    MsgBox "Remplissez le champ!"
    Else
    MsgBox "OK"
    End If
    0