lettre

[ninou58]

Re bonjour,

Décidemment je ne m'en sors plus.
If InStr(1, nom, '.') > 0 Then
mavar = Left((nom), Len((nom)) - 2)
Sheets(nomfeuille2).Cells(dl2, 3) = mavar
Else
Sheets(nomfeuille2).Cells(dl2, 3) = nom
End If
Voici mon petit bout de code qui me permet de répérer s'il y a un point dans le mot , et s'il y a de supprimer les deux lettres.
Hors maintenant j'ai besoin de cette lettre la dernière.
Par exemple XXX.Y
dans mavar avoir XXX
dans mavar2 avoir Y
Possible?

Ensuite est- ce que quelqu'un sait comment il faut faire pour dire que l'on veut (dans une requête) le pramière lettre du prénom = Y.

Entre mes lettres mes requêtes dur dur.

Merci d'avance


:ermm:

 

[PascalXLD]

Bonjour

essaies

If InStr(1, nom, '.') > 0 Then
mavar = Left((nom), Len((nom)) - 2)
mavar2=right(nom,1)
Sheets(nomfeuille2).Cells(dl2, 3) = mavar
Else
Sheets(nomfeuille2).Cells(dl2, 3) = nom
End If

Bon courage

 

[ninou58]

RE,
Je te remercie cela fonctionne, je récupère bien la première lettre et le nom. Deja une hcose de faite.
Maintenant faut s'attaquer au like et honnetement j'y arrive pas.

Merci

Bonne journée

 

[pierrejean]

bonjour ninou

a propos du like et sous reserve que j'aie bien compris

if prenom like 'Y*' then
msgbox(' le prenom commence par Y')
end if

 

[PascalXLD]

RE

Bah Pierre-Jean je comprends comme toi

Le tout est de savoir où tu les récupères tes prénoms.

 

[Gorfael]

ninou58 écrit:

RE,
Je te remercie cela fonctionne, je récupère bien la première lettre et le nom. Deja une hcose de faite.
Maintenant faut s'attaquer au like et honnetement j'y arrive pas.

Merci

Bonne journée

Salut
Like est équivalent à '=' sauf que ça admet les caractères génériques si tu mets
If Var='A*', A* sera pris, mais pas AA ou AB
alors qu'avec Like, ils répondront à la comparaison.
A+

 

[ninou58]

RE,

c'est dans une requête :
v_strsql = 'INSERT INTO DETAILS(CodeMachine, Numsemaine, Numjour, Annee, Libelleposte, Matricule, Codeunite, ExceptionD, CnumposteD) SELECT ' & machine & ' AS Expr1, ' & sem & ' AS Expr2, ' & jour & ' AS Expr3, 2006 AS Expr4, ' & posteR & ' AS Expr5, PERSONNEL.Matricule, ' & unite & ', ' & exception & ' AS Expr7, ' & numposte & ' AS Expr8 FROM PERSONNEL WHERE(PERSONNEL.nom = ' & nomE & ')AND (prenom LIKE ' & prenomE & ')

Mais le like ne fonctionne pas.
je voudrais insérer la ligne en mettant le matricule de la personne qui a pour nom nomE et dont la première lettre du prénom est prenomE.
Grâce à votre aide, j'ai pu recupérer la première lettre du prénom. mais c'est ma requête qui coince. Sans le prnom LIKE elle passe bien mais sinon elle n'insert pas.

Merci encore

 

[PascalXLD]

RE

Tu n'as pas mis l'* dans ta requète

(prenom LIKE ' & prenomE & '*)...

 

[ninou58]

Re
Je vais regarder si ta méthode fonctionne ne attendant j'ai fait ainsi :
prenomE = ' '' & prenomE & '%' '

Comme ça c'est directement intégré et y a plus de souci. Enfin pour le moment.
En tout cas merci pour votre aide.