Modifica vba lotto

buongiorno
soprattutto pe Salv e Excel.... puo' interessare il tabellone delle 10 ruote costituito dall'elenco dei terni e relative uscite per ogni terno ?
non vorrei fare un lavoro inutile
l'ho semi completato ma per fare una cosa precisa ci vuole attenzione, se non serve lascio perdere

LEO

Ciao Leo Buongiorno, per me non è influente, bisogna vedere cosa ne dice Excelnewbye che è l'autore del post.

Ciao Salvatore

leo sarebbe molto utile!
però a me interesserebbe avere anche la data o numero di concorso per ogni terno ripetuto!

per quanto riguarda i dati estrapolati da sal li ho messi in 1 db mysql e con php fatto le query per vedere date e risultati.. e sembrano ok!

https://cutt.ly/CFRMHJL

resta il mistero della discrepanza delle ricerche fatte con power pascal..

Ragazzi, non sono abituato ai polpettoni, non saprei come mandare il file già zippato di 3,7 Mega, qui non lo prende

LEO

qui :
tabellone creato da Leo


elenco dei terni e numero di ripetizione su tutte le ruote

Ecco, Excelnewbye mi aiuta a postare
le 2 immagini fanno vedere inizio di ruote e in fondo ad ogni ruota c'è il piccolo riepilogo della somma totale dei terni, numero e distribuzione di ogni terno, somma dei terni per quantità di sortita.
Già così è diventato un mattone, figuriamoci che cosa avrei mai dovuto fare se avessi seguito la richiesta di Excel...
lo scopo era quello di fare un conteggio affidabile confermato dai riepiloghini, e si basa sull'archivio del programma di Salvatore del 6 aprile ore 17:35, le ruote sono state isolate, pulite da porcherie artefatte e private delle estrazioni zero
Grazie dell'attenzione

LEO

Ciao Leo, in effetti il limite i file è Max di 3Mb, puoi inserirlo su un sito di hosting ed inserire solamente il link nella discussione

quello che sto utilizzando ultimamente è questo

https://www.filehosting.org/

non ce bisogno di iscrizione, ti chiede di inserire scegliere il file, inserire la tua mail accettare i termini di servizio e fai l'upload, ti arriva la mail con il link da copiare e inserire, ti da anche la possibilita di cancellare il link del file.

ce ne sono anche altri, basta fare la scelta

prima usavo Filedropper ma è diventato problematico inserire il file da inviare

