Bonjour, je souhaite avec une fonction VBA sur excel, trouver la place du premier chiffre dans une chaîne de caractère.
Exemple: « j’ai acheter ma maison pour un prix de 525 000 euros en septembre »
J’aimerai donc qu’il me renvoie la place du premier 5 dans la chaîne de caractère.
J’ai écrit cette fonction:
Function FctPrix(colonne As String) As Integer
Dim i As Integer
i = 1
Dim j As Integer
j = 1
Dim val As Integer
val = 0
Do While i < 10 And j < 10
If (InStr(1, colonne, i) <= InStr(1, colonne, j)) Then
val = InStr(1, colonne, i)
j = j + 1
Else
i = i + 1
End If
Loop
FctPrix(colonne) = val
End Function
Malheureusement cela me met erreur.
Une idée svp?