XL 2013 FORMULE EXCEL EN VBA

[piskely]

Bonjour,
Je reviens pour une nouvelle demande.
J'ai dans ma cellule C10: du texte et un montant en chiffres.
Avec Excel j'arrive à extraire le montant avec la formule suivante: =STXT(C10;CHERCHE(":";C10)+1;9^9);2;0)

Je voudrais traduire cette formule en VBA.
Merci d'avance pour les réactions

 

[Dranreb]

Bonsoir.
Essayez X = CDbl(Split([C10].Value, ":")(1))

 

[piskely]

Bonsoir.
Essayez X = CDbl(Split([C10].Value, ":")(1))

Bonjour Dranreb,
J'ai "Erreur de compilation :
Attendu : )"

 

[Dranreb]

J'ai pourtant mis dans mon instruction exemple 3 parenthèses ouvrantes et 3 parenthèses fermantes …

 

[soan]

Bonjour,

Je confirme : il y a bien toutes les parenthèses.

Il y a la conversion en Double : CDbl() ; et dedans : Split([C10].Value, ":") et (1) ;
le (1) est collé à droite du Split() ; il ne faut rien entre !

soan

 

[Dranreb]

En revanche la formule que vous indiquiez au début n'était pas bonne :

=STXT(C10;CHERCHE(":";C10)+1;9^9);2;0)

Celle ci oui :

=STXT(C10;CHERCHE(":";C10)+1;9^9)*1

 

[piskely]

Excusez moi j'avais quelques soucis de santé.
Merci à tous d'avoir répondu à ma demande. C'est réglé.