grazie a te del riscontro, un ciclo for come quello indicato con 10000 righe impiega circa 4 - 5 secondi (dipende ovviamente anche dal pc). Con centi...

per cancellare le righe meglio Sub CancellaR() Dim i As Integer For i = 100 To 1 Step -1 If Rows(i).Hidden = True Then Rows(i).Delete Nex...

ciao, uno spunto, supponendo le date in colonna A (la sub va quindi adattata) Sub FiltraAnni() Dim filtro As Date filtro = DateSerial(Ye...

ciao, se crei una tabella pivot ottieni il risultato, metti il titolo "Annual Return" in D1 togliendolo da D10 Sistemando i dati della pivot come ...

matriciale =SE(($D5:$D13<=K$3:T$3)*($E5:$E13>=K$3:T$3);$J5:$J13;"") Non matriciale =SE(($D5<=K$3)*($E5>=K$3);$J5;"")

ciao, altra soluzione, in K5 e trascini a dx ed in basso =SE(($D5<=K$3)*($E5>=K$3);"X";"") Con excel 365, formula matriciale (si espande d...

Assolutamente d'accordo 👍

se una regola è tale deve valere sempre e non random, vedo a volte pubblicati codici chilometrici (esempio nel link sotto) e che cosa sono, se non una...

ciao, soluzione con il dictionary (PS: non è possibile avere testo nero su sfondo bianco?) Sub Totali() Dim Dict As Object, nome As String...

ciao, con i dati disposti come in figura, in D2 e trascini in basso =INDICE($A$2:$A$11;CONFRONTA(0;CONTA.SE($D$1:D1;$A$2:$A$11);0)) e in E2 e tr...

" molto più complesso di quanto una tabella pivot credo possa sostenere." una pivot può essere create da file (contenuti in power query) con decine ...

sono gradite risposte anche anche alle altre soluzioni proposte, dato che comunque ti si è dedicato del tempo (gratis)

ciao alternativa in E6 =TESTO((E3*B6:B150);"##")

ciao, te la cavi anche con una tabella pivot, come da immagine. Nello stesso file si costruisce come di consueto, altrimenti, volendo la pivot su di...

ciao, altra soluzione =SOMMA(1*(AB3:AB15<>""))