Novità

EXCEL E DINTORNI

Inserisco un nuovo link: https://mega.nz/file/HVhGwZrI#phKyzOsf4dYBVT85vjj0Dca6WegSFJHU5o8hphv6MN8

Mi sono accorto che il foglio Bari non era corretto. Ora funziona bene, almeno sembra. Prima in alcune quindicine le ultime estrazioni non c'erano. La Macro nel Foglio Bari si attiva cliccando sul tasto "Inserisci", e sembra funzionare, vedremo.
Invece i tentativi, sul Foglio Percentuali, per cancellare i numeri segnalati e usciti sono miseramente falliti. D'altra parte come può una IA capire la mia spiegazione se non la capisco neanch'io?
Corda princeps (il traduttore italiano-latino mi assicura significare In alto i cuori. Speriamo non siano parolacce)
Baciccia
 
Scusa Baciccia che versione excel usi? leggo che ha estensione .XLS pero ci sono macro quindi dovrebbe essere xlm o xlb e poi che sistema usi per mandare i file al forum ? Evidentemente sono rimasto indietro con le versioni
 
In realtà uso Office2021. Però alcuni non riescono ad aprire il file in questo formato. Quindi lo salvo in formato Office xls, sperando di non perdere qualcosa.
Una volta che il file xls è pronto lo scarico su Mega, copio il link per condividerlo e lo pubblico.
Il mio computer è un I3 con 16 GB di RAM, il S.O. è Windows 11.
Non so se questo risponde alle tue domande, faccio fatica, molta, a comprendere quello che leggo.
A volte mi faccio aiutare, ma in questo periodo sono solo.
Quindi scusa se mi chiedi come mi chiamo e ti rispondo: Roma!
Ti giuro che non mi chiamo così...
Con stima e simpatia
Baciccia
 
Baciccia4251 ha scritto:
In realtà uso Office2021. Però alcuni non riescono ad aprire il file in questo formato. Quindi lo salvo in formato Office xls, sperando di non perdere qualcosa.
Una volta che il file xls è pronto lo scarico su Mega, copio il link per condividerlo e lo pubblico.
Il mio computer è un I3 con 16 GB di RAM, il S.O. è Windows 11.
Non so se questo risponde alle tue domande, faccio fatica, molta, a comprendere quello che leggo.
A volte mi faccio aiutare, ma in questo periodo sono solo.
Quindi scusa se mi chiedi come mi chiamo e ti rispondo: Roma!
Ti giuro che non mi chiamo così...
Con stima e simpatia
Baciccia
Clicca per espandere...
siccome per mandare file , password e altre cose del genere sono sempre in difficoltà mi chiedevo come si facesse a fare una cosa simile . Sapevo che alcuni mandavano dei file excel con delle macro in formato txt ma per aprirle mi scordo come si fa.Quindi questo sistema non lo conoscevo e quanto hai mandato sono riuscito a vederlo agevolmente ,e a salvarlo con le macro in xlm. Ultima cosa Mega cosa è? è gratis?
 
fillott0 ha scritto:
siccome per mandare file , password e altre cose del genere sono sempre in difficoltà mi chiedevo come si facesse a fare una cosa simile . Sapevo che alcuni mandavano dei file excel con delle macro in formato txt ma per aprirle mi scordo come si fa.Quindi questo sistema non lo conoscevo e quanto hai mandato sono riuscito a vederlo agevolmente ,e a salvarlo con le macro in xlm. Ultima cosa Mega cosa è? è gratis?
Clicca per espandere...
Mega, con la sola registrazione, da un certo numero di GB gratis, mi sembra 10 ma non ne sono sicuro.
Comunque ti metto il link per il sito, sulla destra troverai "ISCRIVITI", magari prima fai qualche ricerca. E' un buon sito.
Ideale per condividere file con tutti quelli a cui mandi il link.
Se ti iscrivi e hai qualche difficoltà (se in quel momento io sono io, cioè se il cervello non è uscito per spese) sarò felice di aiutarti, anche se non mi sembra esserci ulla di particolarmente difficile.
Ad esempio io per caricare i fiel apro il sito di mega e, dopo aver inserito le mie credenziali (salvati in un posto sicuro la Password di recupero, perché se perdi la tua password loro non possono aiutarti, perché non registrano le Password), col Mouse trascino il file all'interno di Mega, appare una finestrella e clicco su Copia o qualcosa di simile.
Non dimenticare che, in altro Post, suggerisco, per chi non ha Excel, di installare WPS con i 3 file che contengono il VB.
Ora non lo uso, però, mi permetteva di aprire qualsiasi file di Office: Doc, XLS, XLSM e via elencando. Non posso assicurare che funzioni ancora, ma non ho nessuna ragione per credere di no.
Un abbraccio virtuale
Baciccia
 
