Excel Come trovare date(Lotto)

[freetime78]

Buongiorno

vorrei sapere se e' possibile avendo un archivio lotto,creare una macro che :

Inserendo una data nel formato Es 24/07/2010 e la ruota ,mi visualizzi l'estrazione immediatamente successiva e quella immediatamente precedente a tale data

In pratica la data che inserisco e' :

BARI 22/07/2010 54 5 62 88 81

BARI 24/07/2010 88 50 55 37 16

BARI 27/07/2010 73 65 79 90 42

grazie

[wallace&gromit]

ciao freetime,
l'importante è sapere in quale modalità sono inserite le date:
se sono visualizzate in modalità data ma in realtà si riferiscono al numero che excel associa alla data basterà sapere quanti giorni di scarto ci sono tra le due date ricercate e sommare / sottrarre la differenza.
In caso contrario (cioè se sono inserite come testo) bisognerà che la funzione (o macro) le converta prima in numero (è solo un po' più lungo ma si può fare anche questo).

[freetime78]

Ciao Wallace

le date sono scritte in un unica cella e cosi' come l'ho scritto prima ossia xx/xx/xxxx

ma io non so fare niente con excel per questo volevo che qualcuno mi aiutasse

ciao

[wallace&gromit]

allora il primo passo è stabilire in che formato sono le date.
Seleziona una cella in cui è scritta una data, dal menu seleziona formato/cella/numero e scegli l'opzione numero (lascia pure 2 decimali). Se ora ti appare un numero attorno ai 40000 significa che la data è inserita in maniera numerica. Se ti appare sempre lo stesso testo di prima significa che la data è in formato di testo e andrà convertita.
Ma prima informaci.

[freetime78]

Ciao Wallace

facendo cio' che mi hai consigliato,mi appare la data cosi': 27/07/2010 cioe' la stessa della cella

[wallace&gromit]

ahi, bisognerà convertire, in questo caso mi affiderei a mani più capaci di me (Anthony, Flash o Ricky)... vediamo.

[freetime78]

Ciao Wallace

ok allora aspetto

[wallace&gromit]

chiedo scusa, concentrato sul formato delle date ho perso di vista la vera natura della richiesta.
In realtà se i dati sono ben ordinati in una tabella non è necessario riconoscere la data come tale.
Puoi utilizzare queste formule:

Codice: Seleziona tutto

=INDIRETTO("B" & CONFRONTA($H$2;$A$1:$A$10000)-1;1)
=INDIRETTO("B" & CONFRONTA($H$2;$A$1:$A$10000);1)
=INDIRETTO("B" & CONFRONTA($H$2;$A$1:$A$10000)+1;1)

Assumendo che nella colonna A ci sia la data e in quelle adiacenti i valori (io riporto solo il caso della colonna "B" ma puoi sostituire tu la lettera con le colonne che fanno al caso tuo) e in H2 la data da ricercare, la formula riconosce la posizione dell'elemento in h2 nell'ambito della colonna A e preleva dalle colonne che indichi tu l'elemento che si trova nella stessa posizione.

Prova e raccontaci se funziona.

[Anthony47]

Se aiuta, per trasformare quelle "scritte" in data si puo' adottare questa procedura:
-formattare quella colonna come "data" nel formato preferito
-copiare una cella vuota
-selezionare la colonna "finte date", Menu /Modifica /Incolla speciale; spunta Valori, spunta Addiziona, Ok

Quello che hai adesso e' infatti tutt'altro che un elenco "ben ordinato".

Ciao

[freetime78]

Ciao Anthony

ti allego una videata di come sono ordinati i dati

Io in pratica ho ,come vedi l'archivio sulla destra sicche' vorrei sapere :

dove posso inserire quelle formule?
Intendo in quali celle?

Poi : le 3 formule vanno inserite in 3 celle consecutive verticali?


Quindi tu guardando questa videata potresti indicarmi come posso fare?
Perche' il problema e' che ho tutte e 11 le ruote
Quindi dovrei scegliere prima su che ruota effettuare la ricerca e poi fare la ricerca delle date

Saresti cosi' gentile da rifarmi il tutto in modo da poterlo utilizzare considerando le 11 ruote?

grazie

http://uploading.com/files/e4c7ee72/Per%2BPcFacile.JPG/

[wallace&gromit]

ciao freetime,
ti rispondo io, che nel frattempo ho trovato una soluzione al tuo caso. Te la descrivo passo per passo:
innanzitutto ho creato un nome che definisce la colonna con le tue date: Menu Inserisci/Nome/Definisci ho scritto DateDisp e nella casella riferito a: ho inserito =Foglio1!$C$4:$C$10000 (se la tua banca dati si trova in un foglio diverso da Foglio1 inserisci il nome corretto).
Sul foglio2 da A3 in giu ho inserito il nome delle ruote e da B3 in giu ho inserito un numero corrispondente alla colonna in cui appare il primo numero estratto per quella ruota (nel tuo caso Bari / 4 cioè la colonna "D" Catania / 9 colonna "I", ecc,).
In E3 ho inserito una cella di convalida: menu Dati/Convalida Consenti: Elenco Riferito a: =A3:A13.
In F3 ho inserito =CERCA.VERT(E3;A3:B13;2).
In G3 una nuova cella di convalida però riferita a =DateDisp.
In H2, H3, H4 ho inserito la formula

Codice: Seleziona tutto

=INDIRETTO("Foglio1!R" & CONFRONTA($G$3;DateDisp)+RIF.RIGA() & "C" & 3;0)

e nelle celle da I3 a M4 la formula:

Codice: Seleziona tutto

=INDIRETTO("Foglio1!R" & CONFRONTA($G$3;DateDisp)+RIF.RIGA() & "C" & RIF.COLONNA()-9+$F$3;0)

devi usare le stesse caselle per avere un risultato corretto, perchè i riferimenti sono strutturati così, in caso contrario potrebbero apparirti dati "sfasati".
Prova e dimmi se funziona.

[freetime78]

cIAO WALLACE

scusami tanto ma io non ho dimestichezza con tutte queste formule
Ti ringrazio davvero.

Vorrei allegarti il file Archivio .
Potresti sistemarlo tu gentilmente?

se non ti disturbo?

grazie

http://uploading.com/files/2c6f9465/file.xlsm/

[wallace&gromit]

ciao freetime,
eccoti il file:
https://rapidshare.com/files/1308292596/ARCHIVIO2.xls

ho dovuto trasformarlo in excel 2003, ma penso che riconvertirlo in 2007 non sia un problema.
Inoltre ho dovuto apportare una modifica alle formule che calcolano la data (a futura memoria riporto la versione corretta):

Codice: Seleziona tutto

=INDIRETTO("Archivio!R" & CONFRONTA($G$3;DateDisp;0)+RIF.RIGA() & "C" & 3;0)

[freetime78]

Ciao Wallace

grazie grazie grazie mille,e' cosi' che lo desideravo,ma c'e' un problema.

Il file viene aperto in modalita' compatibilita'

poi mi appare Error run time 9 ,indice non incluso nell'intervallo

,se faccio continua e scelgo una ruota e una data ,non mi trovo proprio

che faccio?

mi puoi aiutare?

come faccio a salvarlo come dici tu se all'apertura mi da l'errore?

grazie

[wallace&gromit]

eh allora c'è il temuto problema di compatibilità.
l'unica cosa che posso proporti è, ora che hai visto come ho realizzato il file (e con in mano le descrizioni inviate nelle mie risposte precedenti) riprodurre il tutto sul tuo file originale direttamente in excel 2007.
Secondo me ce la puoi fare e ne approfitti per fare pratica di formule.
Per ogni dubbio chiedi tranquillamente.

[freetime78]

cIAO Wallace

sei stato davvero gentilissimo ,ti ringrazio di cuore

oggi provo poi ti faccio sapere

ciao

[freetime78]

Ciao Wallace

mi dispiace ma il file non funziona nel senso che selezionando la data di ricerca,il risultato delle 3 estrazioni non corrisponde all'archivio.

fai una prova

ciao

[wallace&gromit]

hai aggiornato la formula con quell'aggiunta che ho segnalato in un secondo tempo?
Si tratta di aggiungere ";0" nella parte finale della formula ..Confronta(...).
In un primo tempo a me funzionava perchè per prova avevo un ordine alfabetico, cosa che tu non hai. Poi mi sono accorto dell'errore (ma non so più se prima o dopo l'invio del file) adesso controllo ancora anche io.

[wallace&gromit]

no, non è quello perchè il file era già aggiornato e a me funziona correttamente.
Tra l'altro il segnale d'errore che mi riferivi in precedenza esce anche a me e si riferisce ad una macro che non ho creato io, una che cerca il nome "decine" ma non lo trova.
Proviamo comunque a capire cosa non funziona: dimmi che valori ottieni.

[freetime78]

Ciao Wallace

scusami ancora

Allora in H2,H3,H4 se ho capito bene,devo aggiungere ";0" nella parte finale di ogni formula,vero?

Se si pero' quando clicco invio,appare l'errore"La formula digitata contiene un errore"

Che faccio?

Ma non fai prima a inviarmi il file corretto?