Cnum en VBA?

Le
Frédo P
Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #1336824
bonsoir Fredo,

ActiveCell.Formula "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"
' ou
x = Evaluate("=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))")

isabelle


Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre


Philippe.R
Le #1336819
Bonsoir Fredo,
=max(value(right([G9380:G9396],len([G9380:G9396])-1)))
conviendrait il ?
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Frédo P"
Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre




GD
Le #1336816
eh eh !!! Philippe ....
et le array ?????
toi y'en a chirogourdiste aussi ????
Selection.FormulaArray = _

"=MAX(VALUE(RIGHT(R[9379]C[6]:R[9395]C[6],LEN(R[9379]C[6]:R[9395]C[6])-1)))"

;-)))
@+

"Philippe.R" news:
Bonsoir Fredo,
=max(value(right([G9380:G9396],len([G9380:G9396])-1)))
conviendrait il ?
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Frédo P" news:

Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre








Philippe.R
Le #1336813
Bonsoir Gilbert,

eh eh !!! Philippe ....
et le array ?????
toi y'en a chirogourdiste aussi ????


Ben, je crois bien que oui ! ;o)))))
--
Amicales Salutations

Frédo P
Le #1336811
Isabelle : ce qui est donné, est donné. Mais malheureusement je n'ai pas le
résultat escompté.Elle doit être matricielle pour le cas et le résultat
attribué à une variable.... avec Evaluate?
--
.

Fred
Ôter nsp pour répondre
"isabelle"
bonsoir Fredo,

ActiveCell.Formula > "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"
' ou
x = Evaluate("=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))")

isabelle


Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre




isabelle
Le #1336806
bonsoir Fredo,

dans ce cas,

ActiveCell.FormulaArray "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"

isabelle


Isabelle : ce qui est donné, est donné. Mais malheureusement je n'ai pas le
résultat escompté.Elle doit être matricielle pour le cas et le résultat
attribué à une variable.... avec Evaluate?
--
.

Fred
Ôter nsp pour répondre
"isabelle"
bonsoir Fredo,

ActiveCell.Formula > > "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"
' ou
x = Evaluate("=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))")

isabelle


Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir cette
ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre






Frédo P
Le #1336804
Je ne sais pas trop la signification exact de Chirogourdiste, J'ai essayé
toutes les propositions et je n'ai pour aucune le bon résultat
Voila ce que j'ai en réalité:
Adrs = Eprv & "!" & Course.Offset(0, 3 + (Eprv = "Plat") * -1 + (Eprv "Monté") * 1).Address ' Eprv=Sheet
J'ai essayé:
[C5]= Evaluate("=MAX(ISNUMBER(RIGHT(" & Adrs & ",LEN(" & Adrs & ")-1)))").
[C5].FormulaArray=("=MAX(CNUM(RIGHT(" & Adrs & ",LEN(" & Adrs & ")-1)))").
Cette dernière m'inscrit bien le cnum mais ne le calcul pas.
Fred
Ôter nsp pour répondre
"GD"
eh eh !!! Philippe ....
et le array ?????
toi y'en a chirogourdiste aussi ????
Selection.FormulaArray = _


"=MAX(VALUE(RIGHT(R[9379]C[6]:R[9395]C[6],LEN(R[9379]C[6]:R[9395]C[6])-1)))"


;-)))
@+

"Philippe.R" news:
Bonsoir Fredo,
=max(value(right([G9380:G9396],len([G9380:G9396])-1)))
conviendrait il ?
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Frédo P" news:

Bonsoir tout le monde de Mpfe
Il y a t'il encore à cette heure :23h08 une âme pour me convertir
cette



ligne en VBA
{=MAX(CNUM(DROITE(G9380:G9396;NBCAR(G9380:G9396)-1)))}
--
.

Fred
Ôter nsp pour répondre












Frédo P
Le #1336803
Bonjour, il 1H37 du mat Isa

.> dans ce cas,

ActiveCell.FormulaArray > "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"


ISNUMBER donne ESTNUM et non pas CNUM,donc ça ne get pas.J'ai cherché dans
mes archives et n'ai rien trouvé, peut être dans disciplus, on verra dans qq
heures après zzzz.

isabelle
Le #1336798
ha ! ok, c'est VALUE la traduction de CNUM

Selection.FormulaArray = _
"=MAX(VALUE(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"
bonne nuit !
isabelle


Bonjour, il 1H37 du mat Isa

.> dans ce cas,

ActiveCell.FormulaArray > > "=MAX(ISNUMBER(RIGHT(G9380:G9396,LEN(G9380:G9396)-1)))"


ISNUMBER donne ESTNUM et non pas CNUM,donc ça ne get pas.J'ai cherché dans
mes archives et n'ai rien trouvé, peut être dans disciplus, on verra dans qq
heures après zzzz.



AV
Le #1336789
Sans pouvoir me prononcer sur la validité de la chaîne "Adrs" :

[C5] = Evaluate("MAX(VALUE(RIGHT(" & Adrs & ",LEN(" & Adrs & ")-1)))")
ou encore (entre autres)
[C5] = Evaluate("MAX((RIGHT(" & Adrs & ",LEN(" & Adrs & ")-1))/1)")

AV
Publicité
Poster une réponse
Anonyme