Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Limites pour l'expression PremVrai

6 réponses
Avatar
Telesphore
Dans mon cas, PremVrai n'est accepté que 15 fois dans la source contrôle
d'une zone de texte . À la 16e fois, Access me dit "Expression trop
complexe".
Des suggestions pour contourner ce problème ?
Merci d'avance.

6 réponses

Avatar
chpa
Bonjour ou bonsoir déjà.
Des suggestions, je veux bien, mais c'est quoi PremVrai ?

"Telesphore" a écrit dans le message de
news:OZLsM%
Dans mon cas, PremVrai n'est accepté que 15 fois dans la source contrôle
d'une zone de texte . À la 16e fois, Access me dit "Expression trop
complexe".
Des suggestions pour contourner ce problème ?
Merci d'avance.


Avatar
Telesphore
PremVrai est la fonction Switch.
Voici ce que j'utilisais jusqu'à maintenant:

=Switch(
[StudentType]="CB";"Campus Belgium";
[StudentType]="CF";"Campus Farel";
[StudentType]="CT";"Campus Tahiti";
.
)

Merci.

"chpa" a écrit dans le message de
news:
Bonjour ou bonsoir déjà.
Des suggestions, je veux bien, mais c'est quoi PremVrai ?

"Telesphore" a écrit dans le message de
news:OZLsM%
Dans mon cas, PremVrai n'est accepté que 15 fois dans la source contrôle
d'une zone de texte . À la 16e fois, Access me dit "Expression trop
complexe".
Des suggestions pour contourner ce problème ?
Merci d'avance.





Avatar
db
Telesphore a écrit :
PremVrai est la fonction Switch.
Voici ce que j'utilisais jusqu'à maintenant:

=Switch(
[StudentType]="CB";"Campus Belgium";
[StudentType]="CF";"Campus Farel";
[StudentType]="CT";"Campus Tahiti";
..



Bonjour,

Donc, cela veut dire qu'il y a au moins 16 valeurs possibles de
[StudentType]. A mon humble avis, ça vaudrait le coup de faire une table
de nomenclature...

db
Avatar
Telesphore
Bonjour,

J'essaie avec du code VBA, mais
le code suivant fonctionnerait bien s'il n'y avait pas d'espace entre
"Type" et "Étudiant".
Access dit "Erreur de compilation" "Attendu: Identificateur"

Option Compare Database
Function Equivalence([Type Étudiant] As String) As String
Select Case [Type Étudiant]
Case "CB"
Equivalence = "Belgique"
Case "CF"
Equivalence = "Farel"
Case "CT"
Equivalence = "Tahiti"
End Select
End Function




"db" a écrit dans le message de
news:O$J%
Telesphore a écrit :
PremVrai est la fonction Switch.
Voici ce que j'utilisais jusqu'à maintenant:

=Switch(
[StudentType]="CB";"Campus Belgium";
[StudentType]="CF";"Campus Farel";
[StudentType]="CT";"Campus Tahiti";
..



Bonjour,

Donc, cela veut dire qu'il y a au moins 16 valeurs possibles de
[StudentType]. A mon humble avis, ça vaudrait le coup de faire une table
de nomenclature...

db


Avatar
db
Telesphore a écrit :
Bonjour,

J'essaie avec du code VBA, mais
le code suivant fonctionnerait bien s'il n'y avait pas d'espace entre
"Type" et "Étudiant".
Access dit "Erreur de compilation" "Attendu: Identificateur"

Option Compare Database
Function Equivalence([Type Étudiant] As String) As String
Select Case [Type Étudiant]
Case "CB"
Equivalence = "Belgique"
Case "CF"
Equivalence = "Farel"
Case "CT"
Equivalence = "Tahiti"
End Select
End Function





C'est une fonction, donc le paramètre formel peut être nommé
conformément aux règles :

Function Equivalence(strTypeEtudiant As String) As String

Select Case strTypeEtudiant
Case "CB"
Equivalence = "Belgique"
Case "CF"
Equivalence = "Farel"
Case "CT"
Equivalence = "Tahiti"
End Select
End Function


L'appel de la fonction se fera avec le paramètre réel :
Equivalence([Type Étudiant])

db
Avatar
Telesphore
Merci beaucoup.

Telesphore

"db" a écrit dans le message de
news:uJsc%
Telesphore a écrit :
Bonjour,

J'essaie avec du code VBA, mais
le code suivant fonctionnerait bien s'il n'y avait pas d'espace entre
"Type" et "Étudiant".
Access dit "Erreur de compilation" "Attendu: Identificateur"

Option Compare Database
Function Equivalence([Type Étudiant] As String) As String
Select Case [Type Étudiant]
Case "CB"
Equivalence = "Belgique"
Case "CF"
Equivalence = "Farel"
Case "CT"
Equivalence = "Tahiti"
End Select
End Function





C'est une fonction, donc le paramètre formel peut être nommé conformément
aux règles :

Function Equivalence(strTypeEtudiant As String) As String

Select Case strTypeEtudiant
Case "CB"
Equivalence = "Belgique"
Case "CF"
Equivalence = "Farel"
Case "CT"
Equivalence = "Tahiti"
End Select
End Function


L'appel de la fonction se fera avec le paramètre réel : Equivalence([Type
Étudiant])

db