Condividi:        

verificare il termine della progress. martingala

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

verificare il termine della progress. martingala

Postdi raimea » 29/02/24 19:41

ciao
tramite una macro avrei bisogno di verificare quando la
progressione martingala e' terminata "saltata"
cosa che tramite formule non riesco a fare.

il fgl martingala contiene gia le formule per realizzare
tale progressione ed e' funzionante.

il controllo va fatto sui valori delle celle di col N e T

la progres. si considera terminata quando:

il valore in cella col N contiene un importo SUPERIORE
al valore della cella PRECEDENTE di col T

per spiegarmi meglio uso i rif del file allegato,
il valore di cella N30 e' > di T29
in questo caso si considera terminata "saltata".

la macro dovremme rispondermi con un msgbox
contenente la cella di col N (N30), e la scritta terminata.

spero di essermi spiegato.

via allego il file.

https://www.dropbox.com/scl/fi/x8a06emuoh1lcwfwg7l7h/martingala.xlsm?rlkey=ko39pfxc0ze0j46q9t0lssojf&dl=0

ciao
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1414
Iscritto il: 11/02/10 07:33
Località: lago

Sponsor
 

Re: verificare il termine della progress. martingala

Postdi Anthony47 » 29/02/24 22:49

In formula potrebbe bastare
Codice: Seleziona tutto
=MAX(SE(N6:N100>T5:T99;RIF.RIGA(N6:N100);""))
(Contr-Maiusc-Enter)

Tradotto in vba:
Codice: Seleziona tutto
Dim MaRow As Long

MaRow = Evaluate("MAX(IF(N6:N100>T5:T99,ROW(N6:N100),""""))")
MsgBox ("Terminata su N" & MaRow)
Avatar utente
Anthony47
Moderatore
 
Post: 19217
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: verificare il termine della progress. martingala

Postdi raimea » 01/03/24 09:01

ciao
tutto ok entrambe le soluzioni

grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1414
Iscritto il: 11/02/10 07:33
Località: lago

Re: verificare il termine della progress. martingala

Postdi raimea » 22/03/24 21:45

ciao
la macro

Codice: Seleziona tutto
Dim MaRow As Long

MaRow = Evaluate("MAX(IF(N6:N100>T5:T99,ROW(N6:N100),""""))")
MsgBox ("Terminata su N" & MaRow)


ora mi sta dando un risultato errato

nel file allegato dovrebbe indicarmi la cella N31
in quanto il valore e' maggiore di T30

invece indica la cella di ultima riga N53, perche' ?

anche la formula in O3 da stesso risultato N53!!

vi allego il file

https://www.dropbox.com/scl/fi/euvkqx1dn8g22f5b1hh1d/martingala2.xlsm?rlkey=ea87svhpaqll6zfzttlckq6u2&dl=0

ciao
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1414
Iscritto il: 11/02/10 07:33
Località: lago

Re: verificare il termine della progress. martingala

Postdi Anthony47 » 23/03/24 00:45

In realta' la formula giusta avrebbe dovuto essere:
Codice: Seleziona tutto
=MIN(SE(N6:N100>T5:T99;RIF.RIGA(N6:N100);999))
ma il layout precedente mi aveva tratto in inganno :oops:

In vba:
Codice: Seleziona tutto
MaRow = Evaluate("MIN(IF(N6:N100>T5:T99,ROW(N6:N100),999))")
Avatar utente
Anthony47
Moderatore
 
Post: 19217
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: verificare il termine della progress. martingala

Postdi raimea » 23/03/24 07:28

ciao

ora ok
faccio altri test

grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1414
Iscritto il: 11/02/10 07:33
Località: lago


Torna a Applicazioni Office Windows


Topic correlati a "verificare il termine della progress. martingala":


Chi c’è in linea

Visitano il forum: Nessuno e 19 ospiti