Function macro

2301 -  
Bidouilleu_R Messages postés 1209 Statut Membre -
Bonjour,

Je suis débutante un VBA et j'ai deux fonctions des macros:
- La 1ère

Function calcul(texte as string ,chearac as string)As Integer
Dim pos as Integer
pos=1
while pos<= len(texte) and chearac <>"" and Instr(pos,texte,chearac)<>0

pos=Instr(pos,texte,chearac)+1
calcul=calcul+1

wend
End Function

====> mon problémé ESt-ce que cette function return numéro de position

Comment faire ?

Est-ce possible ? Et comment faire ?

Je remercie d'avance celui(ceux) qui m'eclairera(ont) sur ces points! Je ne maîtrise pas encore VBA et les macros pour m'en sortir seule et je patauge bien, malgré les aides que l'on peut trouver en ligne!!!
Encore merci!

A voir également:

2 réponses

Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Il suffit de la tester pour savoir ce qu'elle fait ... non ?

;o)
0
Bidouilleu_R Messages postés 1209 Statut Membre 295
 
je viens de jeter un oeil à ce code.

"Ta fonction" compte le nombre d'occurence
texte contient un premier chiffre sous forme texte et chearac contient une partie de ce texte.

S'il en trouve au moins une il incrémente calcul.

on peut faire plus simple mais bon...
mon problémé ESt-ce que cette function return numéro de position ?
la réponse est non!

il faut utiliser INSTR
0