Novità

EXCEL E DINTORNI

Alien. ha scritto:
Ciao baci excel mi è stato bloccato in quanto mi dice che le macro non sono attendibile.
Clicca per espandere...
Acc! Mi ha scoperto, volevo rubarti il cervello, visto che il mio, da tempo, non funziona!
E' semplicemente una strategia di difesa di Microsoft, contro quei file di dubbia provenienza.
Dovrebbe essere sufficiente cliccare sul nome del file col tasto destro, nella finestra che si apre cliccare sulla voce "Proprietà".
Nella finestra che appare:
1727533480362.png
In basso sulla destra c'è: "annulla blocco" con un quadratino davanti. Devi spuntare quel quadratino. A questo punto rilanciando il file verrai privato del cervello che sarà immediatamente trasferito a me. Scusa sai che mi piace scrivere cavolate.
In realtà a questo punto il file dovrebbe aprirsi senza problemi. Prima di postare controllo con due programmi il file, un antivirus e un antimalware. Questo non dà la certezza assoluta di sicurezza, ma è un buon sistema.
Ciao
Baciccia
 
COMPLIMENTI BACI UN BEL LAVORO DICI CHE 6 RINCO....MA NON MI PARE PROPRIO.
risata_di_paperino.gif
 
1727711877652.png

Ho aggiunto il foglio "Mese". Una volta lanciata la Macro genera tabelle dei ritardi, suddivisi in quindicine, per tutte le ruote, in un determinato mese. Con 1 elaborerà tutte le estrazioni dal 1939 ad oggi di Gennaio e mostrerà i ritardi dei 90 numeri, con 12 mostrerà Dicembre (ecc.) evidenziati, ruota per ruota, in sfondo rosa e scritta rossa i Max ritardi. In fondo ad ogni tabella il Max ritardo di quella quindicina. (sfondo giallo e scritta rossa).
Ha richiesto un bel po' di tempo, anche se, questa volta, la AI ha dato risultati in tempi brevi. Devo ancora verificare, con altro programmi che i dati siano corretti. Da quello che ho visto dovrebbero esserlo.
I risultati della macro sono stampati sul foglio in righe nascoste, e i dati vengono copiati nelle 6 tabelle che ho creato. Devo controllare di aver messo i riferimenti corretti. Fate qualche prova e se trovate qualche quiquoqua ditemelo.
Questi dati possono servire. Boh! Fate vobis.

mega.nz

5.45 MB file on MEGA

mega.nz mega.nz

