Discussion :

[chaser_T]

Bonjour à tous,

Voici mon problème:
J'ai une formule ( ex: SOMME(X:Y) ) que j'ai récupéré dans le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

formule = Cells(row,col).FormulaLocal

Est-il possible d'extraire la partie ":Y" juste après le 'X' et avant ')' ? sachant qu'on ne connait pas la longueur entre le ':' et le ')' , on ne connait pas la longueur de X

Faut-il passer par les fonctions Mid,etc.... ? Ou y a t il un moyen plus effice avec les expresssions reg ?

Merci de vos suggestions ,liens,etc...

Chaser_T


PS: Etant que fonctionel métier, je ne comprend rien à VB. Cela fait 2 jours que j'apprends VB et que je galère

[ZebreLoup]

Tu peux t'en sortir avec du Mid et du InStr. Regarde la doc dessus et reviens si tu as un problème de compréhension.

Par contre par curiosité, pourquoi tu dois faire ça ? Ça me parait super bizarre j'avoue. Normalement, tu maîtrises ce que tu avais mis dans ta formule non ?

[mercatog]

Pour ta formule donnée en exemple (=SOMME(X:Y))

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim Formule As String, Y As String
 
Formule = "=SOMME(AB125:AC1256)"
Y = Split(Formule, ":")(1)
Y = Left(Y, InStr(Y, ")") - 1)
MsgBox Y

[chaser_T]

Merci pour vos réponse.

ZebreLoup

La formule sera généré par une fonction et sera en fonction de la ligne. Car en faite, j'essaye de réécrire la méthode insertion d'une ligne mais personnalisé ( des cellules avec des valeurs, formules par défaut qui doit prendre en compte à quel niveau la ligne a été inséré "arborescence" et mettre à jour les formules des lignes de niveau supérieur)

Merci Mercator, je vais tester ton code.