Pezzetti e bocconi...
Sono andato a curiosare
mega.io

Confronta piani e prezzi - MEGA

Ottieni 20 GB di spazio di archiviazione cloud gratuito. I nostri piani individuali arrivano fino a 16 TB, mente il nostro piano flessibile Business arriva fino a 10 PB.
mega.io mega.io
Offre 20 gigante gratis per il piano gratuito (verso fine pagina)
Not bad
Baciccia
 
La Storia Infinita...
Mi sono accorto che nel file postato, bella macro che nel Foglio Percentuali copia i valori c'è un errore. La prima quindicina è corretta, la 16 30 e le altre hanno'indice non corretto.
Oggi proverò a correggere e se riesco posterò il file corretto.
Baciccia
 
Link per il formato XLS (Office '97-2003): https://mega.nz/file/WNJV0aKJ#CJFI3qZ0wGLowgRQuzuNAynLl5MlL6y_0HjESlUpDOs
Link per il formato XLSM (Office più recente): https://mega.nz/file/aBJlSRRT#BvMaqj4CU1Fna5gsKg0LgkKy118nQVmsGm6zdYNZs7c

Ora è corretto. I tentativi di modificare la macro "CopiaCelle", per far si che cancelli i numeri segnalati ed usciti, per ora non ha dato esito.
Le macro fornite dall'IA danno errore, anche se le macro sono attivate appare l'errore: Impossibile trovare la macro. Forse le macro sono disabilitate. In realtà le altre macro funzionano. Misteri per chi come me non capisce un'H e neanche una B.

Questa è la macro incriminata:
------------------------------------------------------------------------------------------------
Sub CopiaEDistribuisciDati()
Dim wsBari As Worksheet
Dim wsPercentuali As Worksheet
Dim prevNumbers As Collection
Dim rng As Range
Dim cell As Range
Dim i As Integer
Dim prevNumber As Variant
Dim colToClear As String

' Imposta i fogli
Set wsBari = ThisWorkbook.Sheets("Bari")
Set wsPercentuali = ThisWorkbook.Sheets("Percentuali")
Set prevNumbers = New Collection

' Definire gli intervalli da leggere
Set rng = Union(wsBari.Range("C2:G15"), wsBari.Range("B13:G21"), wsBari.Range("B24:G32"), wsBari.Range("B35:G43"), wsBari.Range("B46:G54"), wsBari.Range("C57:G65"))

' Loop attraverso ogni cella nell'intervallo
For Each cell In rng
If IsNumeric(cell.Value) Then
i = cell.Value
If i >= 1 And i <= 90 Then
' Copia i dati in base alla fascia di numeri
If i >= 1 And i <= 15 Then
wsPercentuali.Range("D" & (i + 2) & ":R" & (i + 2)).Copy Destination:=wsPercentuali.Range("AL" & (i + 2) & ":AZ" & (i + 2))
ElseIf i >= 16 And i <= 30 Then
wsPercentuali.Range("D" & (i + 3) & ":R" & (i + 3)).Copy Destination:=wsPercentuali.Range("AL" & (i + 3) & ":AZ" & (i + 3))
ElseIf i >= 31 And i <= 45 Then
wsPercentuali.Range("D" & (i + 4) & ":R" & (i + 4)).Copy Destination:=wsPercentuali.Range("AL" & (i + 4) & ":AZ" & (i + 4))
ElseIf i >= 46 And i <= 60 Then
wsPercentuali.Range("D" & (i + 5) & ":R" & (i + 5)).Copy Destination:=wsPercentuali.Range("AL" & (i + 5) & ":AZ" & (i + 5))
ElseIf i >= 61 And i <= 75 Then
wsPercentuali.Range("D" & (i + 6) & ":R" & (i + 6)).Copy Destination:=wsPercentuali.Range("AL" & (i + 6) & ":AZ" & (i + 6))
ElseIf i >= 76 And i <= 90 Then
wsPercentuali.Range("D" & (i + 7) & ":R" & (i + 7)).Copy Destination:=wsPercentuali.Range("AL" & (i + 7) & ":AZ" & (i + 7))
End If

' Controlla i numeri precedenti e cancella le celle corrispondenti
colToClear = "" ' Resetta la variabile colToClear
For Each prevNumber In prevNumbers
If prevNumber = i - 1 Then
colToClear = "AU"
ElseIf prevNumber = i - 2 Then
colToClear = "AM"
End If

If colToClear <> "" Then
wsPercentuali.Range(colToClear & (i + 2)).ClearContents
End If
Next prevNumber

' Aggiungi il numero corrente alla lista dei numeri precedenti
prevNumbers.Add i
End If
End If
Next cell
End Sub
--------------------------------------------------------------------------------------------------------------------------------------
Che, tra l'altro, sono convinto sia non funzionante correttamente.
Buon Non Onomastico a tutti
Baciccia
 
xls: https://mega.nz/file/iFpkzTKR#qnFLV6o_08LnEKTjfVx2SCIoF9dzvUxYhrDO6pZeXXg
xlsm: https://mega.nz/file/bcQQVIJQ#cUhc2ezJDZ82xCHeGRiAz0Zln_awed8LSsLnEgylOU4

Work in progressssssss
Dall'esperienza fatta in questi giorni Chatgpt è superiore a Copilot, anche se, tutt'e due, a volte sembrano SN (scemi naturali).

Nel foglio "Archivio" vi sono tre pulsanti "Aggiorna, Ritardi, Terzine". Aggiorna si usa dopo aver inserito una nuova estrazione o aver fatto delle modifiche per correggere qualche numero. Ritardi calcola i ritardi di ogni numero e li copia nel foglio Ritardi (che fantasia!), Terzine calcola il ritardo di alcune terzine consecutive copiandole sempre nel foglio Ritardi.
Nel foglio Percentuali cliccando sul pulsante "VaiComeUnTreno" vengono copiati, per ogni numero estratto delle ultime 9 estrazioni i valori probabilistici nelle ultime due colonne a destra, una per i valori orizzontali, l'altra per quelli verticali.
Non sono riuscito a risolvere il problema di eliminare i numeri segnalati e successivamente sortiti.
Sono quindi ricorso (ma non è corretto) ad un escamotage: nella colonna A metto in verticale gli ultimi 3,4 estratti e clicco su cancella. Questo elimina semplicemente i valori in verticale di quei numeri (sic). Lo strano è che l'IA ha compreso perfettamente quello che desidero, però non riesce a darmi un soluzione che funzioni, o forse sono io...
Nel foglio Prova, una macro va alla ricerca nell'archivio di quelle estrazioni che hanno due numeri (solo 2 numeri) appartenenti a una stessa quindicina e che siano, una volta sommati tra loro divisibili per due. Se le condizioni sono soddisfatte i risultati appaiono nel foglio con: Data, i due numeri estratti, la loro somma divisa per due e nella cella a fianco viene calcolato il suo complementare (quel numero che sommato al primo da 90). Poi nella cella successiva la macro mostra quante estrazioni sono passate, prima che almeno uno dei due numeri il principale e il complementare, sia stato estratto.
E' solo una prova
Mi sento un perfetto Idiota Sapiente visto che sto facendo qualcosa senza capirci una beata mazza! Ammazza!
Se gli alieni esistono vi sorridano (altrimenti sono dolori...)
Baciccia
 
Ho ripreso un vecchio file Excel creato da non so chi (una volta tenevo traccia di chi aveva creato cosa, per nominarli se avessi pubblicato qualcosa di loro. Purtroppo non trovo più dove li avevo scritti). Non conoscendo l'autore ho deciso di chiamarlo LottoIgnoto ( e all'ignoto autore vadano i miei ringraziamenti, specificando che quanto funziona è opera sua, quanto non funzionasse è opera mia).
Ho iniziato a controllare aggiornare i fogli che lo compongono. Faccio un po' di fatica perché molte cose non le ricordo. Comunque provo.
A mio avviso è fatto bene e può dar spunto a nuove idee e far comprendere come si fanno alcune cose per raggiungere i risultati desiderati.
Nel file originale, nel foglio archivio, c'era la possibilità di aggiornarlo via internet. Ora non funziona più. Proverò, in un secondo momento, con l'aiuto dell'IA a far si che torni a funzionare. Se poi, qualcuno di voi è in grado di farlo ex novo, ben venga.
Saluti
Baciccia
Formato XLS: https://mega.nz/file/iYw0DYRb#ZMd2Inu-rhssNQZcsX3NORcxLM-5nVuu6NwQZg1YPx4
Formato XLSM: https://mega.nz/file/LVZ1hQqY#SBRwVvzNkXmHVPmriS_62xkGF6JGvlSFYVvTsAVHrZc
1726376359034.png
1726376384209.png