Ciao By Sal (8-D

by sal, 13/04/2022 11:38:

---

https://www.filehosting.org/

Ciao By Sal (8-D

---

Grazie, egregio

Ho 1 ultima domanda per Sal premesso che mi servono cosi come li hai ordinati...

prima di ordinarli in orizzontale e verticale tutti i terni

come erano incolonnati dal primo terno trovato all'ultimo terno ricorso? viceversa?

@Sal

forse ho trovato dove sta l'errore



per qualsiasi ruota si fa la ricerca l'ultimo rigo sballa conteggio

non so se ho capito bene ma se è l'ultima riga potrebbe dipendere dall'algoritmo, e come la mettiamo con le estrazioni ZERO ?

LEO

L2018, 13/04/2022 19:36:

---

non so se ho capito bene ma se è l'ultima riga potrebbe dipendere dall'algoritmo, e come la mettiamo con le estrazioni ZERO ?

LEO

---

sembra che all'ultima riga dei terni invece di contare 1 singola uscita (o comunque il numero di volte che si è verificato)... conti come se fosse una uscita in + del terno precendente!
avviene su tutte le ruote.

excelnewbye, 13/04/2022 10:42:

---

resta il mistero della discrepanza delle ricerche fatte con power pascal..

---

in che consistono queste discrepanze ? puoi fare esempio breve ?

a parte i post che vengono pubblicati qui, almeno una volta mi piacerebbe confrontare un mio algoritmo col tuo in pascal e con salv, per verificare prestazioni e affidabilità

ecco io scrivevo mentre anche tu, quindi ribadisco il mio auspicio di confronto, ma servono esempi, o listato o meglio pseudo-codice

LEO

ciao a tutti
premetto che Salvatore è un'ottima persona, sempre disponibile, e in grado di fare magie, al punto che mi chiedo come abbia avuto la pazienza di architettare il programma di cui alla discussone "Modifica vba lotto"
tuttavia quando è stato osservato che la ricerca dei terni richiedeva non meno di 4 minuti, mi sono chiesto il perchè, e ho provato a fare io qualcosa di simile, comunque non confrontabile neppur lontanamente col suo programma.
Io mi limito a fare routines piccole e semplici, con lo scopo della velocità e della precisione, e per questo esse sono da usare via console, sarebbe a dire Prompt Dos.
Comunque spesso prelevano files di tipo CSV e restituiscono pure files CSV che possono essere reinseriti in Excel per affiancarlo.
Questo micoscopico prog preleva un file di estrazioni di tipo lotto, con i seguenti requisiti
Colonna A = DATA, Colonne B,C,D,E,F gli estratti (quindi per adesso UNA sola ruota).
non deve essere sporco con caratteri extra
puo' rischiare di trovare estrazioni tipo 0.0.0.0.0 (vedi CA e GE ma non ho testato)
elabora sia righe ordinate che non ordinate, lo capisce da solo.
Alla richiesta del nome file si puo' scrivere qualsiasi percorso MA senza l'estensione .CSV, di solito i files li trova nella sua cartella.
Restituisce un file CSV il cui nome è costituito dal nomefile datogli +"terni".
Il file CSV risultante contiene tutti e solo i terni degli estratti, in ordine lessicografico, e in quarta colonna le date che non sono però in ordine cronologico stretto, anche se a fianco dello stesso terno. Si puo' ovviare facilmente in Excel.
Sul mio "i3" 6500 estrazioni sono elaborate e scritte in 0,8 secondi.
Il prog non compete con BySal perchè è assolutamente striminzito, e non realizza (ancora) le richieste di Excelnewbye ma è fulmineo e affidabile.
Fatene quello che vi pare.

Il file-programma si trova in:

PROGRAMMA

Saluti
LEO

ciao a tutti
premetto che Salvatore è un'ottima persona, sempre disponibile, e in grado di fare magie, al punto che mi chiedo come abbia avuto la pazienza di architettare il programma di cui alla discussone "Modifica vba lotto"
tuttavia quando è stato osservato che la ricerca dei terni richiedeva non meno di 4 minuti, mi sono chiesto il perchè, e ho provato a fare io qualcosa di simile, comunque non confrontabile neppur lontanamente col suo programma.
Io mi limito a fare routines piccole e semplici, con lo scopo della velocità e della precisione, e per questo esse sono da usare via console, sarebbe a dire Prompt Dos.
Comunque spesso prelevano files di tipo CSV e restituiscono pure files CSV che possono essere reinseriti in Excel per affiancarlo.
Questo micoscopico prog preleva un file di estrazioni di tipo lotto, con i seguenti requisiti
Colonna A = DATA, Colonne B,C,D,E,F gli estratti (quindi per adesso UNA sola ruota).
non deve essere sporco con caratteri extra
puo' rischiare di trovare estrazioni tipo 0.0.0.0.0 (vedi CA e GE ma non ho testato)
elabora sia righe ordinate che non ordinate, lo capisce da solo.
Alla richiesta del nome file si puo' scrivere qualsiasi percorso MA senza l'estensione .CSV, di solito i files li trova nella sua cartella.
Restituisce un file CSV il cui nome è costituito dal nomefile datogli +"terni".
Il file CSV risultante contiene tutti e solo i terni degli estratti, in ordine lessicografico, e in quarta colonna le date che non sono però in ordine cronologico stretto, anche se a fianco dello stesso terno. Si puo' ovviare facilmente in Excel.
Sul mio "i3" 6500 estrazioni sono elaborate e scritte in 0,8 secondi.
Il prog non compete con BySal perchè è assolutamente striminzito, e non realizza (ancora) le richieste di Excelnewbye ma è fulmineo e affidabile.
Fatene quello che vi pare.

Il file-programma si trova in:

PROGRAMMA

Saluti
LEO

L2018, 13/04/2022 21:29:

---

ecco io scrivevo mentre anche tu, quindi ribadisco il mio auspicio di confronto, ma servono esempi, o listato o meglio pseudo-codice

LEO

---

Ho scaricato il tuo eseguibile e lo testerò

Quello che vorrei fare (proverò con php che è unico dove riesco a mettere 1 poco le mani)
è..

Caricare una riga per volta e creare tutte le 10 combinazioni possibili
secondo lo schema

NUM1 NUM2 NUM3 NUM4 NUM5

NUM1 NUM2 NUM3
NUM1 NUM2 NUM4
NUM1 NUM2 NUM5
NUM1 NUM3 NUM4
NUM1 NUM3 NUM5
NUM1 NUM4 NUM5
NUM2 NUM3 NUM4
NUM2 NUM3 NUM5
NUM2 NUM4 NUM5
NUM3 NUM4 NUM5



Controllare con due loop uno dentro l'altro se ci sono i tre numeri e segnarsi la data corrispondente...
Primo loop da 1 a 5 per scorrere i numeri estratti ed uno da 1 a 3 per scorrere il terno da cercare!

Per ogni cinquina azzero numero di match, scorro i 5 numeri confrontandoli con i 3 desiderati e ogni volta che sono uguali incremento match, se a fine riga match vale 3 è fatta...
e passo alla riga successiva.
fino a fine lista!

scusate, del programma citato ho 2 versioni, di cui una piu funzionale, credo di aver mandato quella che non mi piace, controllo e provvedo

CIAO

falso allarme, ho inviato quella migliore

ciao, a beneficio degli interessati:
Il programma funziona in 6 fasi

- carica il CSV in RAM in un solo colpo (risparmio tempo)

- fa il parsing, cioè elimina dai dati i separatori di campo(;) (perdita di tempo) e crea una tabella (concorsi X (data + 5 estratti))

- per ogni estrazione ordina la riga in modo ascendente (perdita di tempo)
(for estratto1=1 to 4 : for estratto2 = estratto1+1 to 5 : se l'1 è maggiore del 2 invertili)

- per ogni giorno di estrazione prende i 10 terni (non li crea, ma li legge in modalità combinatoria:
for a=1 to 3 : for b=a+1 to 4 : for c=b+1 to 5
e in coda ad ogni terno aggiunge la data (da semplificare) creando quindi una tabella alfanumerica

- ordina questa tabella in modo crescente di terni estratti (molto veloce) (il top sarebbe se il 10-12-2021 fosse capace di metterlo dopo il 13-11-2021, provvederemo)

- salva il tutto, non una riga alla volta, ma tutto in un colpo (massimo risparmio di tempo e di usura disco)

LEO

Al posto delle date che ti creano problemi potrestj considerare il numero di estrazione che ti da indirettamente la data.. Visto che sono associati in modo univoco

ma come ? i numeri estraz non vanno da 1 a circa 150 ? e se è così che ci faccio ? invece ho già escogitato il trucco per la data, devo verificarlo.
Per esempio 4/6/2014 diventerà 20140604, per cui il linguaggio di cui non riesco ancora a capire alcuni punti oscuri) ordinerà per forza le stringhe data, salvo riordinarle al volo in fase di scrittura

LEO

Ciao Leo ed Excel, non ho risposto mi sono preso il Covid ed ancora sono in quarantena molto difficile stando in casa.

il mio file terni già fa i conteggi per singola ruota, con le 10 combinazioni, ma basterebbe rifare la procedura per ogni ruota.

cliccando sulla prima freccia rossa dopo aver selezionato la ruota interessata, nel foglio "Visualizza" che allego



come potete vedere da colonna "A--G" riporta il numero la data la cinquina e lo sviluppo dei 10 terni, questo per ogni estrazione eliminando le estrazioni con gli 0zero, fatto questo conta tutte le uscite dei terni e li ordina dal più piccolo al più grande 1-2-3----88-89-90 se mancano vuole dire che non ci sono.

contandoli progressivamente mette 1 se è singolo e numera successivamente se sono più di 1 come si può vedere i terni 1-2-7----1-2-9.

a questo punto interviene la seconda freccia rossa per il riepilogo che viene riportato nel foglio "Ricerca" colonne N-O-P in alto i risultati ed in basso tutti i terni del risultato incominciando da 1 al max.
la logica è questa se un terno non ha ripetizioni, quindi 1 è unico se invece una serie di terni si ferma a 2 vuole dire che quel terno ha avuto max 2 uscite cosi per il 3-4-5-etc.., non viene preso il 2 o 3 intermedio perche la logica che se dopo il 2 viene il 3 allora non e singolo per il 2 se invece dopo il 2 viene 1 allora quel terno ha un uscita max di 2 e cosi per il resto, si avrà questo risultato, il terno l'ho unito solo con uno spazio tra i numeri, non ho messo il trattino in quanto Excel li considerebbe come date falsando il risultato



per Leo con le date, Excel considera le date come numero a partire dalla data del 01/01/1900, quindi la data 1/1/1900 = 1 la data 2/1/1900=2, etc.. per cui le date come numero sono uniche, non ci sono ripetizioni.

per non fare confusione con le date inglesi trasforma le date in numero cosi avrai il tuo numero unico per la data, dopo averle elaborate e trasportate su Excel puoi fare la riconversione

per trasformare la date in numero è molto semplice, seleziona tutta la colonna e mettila come formato "Generale" le vedrai trasformare in numero, quando le riporti su excel basta che selezioni la colonna e la formatti come la data che preferisci.

Ciao By Sal (8-D

Ciao Ho rivisto un poco il file ho eliminato quell'errore #N/D, ma non era influente, inoltre ho rifatto il controllo dei conteggi, perche controllavo solamente l'ultimo numero del terno, in quando essendo ordinati per 1°-2°-3° solo se cambiava il 3° allora il conteggio progressivo cambiava, però per eliminare dubbi ho fatto controllare tutti i 3 numeri precedenti se cambiava 1 anche in un altra posizione allora ricominciava il conteggio.

allego il file con la correzione ecco il link, non l'ho ridotto è cosi com'è, mi servo del file di hosting

https://www.filehosting.org/file/details/3113976/terni.xlsm

per Leo alleghi male il tuo file, non si riescono a scaricare, dopo aver caricato il file, ti arriva una mail al tuo indirizzo come questa



dove ci sono i 2 link il primo per condividere il file il secondo se lo vuoi cancellare non rendendolo più disponibile.

però alla fine della fiera io non riesco ancora a capire come Excelnewbye trovi la terna da giocare in tutte quelle combinazioni

ci sono metodi più facili e sicuri certo non per il terno, ma un ambo si, un esempio 23x5x17 è un sistema ortogonale con 23 numeri in 17 cinquine garanzia ambo 2 numeri estratti, più numeri estratti aumentano gli ambi e ci scappa pure il terno 17€ contro una vincita di 23€ logico che se non escono almeno 2 numeri dei 23 vai in perdita

Ciao By Sal (8-D

Ciao Sal
mi dispiace per il tuo covid, ma non sei vaccinato ? io, senza vaccino, non sono riuscito a beccarlo.

In 2 messaggi hai detto tante cose che non so se riesco a rispondere a tutto

Ripeto che i tuoi programmi sono sempre ottimi, a volte ci sono delle sbavature che però correggi con pazienza (che non so dove trovi), io ho alcune tue macro, devo dire fantastiche

in questa discussione al massimo posso averti invitato a controllare la precisione dei conteggi perchè all'inizio ci sembrava di vedere alcune discrepanze

quando invece Excelnewbye ha detto 4 minuti per ricerca allora ho preparato qualcosa per vedere se proprio ci voleva tanto per cercare un terno

Prendo atto dei tuoi algoritmi, ma devo rileggerli meglio.
in riferimento a questi ho già detto che mi piacerebbe confrontare un mio algo con un tuo, sia per vedere quale possa essere migliorato, sia perchè vorrei riuscire a tradurre un mio algoritmo in vba, ma per fare questo non va bene la messaggistica scritta di un forum, necessita un contatto a voce, che quasi nessuno accetta, chissà perchè.

per le date so bene come funziona excel, il problema delle date si pone a me col MIO prog, perchè il mio linguaggio è molto rigido, devo approfondire ma ho già escogitato un trucco, simile a quello che dici tu.

Per il file di hosting mi sembra strana la tua obiezione, il mio file l'ho riscaricato, e anche il tuo, ma in entrambi casi il sito chiede di nuovo una mail per mandarmi il link, quindi non capisco dove sbaglio.

gia che ci siamo il mio prog lo ripubblico con un'accortezza: invece di Lottino.exe si chiama Lottino.txt, se me lo fa passare, ovviamente una volta scaricato lo si rinomina .EXE.

Le richieste di Excelnewbye sembrano anche a me un po' ridondanti, più che altro ogni piccola richiesta in piu rende piu lento e macchinoso un programma, ma io non mi interesso di lotto e giochi simili, questi giochi mi servono soltanto come incentivo tecnico allo sviluppo e miglioramento di routines semplici, affidabili e veloci

LEO

Ciao Leo se vuoi contattarmi per parlare io uso skype solo quello oltretutto e gratis e si possono inviare file e far vedere il tuo desktop o quello del contatto, non uso la webcam quindi al massimo vedi il desktop oltre che per poter parlare con un microfono, ma solo se siamo collegati in chiamata altrimenti si può benissimo usare la chat.

se vuoi mandami una richiesta di contatto se sono al PC rispondo subito altrimenti appeno vedo la chiamata, il mio nick name è by_sal

Ciao By Sal (8-D

Prima di tutto vorrei augurarvi una buona Pasqua a tutti, in particolare a Sal e Leo.

Va detto che dopo le modifiche fatte da sal il tempo di esecuzione si é ridotto a circa 10 secondi (anche meno) e ha risolto anche il problema dell'ultima riga dove veniva sbagliato il conteggio.

excelnewbye, 17/04/2022 08:31:

---

Prima di tutto vorrei augurarvi una buona Pasqua a tutti, in particolare a Sal e Leo.

Va detto che dopo le modifiche fatte da sal il tempo di esecuzione si é ridotto a circa 10 secondi (anche meno) e ha risolto anche il problema dell'ultima riga dove veniva sbagliato il conteggio.

---

Ciao
grazie degli auguri che ricambio con piacere, anche a Salvatore
anche io ho notato che il tempo di ricerca di Sal è diminuito, anche tenendo conto di tutto il lavoro che il suo programma è chiamato a fare con una query. Ottimo

Anche io ho rimediato il problema delle date della mia piccola utility, che comunque ha un altro scopo e che ripubblico sempre come file TXT da rinominare come EXE
Certo non devo competere col programma di Sal, cmq ditemi se riuscite a prenderla e se funziona, vale solo per un CSV con data e 5 estratti.
Magari con calma gli faccio fare delle cose in più
Di nuovo auguri, io sono sempre qui

LEO

ciao

l'ultima versione del programma di Sal ci è stata data con un link ad un sito di hosting perchè era grande 9 mega
ho tolto al file tutti i risultati dell'ultima ricerca che era stata fatta, salvato, e ho visto che così pulita è umana da inoltrare, anche qui in FFZ
per cui la ri-posto, sono solo 2 mega

LEO