se positionner sur le nième caractère @

G

galopin01

Guest

• 2 Février 2005

• #2

bonsoir,

Function Test(V As Range, S As String, j As Byte)
Z = V.Value
For i = 1 To Len(Z)
If Mid(Z, i, 1) = S Then k = k + 1
If k = j Then Exit For
Next
Test = i
End Function

A+

 

Vote positif 0 Vote négatif

M

Maniey

Guest

• 3 Février 2005

• #3

Un grand merci à galopin01 pour ta formule

Super forum

A+ et encore merci

 

Vote positif 0 Vote négatif

A

andré

Guest

• 3 Février 2005

• #4

Salut,

Par formule : =CHERCHE("µ";SUBSTITUE(A1;"@";"µ";2);1)

Le caractère "µ" est n'importe quel caractère non existant dans la chaîne de caractère à tester, et peut être remplacé par £ ou Ø, ¶, ...

Ândré.

 

Vote positif 0 Vote négatif

K

kloss

Guest

• 3 Février 2005

• #5

Très rusée cette formule... Je la note

 

Vote positif 0 Vote négatif