Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
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 19/01/2011, 15h01   #1
Nouveau Membre du Club
 
Inscription : décembre 2009
Messages : 113
Détails du profil
Informations forums :
Inscription : décembre 2009
Messages : 113
Points : 25
Points : 25
Par défaut Select Case variable string et accent

Bonjour,

Dans un formulaire, j'ai une liste "list_region" alimentée par une table.

Quand je clique sur la liste, je lance une procédure (variable "bassin" défini comme string dans un module) :

Code :
1
2
3
4
5
6
7
8
9
10
11
bassin = list_region.ItemData(list_region.ListIndex)
 
Select Case bassin
.
.
.
 Case "Sèvre Niortaise"
  Call OuvreDoc("etat_region_sevre_niortaise_17_79_86")
 Case "Dive du Nord"
.
.
Quand je double-clique dans ma liste sur "Sèvre Niortaise" = ma variable "bassin", le select case ne marche pas (vérifié en mode débogage pas à pas). L'accent semble faire bugger le Case ??
atech est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/01/2011, 08h41   #2
Membre Expert
 
Avatar de bernardmichel
 
Inscription : janvier 2004
Messages : 985
Détails du profil
Informations forums :
Inscription : janvier 2004
Messages : 985
Points : 1 028
Points : 1 028
Envoyer un message via MSN à bernardmichel Envoyer un message via Skype™ à bernardmichel
Salut,

J'ai essayé avec ce bout de code:
Code :
1
2
3
4
5
6
7
8
Dim bassin       As String
 
bassin = "Sèvre Niortaise"
 
Select Case bassin
    Case "Sèvre Niortaise"
        MsgBox "Hello world"
End Select
Le "Sèvre Niortaise" est bien pris en compte. As-tu bien vérifié que ta variable "bassin" prend bien la valeur "Sèvre Niortaise" ?

D'autre-part, dans ton message, avant l'exemple de code, tu parles de "Clic" et après le code tu parles de "Double-clic"...
bernardmichel est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/01/2011, 09h14   #3
Nouveau Membre du Club
 
Inscription : décembre 2009
Messages : 113
Détails du profil
Informations forums :
Inscription : décembre 2009
Messages : 113
Points : 25
Points : 25
Citation:
Envoyé par bernardmichel Voir le message
Salut,

J'ai essayé avec ce bout de code:
Code :
1
2
3
4
5
6
7
8
Dim bassin       As String
 
bassin = "Sèvre Niortaise"
 
Select Case bassin
    Case "Sèvre Niortaise"
        MsgBox "Hello world"
End Select
Le "Sèvre Niortaise" est bien pris en compte. As-tu bien vérifié que ta variable "bassin" prend bien la valeur "Sèvre Niortaise" ?

D'autre-part, dans ton message, avant l'exemple de code, tu parles de "Clic" et après le code tu parles de "Double-clic"...
Merci pour la proposition.
En fait, je viens de voir qu'il y avait un espace double dans ma table
atech 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 01h25.


 
 
 
 
Partenaires

Hébergement Web