Quando aprite il file vi chiederà se volete aggiornare da origini esterne, cliccate su ignora. Mi sono dimenticato di togliere collegamenti ad altro programma. Sorry.
 
Work in progress 2
mega.nz

4.85 MB file on MEGA

mega.nz mega.nz
è solo nel formato XLSM perché alcune funzioni non sono supportate va versioni precedenti. Sorry.
Ora il foglio Tabellone funziona correttamente. Ho aggiunto il foglio ritardi che richiede ancora molto lavoro. Comunque lanciando la Macro e scegliendo la Ruota si avranno i ritardi finora implementati.
Ho poi preso uno Script sui numeri spia, mannaggia non ricordo di chi è (Escuse moi). Non sono ancora ruscito a capire se è corretto o no. Boh!.
Non riuscendo ad automatizzare l'inserimento delle estrazioni ho aggiunto un Foglio nomato "Inserim. estrazioni", mazza che fantasia, con le spiegazioni su come utilizzarlo, se ci riuscite poi me lo spiegate.
C'è poi il Foglio "AppoggioBari"... ci sarà pure un motivo se l'ho creato. Non ricordo quale.
Il tutto non ha alcuna pretesa, mi serve, soprattutto, a mantenere impegnata le mente, così, hai visto mai, non parte per lidi sconosciuti.
La sfortuna perseguiti i vostri nemici
Baciccia
 
