Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 14/08/2011, 22h07   #1
Invité régulier
 
Homme
Inscription : mai 2011
Messages : 28
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations forums :
Inscription : mai 2011
Messages : 28
Points : 9
Points : 9
Par défaut Vérifier si une ligne est sélectionnée dans une zone de liste

Bonjour,

Dans un formulaire, j'ai une zone de liste regroupant tous les enregistrements de ma table. Lorsqu'un utilisateur sélectionne une ligne dans cette zone, il peut sur appuis d'un bouton, modifier l'enregistrement concerné.

L'assistant de création de zone de liste demande lors de la création, de sélectionner un champs pour qu'il soit la référence et ainsi fournir la valeur de ce champs correspondant à la ligne sélectionner.

Mon problème est de récupérer cette valeur. J'utilise la propriété .Value de la zone de liste. Cela fonctionne lorsque l'utilisateur sélectionne une ligne dans la zone, mais lorsque aucune ligne n'est sélectionnée, j’obtiens un message d'erreur 'utilisation incorrecte de Null' sur ma variable SelectionFiche.

Voici le début de code pour vérifier si une ligne est sélectionnée:
Code :
1
2
3
4
5
6
7
Dim SelectionFiche as String
 
SelectionFiche = Me.Liste_Plante.Value
 
If SelectionFiche = "" Then
   MsgBox "Selectionner une fiche"
End if
Qu'en pensez vous?

Merci par avance.
Oxopor est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/08/2011, 22h35   #2
Rédacteur/Modérateur
 
Avatar de Dolphy35
 
Homme Morgan BILLY
Technicien de Production
Inscription : octobre 2004
Messages : 4 103
Détails du profil
Informations personnelles :
Nom : Homme Morgan BILLY
Âge : 33
Localisation : France, Ille et Vilaine (Bretagne)

Informations professionnelles :
Activité : Technicien de Production
Secteur : Industrie

Informations forums :
Inscription : octobre 2004
Messages : 4 103
Points : 8 728
Points : 8 728
Salut,

c'est normale car la valeur est null de ta liste.
Dans ce cas teste si c'est null

Code :
1
2
3
If IsNull(Me.Liste_Plante) Then
    MsgBox "Sélectionner une fiche"
End If
Dolphy
__________________
Personnaliser la vue Backstage d'Access 2010
Découvrez avec nous Office 2010
Je ne réponds pas aux questions techniques par MP
Dolphy35 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/08/2011, 22h39   #3
Invité régulier
 
Homme
Inscription : mai 2011
Messages : 28
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations forums :
Inscription : mai 2011
Messages : 28
Points : 9
Points : 9
Parfait, c'est tout à fait ça.

Du coup:
Code :
1
2
3
4
5
6
7
8
If IsNull(Me.Liste_Plante) Then
      MsgBox "Sélectionner une fiche"
   Else
      Dim SelectionFiche as String
      SelectionFiche = Me.Liste_Plante.Value
      ...
 
End If
Merci beaucoup.
Oxopor est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 15h57.


 
 
 
 
Partenaires

Hébergement Web