Bonjour à tous,

 J'aimerais soumettre cette macro à votre sagacité :

Sub ExamplePosition
 Dim sInput As String
 Dim iPos as Integer

 sInput = "OpenOffice est GÉNIAL"
 iPos = Instr(sInput,"C")
 iPos = Instr(sInput,"g")
 iPos = Instr(sInput,"génial")
 print iPos

end sub

 Conclusion : pour InStr, É<>é, À<>à si Compare=1 pourtant il devrait faire
"comme si c'était pareil".
 Il est effectivement possible d'utiliser lCase mais ce n'est (à mon avis)
qu'une béquille.

 Il n'y a pas d'issue pour ce problème, j'attends vos réactions avant d'en
soumettre une.

Kenavo ar wech all,
Erwan

Répondre à