Utilisation chaine de caracteres Résolu/Fermé

Question

Configuration: Windows XP
Accèss 2000

Bonjour,

Sur mon formulaire "Formulaire X" dans une procedure, j'ai ceux-ci

Private Sub Commande148_Click()
On Error GoTo Err_Commande148_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "Formulaire saisie tous timbres"
    stLinkCriteria = "[Numéro YT]=" & "'" & Me![Numéro YT] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Commande148_Click:
    Exit Sub
Err_Commande148_Click:
    MsgBox Err.Description
    Resume Exit_Commande148_Click
End Sub

qui me permet d'ouvrir par click sur bouton 148 le formulaire ""Formulaire saisie tous timbres" sur un enregistrement qui possede le meme Numéro YT  que dans le "Formulaire X".
Je voudrais faire la meme chose mais en comparant une chaine de caractère de ce numéro YT
EX: Actuel  Sur mon "formulaire X" numero YT =TI00107a,, en cliquant sur le bouton 148, cela ouvre "Formulaire saisie tous timbres" sur l'enregistrement avec Numero YT = TI00107a,,
Maintenant, je voudrais ouvrir  "Formulaire saisie tous timbres" sur l'enregistrement avec Numero YT = TI00107 c'est à dire correspondant à une chaine de caractère de Numero YT sur mon "Formulaire X".


J'espere que mes explications conviendront.

Tessel75 · Answer

Bonsoir,
Dans ce cas il faut utiliser la fonction Left(ChaineDeCaractère,NbCaractereARetenir)
càd dans le cas donné en exemple Left(Me![Numéro YT],7)
mais il est possible de ruser si on ignore le nombre de caractères du contrôle ou de la chaîne, mais qu'on sait celui qu'on veut exclure à la fin. Il suffit alors de lui faire calculer le nombre de caractères de la chaîne len(Chaine) et de soustraire le nbre à exclure (n): len(Chaine) - n
L'aide est correctement faite et vous en dira plus, plus en détail.
Cordialement.

NB qui me tient à coeur : Proscrivez de vos noms d'objets (tables, requêtes, champs, formulaires, etc, etc, tout) les espaces et les accents. Vous vous éviterez de très graves désagréments.

https://forums.commentcamarche.net/forum/affich-26623299-fichiers-corrompus-erreurs-lecture-seule-sur-access