Ho voluto provare le MIE istruzioni su come installare WPS se non si dispone di excel. Funziona tutto. Apre, tranquillamente, i file XLSM, le macro funzionano, non ho rilevato alcun problema. Questa è una videata del programma in funzione (io l'ho lasciato in inglese):

1726685255136.png

Tenete presente che se lo installate diventerà il programma predefinito per i file Microsoft Office. Poco male se volete tornare come prima cliccate col tasto destro su un file di Office e selezionate "Apri con" e scegliete "Scegli un altra App.." e poi cliccate sull'icona di Excel.
I tre file che occorre installare funzionano, anche se Windows mi chiede se voglio installarlo in modalità compatibilità. Ignorate.
L'immagine si riferisce ad una nuova Macro che ho messo sul file (che non ho ancora postato) che sul foglio FiltroQuindicine, dopo aver chiesto quale ruota si vuole processare mostra le ultime 50 estrazioni suddivise per quindicina, escludendo, per ogni quindicina, le date in cui non è presente alcun numero di quella qundicina. Not bad.
Baciccia
 
rimetto 2 studi uno su Roma e un altro su Palermo poca roba ma questi due studi sono fatti con l'aiuto di Chat gpt e claude
1 su Roma : ho chiesto di analizzare tutti i 4005 ambi che si formano con 90 numeri nell'ambito di 900 estrazioni e quale sia la loro "CORRELAZIONE" cioè quante volte sono usciti nelle loro posizioni :Dopo parecchie richieste e incomprensioni reciproche non ricordo più se Chat gpt Claude è riuscito a sfornare una macro che ha raggiunto lo scopo.Mi ha analizzato tutti e 4005 ambi possibili solo 2 hanno correlazione 1 cioè nelle 900 estrazioni analizzate l'ultima delle quali l'ultima era quella del 3/9/24 a roma gli ambi correlati sono questi 2 : 26 e 66...... e 71 e 73
num ambouscite 1^ pouscite 2^ pouscite 3^ pouscite 4^ pouscite 5^ potot uscite



clip_image003.png
26​
5485527
664374422
716534523
736534523

noterete che 71 e 73 in tutte le posizioni hanno le stesse sortite il che è un equilibrio che si può rompere solo con l'uscita di uno di essi .La non uscita di tutti e due o l'uscita di tutti e due nelle stesse posiz.manterebbe lo status quo . Sappiamo che il lotto è caos e questo strano equilibrio non può rimanere. per l'ambo 26 e 66 il discorso è diverso ma lo strano equilibrio che si è formato il 26 è uscito in tutte le posizioni esattamente una sortita in più tanto che la correlazione dei due è "1".



​
 
fillott0 ha scritto:
rimetto 2 studi uno su Roma e un altro su Palermo poca roba ma questi due studi sono fatti con l'aiuto di Chat gpt e claude
1 su Roma : ho chiesto di analizzare tutti i 4005 ambi che si formano con 90 numeri nell'ambito di 900 estrazioni e quale sia la loro "CORRELAZIONE" cioè quante volte sono usciti nelle loro posizioni :Dopo parecchie richieste e incomprensioni reciproche non ricordo più se Chat gpt Claude è riuscito a sfornare una macro che ha raggiunto lo scopo.Mi ha analizzato tutti e 4005 ambi possibili solo 2 hanno correlazione 1 cioè nelle 900 estrazioni analizzate l'ultima delle quali l'ultima era quella del 3/9/24 a roma gli ambi correlati sono questi 2 : 26 e 66...... e 71 e 73
num ambouscite 1^ pouscite 2^ pouscite 3^ pouscite 4^ pouscite 5^ potot uscite



clip_image003.png
26​
5485527
664374422
716534523
736534523

noterete che 71 e 73 in tutte le posizioni hanno le stesse sortite il che è un equilibrio che si può rompere solo con l'uscita di uno di essi .La non uscita di tutti e due o l'uscita di tutti e due nelle stesse posiz.manterebbe lo status quo . Sappiamo che il lotto è caos e questo strano equilibrio non può rimanere. per l'ambo 26 e 66 il discorso è diverso ma lo strano equilibrio che si è formato il 26 è uscito in tutte le posizioni esattamente una sortita in più tanto che la correlazione dei due è "1".



​
Clicca per espandere...
Meraviglioso! Ho fatto lo stesso. La risposta è stata: "Ma nun rumpere i cugliuni". Secondo te, non le sto simpatico?
Scherzo. Naturalmente.
E' solo che volevo salutarti
Buone vincite
Baciccia
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 26 settembre 2024
    Bari
    17
    07
    30
    59
    65
    Cagliari
    88
    37
    68
    17
    13
    Firenze
    72
    75
    01
    39
    71
    Genova
    90
    70
    77
    56
    76
    Milano
    50
    63
    90
    10
    72
    Napoli
    23
    28
    87
    75
    59
    Palermo
    55
    14
    74
    58
    10
    Roma
    25
    38
    69
    53
    48
    Torino
    64
    36
    79
    60
    14
    Venezia
    34
    66
    42
    39
    23
    Nazionale
    61
    27
    59
    36
    35
    Estrazione Simbolotto
    Palermo
    31
    05
    26
    06
    32
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto