Composizione numeri con due casuali

[Statix]

ok avevo sbagliato l'inserimento della modifica,
però alla fine i risultati vengono cancellati

[Anthony47]

Eh SI!
La modifica #2 che ho inserito nel messaggio di poco fa e' sbagliata; quella giusta:

Codice: Seleziona tutto

            GotIt = True
'>> AGGIUNTE per memorizzare N° riga:
            If Fl1 Then
                V4X21(II, LBound(V4X21, 2)) = Lii
            Else
                V4X21(II, LBound(V4X21, 2) + 1) = Lii
            End If
'<< FINE Aggiunte
            Exit For

La precedente era la parte che mi serviva per confrontare l'esito

Ciao!

[Statix]

adesso va bene, sembra tutto ok.

[Marius44]

Ciao Anthony

Grandissimo (e non ho mai avuto dubbi). Ora finalmente ho capito come funziona davvero.

Mi permetto un piccolo appunto. Non è vero, come dice Statix (ciao) che è tutto OK.
Al numero in risposta per la riga occorre aggiungere 1

Ti prego, dimmi che ho ragione.

Ciao a tutti,
Mario

[Statix]

Ciao Marius44,
in effetti hai ragione, la ricerca dei numeri sfalsa di una riga in meno,

ho modificato aggiungendo +1 mi sembra che vada bene, ricontrollo un po di estrazioni

Codice: Seleziona tutto

'>> AGGIUNTE per memorizzare N? riga:
           
            If Fl1 Then
                V4X21(II, LBound(V4X21, 2)) = Lii + 1
            Else
                V4X21(II, LBound(V4X21, 2) + 1) = Lii + 1
            End If
           
           
           
           
'<< FINE Aggiunte


[Anthony47]

No, e' tutto corretto : la macro indica la riga della estrazione, non la riga Excel

[Marius44]

Ciao Anthony
con spirito "goliardico" ti dico che non sono d'accordo. La richiesta era

perchè volevo capire se è possibile individuare a quale riga dell'archivio fai riferimento in un dato momento.

Non volermene, tanto ho capito lo stesso.
Ciao,
Mario

[Anthony47]

Non volermene, tanto ho capito lo stesso.

Ti perdono

[ikwae]

Ciao a tutti ... io attendo fiducioso l'aiuto delle tre macro richieste come aiuto "supplementare" e so che prima o poi arrivano ... Cordialmente 73 ikwae

[Anthony47]

Rimasta indietro...

Dato che vorrei fare una modifica, [...] se trovi ancora qualche momento e mi faresti tre semplicissime macro[...]:
La Prima una che legga direttamente dal foglio Archivio con 5 colonne il numero in P3 e scriva i due numeri maggiori in colonna X partendo da X2 ... mi spiego meglio in P3 c’è un numero e la macro deve andare a cercare in Archivio a 5 colonne i due numeri maggiori, sulla stessa riga,del numero presente in P3 e li scrive(la coppia maggiore) in X2 (fine macro).
La seconda che legga il valore di P3(uguale a prima) e va a leggere sul foglio Archivio di 4 colonne e lo scrive in colonna X partendo da X2.(fine macro)
La terza che copia i due numeri da X2 a dx della colonna P ... Mi spiego meglio e in P4 c’è in numero scrive a dx di P4 se ci sono 2 numeri(P4 e S4) scrive a dx di S4 se ci sono tre numeri(P4,S4 e R4) scriva a dx di R3 i due numeri di X2.(fine macro)
Ricapitolo brevemente:
1)in P3 un numero e lo cerca nel foglio Archivio, di 5 colonne nel range G2:K(end), copia i due maggiori numeri e li scrive in X2 del foglio Sviluppo
2)in P3 un numero e lo cerca nel foglio Archivio, di 4 colonne nel range G2:J(end), copia i due maggiori numeri e li scrive in X2 del foglio Sviluppo
3) una macro che copia la coppia di numeri presenti in X2 e Y2 e li scrive a dx del numero presente sulla colonna P

Per capirci:
1) cercare tra le 100mila estrazioni del foglio Archivio il numero inserito in P3; quando trova il primo allora prende i due maggiori di quella riga e li scrive in X2-Y2. O no?
2) idem, ma considerando (sia per il "cerca" che per i "maggiori") solo le prime 4 colonne
3) copiare X2-Y2 e posizionarli dove? Accanto a P3? O dove

Ciao

[ikwae]

Gentilissimo Anthony ... Non avendo risposta ho inserito l'altro post di aiuto e con la tua preziosa spiegazione sono riuscito a cavarmela con delle macro casarecce oltre qualche modifica alle macro che mi hai già fatto quindi anche se lente(le mie casarecce) funzionano bene per adesso ... quindi se alla fine del ciclo danno "buoni frutti" chiederò aiuto per velocizzarle altrimenti se non danno i risultati sperati è inutile farti perdere del tempo che è sempre Prezioso ... ringraziandoti mille e mille volte per la tua Attenzione. Cordialmente 73 ikwae