Risultati della ricerca

Noooooo Genios indice annuale per gli archivi da allacciare con i codici FT non sono previsti. Infatti io l'ho sostituito con il numero progressivo e così l'archivio viene allacciato e funziona. le estrazioni in quell'archivio sono 291 e cosi le ho riportate partendo dal numero progressivo 1...

Ciao Genios , lo avevo trovato anche lo stesso archivio. Per trasformarlo e renderlo leggibile dagli script FT la procedura e sempre la stessa. 1 - da blocco note Sostituisci lo spazio vuoto con ; 2 - riporti il tutto in excel in formato riga 3 - testo in colonne > dividi le celle 4 - elimini...

Ciao C-64 ne approfitto per un saluto. Come puoi vedere la decina del 70 riporta erroneamente lo zero , anzichè 7

Genios, provo a spiegare.... la funzione VerificaEsito contiene dei parametri e quindi anche la possibilità di verificare l'esito in nColpi dato un range di inizio e fine estrazioni. La funzione usata così si fermerebbe al primo esito utile, mentre tu vorresti più esiti in tot range...

Ciao Genios, il ragionamento dello script è leggermente diverso. 1 - stabilisce un range di 360 estrazioni con il fine verifica range a - 20 estrazioni 2 - controlla e verifica i numeri trovati dal range fine verifica fini alla estrazioneFin reale. quindi per quello che chiedi o agisci sul...

intanto non era facile eliminare i ripetuti e quindi riposto lo script. Per l'archivio non mi ricordo... Sub Main Dim sFile,sChrSep,nCol,VetN,VetQ '------------------------------------------- sChrSep = ";" ' carattere separatore nCol = 8' Numeri in colonna...

Si Eugenio, si possono eliminare con il codice preposto EliminaRipetuti in questa zona dello script Scrivi String(140,"=") EliminaRipetuti(aNum) ' metti questo codice Scrivi kk & " Numeri Trovati in tutte le posizioni.... " & StringaNumeri(aNum),1 Scrivi "Range di Verifica " &...

scusa genios ecco tutto l'archivio ne avevo selezionato solo una parte. e puoi usare tutti i parametri che vuoi

Ulteriore suggerimento per gli archivi FT quando si immette una nuova colonna non andare a capo , altrimenti trova una riga vuota , pena non leggibilità archivio. Per ovviare a questo salvare sempre all'ultima riga parametri senza andare a capo. esempio 100; 31/12/2022; 19,20,21,22,23,24,25,26...

fatto con numero progressivo, data, colonna. e con carattere separatore ; Per il Parametro filtro usa 4 presenze altrimenti se non trova almeno 1 numero su posizione lo script va in errore in quanto non può raggruppare nessun numero Ciao

Penso che sia quello la causa di errore , devi ricrearti un file con i giusti parametri I codici con suffisso FT hanno bisogno di un archivio con i seguenti parametri ID prgressivo data formato 00/00/0000 colonne il tutto separato da un carattere separatore. Io non ho l'archivio in ordine di...

Non so, la data deve avere quel formato, forse potrebbe essere il formato progressivo io ho questo cosi è funziona con spazio vuoto 1 03/01/2022 09 47 50 67 73 74 85 49 2 04/01/2022 05 18 59 78 81 89 10 09 3 08/01/2022 35 42 49 63 68 78 01 33 4 10/01/2022 03 25 30 58 66 84 72 55 5 11/01/2022 15...

Si vede che nel carattere separatore hai il punto e virgola, devi metterlo nello script dove ti ho indicato con sChrSep = " " ' carattere separatore - spazio vuoto come vedi nel mio archivio ho uno spazio, tu metti il punto e virgola sChrSep = ";" ' carattere separatore - punto e virgola poi...

Sono D'accordo con te, effettivamente una volta analizzate le risultanze resta chiaro che la posizione 6 trovi più estratti ed estratti con numeri alti e che falsi la raccolta dati. Quindi è meglio come dici un archivio TF con numeri in ordine di estrazione. Ecco il File di testo facilmente...

Fatto lo script per SuperEnalotto con codici SE ed archivio di spaziometria (ora funzionante con l'aggiornamento automatico) , su 6 posizioni senza jolly e superstar (dichiarati False). Se poi Serve in FT facciamo anche quello. Ciao Sub Main fin = EstrazioniArchivioSE - 20 '3653-20 Ini =...

Si !! Genios, può essere possibile... solo una domanda, perchè il superEnalotto in formato TXT.... quando si può utilizzare il suo archivio a 6 estratti senza jolly e superstar e con i suoi codici SE. Tuttavia con i codici con suffisso FT si può fare qualsiasi archivio. Dimmi se lo vuoi esterno...

Ok ci stavo lavorando a questa ultima richiesta. Ho fatto uno script facile....facilitato... Che in base al filtro presenze su posizione poi raggruppa i numeri trovati e ne verifica la sortita per sorte. Sub Main Dim Ru(1) Ini = 9931 fin = 10291 r = 1 filtro = 8 Ru(1) = r...

Genios, i numeri con frequenza > 9 sono quelli in quel range, se vuoi altro filtro i numeri saranno raggruppati se presenti. la funzione filtro è questa nello script valuta come meglio vuoi operare. filtro = CInt(InputBox("Quale presenza per posizione superiore a ",,9)) ' scelta If...

La Verifica Esiti parte da sorte 1 = estratto ma trova e può trovare anche sorti superiori. Ciao

eccolo Sub Main Dim aP,aV,nEsiti,Ru(1) Ini = EstrazioniArchivio -(360 + 20) fin = EstrazioniArchivio - 20 fine = EstrazioniArchivio Tot = fin - Ini filtro = CInt(InputBox("Quale presenza per posizione superiore a ",,6)) r = InputBox("Quale Ruota",,1) Scrivi "Estrazioni...