Se vi sembra utile ringraziate Chatgdp, non me. Io, ribadisco, sono solo , idiota sapiente.
Sorridete a tutti (e penseranno che siete un po'... Sorridete lo stesso)
Baciccia
 
Sai ci vorrebbe quel "foglio" di excel "spia" anche per il superenalotto ed 10elotto ma.....CHE SI POTREBBE FARE ? Grazie.
 
Alien. ha scritto:
Ciao baci excel mi è stato bloccato in quanto mi dice che le macro non sono attendibile.
Clicca per espandere...
Credo che si potrebbe provare, occorre aver a disposizione l'archivio del Superenalotto, da quando è cambiato il metodo di estrazione,. Dopo di che, tenendo presente che i numeri Spia, nel file da me postato, non ho idea di quanto siano veritieri, concettualmente parlando. (scusa un piccolo blackout, non ricordo cosa volevo dire, acc.)
Credo che, anche senza capire una beata mazza, con l'aiuto dell'AI si potrebbe tentare.
Dovrei aver, però, chiaro, che tipo di interrogazione deve fare il prg. Deve chiedere quali sono i numeri più frequenti dopo l'uscita del numero X, oppure dopo l'uscita dei numeri XY, o che altro? Ci penserò. Se non me ne dimentico. Magari ogni tanto ricordamelo.
Sai, so che tu pensi di non esserne in grado. Ma... Non è così. Se farò qualcosa, magari ti spiegherò, passo, passo, cosa ho fatto, o meglio chiesto all'IA. Così potrai provarci anche tu, rendendoti conto che l'unica cosa difficile è l'umiltà. Chi sa fare DEVE condividere. Si muore da soli, ma si dovrebbe vivere ASSIEME.

Liberté, Égalité, Fraternité​

Baciccia
 
mega.nz

11.94 MB file on MEGA

mega.nz mega.nz

Leggendo un post di Pandit, e non riuscendo a dormire, ho provato a fare qualcosa di simile

1727751923766.png
Qualquadra però non cosa...
Se faccio la ricerca sulle ultime 1000 estrazioni mi vengono risultati assurdi e ci vuole troppo tempo.
Ho quindi ristretto la ricerca alle 6 estrazioni successive all'uscita del numero.
Cosa non ho compreso? (Non dite TUTTO! Cattivoni)
Buonanotte, anche se ormai è quasi giorno
Baciccia

PS: il Foglio l'ho chiamato Pandit, visto che è stato la mia musa ispiratrice (o dovrei dire muso ispiratore? :unsure:)..
 
mega.nz

11.94 MB file on MEGA

mega.nz mega.nz

Modificato il foglio Pandit. Ora l'evidenziazione dei 3 valori massimi funziona correttamente.
Aggiunto il Pulsante "Ultime 1000" che chiede l'inserimento di un numero e poi di una ruota
e visualizza i 3 numeri più frequenti con la percentuale.
Baciccia
 
Baciccia4251 ha scritto:
Credo che si potrebbe provare, occorre aver a disposizione l'archivio del Superenalotto, da quando è cambiato il metodo di estrazione,. Dopo di che, tenendo presente che i numeri Spia, nel file da me postato, non ho idea di quanto siano veritieri, concettualmente parlando. (scusa un piccolo blackout, non ricordo cosa volevo dire, acc.)
Credo che, anche senza capire una beata mazza, con l'aiuto dell'AI si potrebbe tentare.
Dovrei aver, però, chiaro, che tipo di interrogazione deve fare il prg. Deve chiedere quali sono i numeri più frequenti dopo l'uscita del numero X, oppure dopo l'uscita dei numeri XY, o che altro? Ci penserò. Se non me ne dimentico. Magari ogni tanto ricordamelo.
Sai, so che tu pensi di non esserne in grado. Ma... Non è così. Se farò qualcosa, magari ti spiegherò, passo, passo, cosa ho fatto, o meglio chiesto all'IA. Così potrai provarci anche tu, rendendoti conto che l'unica cosa difficile è l'umiltà. Chi sa fare DEVE condividere. Si muore da soli, ma si dovrebbe vivere ASSIEME.

Liberté, Égalité, Fraternité​

Baciccia
Clicca per espandere...
1727819273847.png


:unsure: 🤣
 

Option Explicit

Sub Main

'tom's bakery script. n. 14 visualizza tutte le estrazioni superenalotto dopo averne aggiornato l'archivio dal programma.

Dim Inizio

Dim fine

Dim esSE

Inizio = 1

fine = EstrazioniArchivioSE

For esSE = Inizio To fine

Scrivi GetInfoEstrazioneSE(esSE) & " estratti " & StringaEstrattiSE(esSE,".")

If ScriptInterrotto Then Exit For

Next

End Sub


CONTROLLA NON SO SE è VALIDO
 
Alien. ha scritto:

Option Explicit

Sub Main

'tom's bakery script. n. 14 visualizza tutte le estrazioni superenalotto dopo averne aggiornato l'archivio dal programma.

Dim Inizio

Dim fine

Dim esSE

Inizio = 1

fine = EstrazioniArchivioSE

For esSE = Inizio To fine

Scrivi GetInfoEstrazioneSE(esSE) & " estratti " & StringaEstrattiSE(esSE,".")

If ScriptInterrotto Then Exit For

Next

End Sub


CONTROLLA NON SO SE è VALIDO
Clicca per espandere...
1727894222695.png Scusa ma non ci vedo.
Forse manca qualcosa, oltre il mio cervello,
Forse non mi sono spiegato, come diceva il lenzuolo,
io capisco poco, quel poco che capisco, lo capisco male.
Se puoi metti l'intero Script e, se mi ricorderò come si fa,
lo copio e lo uso.
Che il buio ci faccia risparmiare sulla bolletta ENEL
Baciccia

PS: guarda che non ti sto prendendo in giro
amo solo scrivere cavolate
 
TRANQUILLO BACI so come 6 ,senti non so se funziona l'ho preso in una vecchia chiavetta USB QUELLO è INTERO.
Però non so ci fai o ci 6 .


oliver-hardy-gif.81650


:unsure: 🤣 🤣 🤣
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 03 dicembre 2024
    Bari
    38
    26
    58
    36
    65
    Cagliari
    71
    68
    61
    41
    89
    Firenze
    52
    65
    73
    03
    50
    Genova
    37
    41
    70
    40
    06
    Milano
    62
    28
    70
    06
    39
    Napoli
    25
    50
    49
    60
    52
    Palermo
    06
    55
    68
    11
    86
    Roma
    12
    23
    16
    14
    63
    Torino
    16
    06
    44
    14
    88
    Venezia
    07
    67
    01
    38
    89
    Nazionale
    67
    27
    38
    57
    19
    Estrazione Simbolotto
    Venezia
    42
    15
    08
    05
    32
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto