Discussion :

[dyree]

Bonjour tout le monde, j'aimerais savoir si il est possible a l'aide d'une requête d'acceder au type du champ de la table ?

par exemple le resultat retournerait TEXTE, OUI/NON, NUMERIQUE, etc...

merci d'avance

[boubignole]

Salut

essaye avec la fonction VraiFaux associé à TypeName

[dyree]

oki merci , cela peut être une solution, seulement, si je dois refaire un test pour chaque type, ca peut s'averer assez long -.-

[Invité]

Salut

En VBA par les collection tabledefs et fields

Starec

[Tofalu]

A priori c'est impossible avec une requête.

[boubignole]

Heu il me semble bien que la fonction TypeName(NomChamp) ramène le type de champ dans une requete. C'est vrai que l'intérêt est assez limité mais bon ça marche. Sauf pour les Oui/Non, la fonction renvoie Interger.

[random]

sinon on peut utiliser une fonction de ce genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Function typchamp(x As Variant) As Integer
typchamp = VarType(x)
End Function
 
Function traduit(typec As Integer) As String
Select Case typec
Case 2
traduit = "entier"
Case 3
traduit = "long"
Case 4
traduit = "décimal)"
Case 6
traduit = "monétaire"
Case 7
traduit = "date"
Case 8
traduit = "texte"
Case 11
traduit = "oui/non"
Case Else
traduit = "autre"
End Select

[random]

sinon pour règler le pb des booléens

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Function ctyp(reco As String, ch As String) As Variant
Dim base As DAO.Database
Dim prov As Variant
Set base = CurrentDb()
ctyp = base.TableDefs(reco).Fields(ch).Type
Set base = Nothing