Estrazione con condizione
Buonasera, nel file allegato
Ci sono 3 moduli, il primo contiene la macro di dodo, il secondo le macro per individuare le 3 date volute (te le chiedono) e quelle per individuare le 3 sigle volute (te le chiedono). Naturalmente poi ti ricopiano i 3 dati (date o sigle) sul Foglio2. Il terzo modulo contiene le due macro che uniscono quelle del modulo 2: una per le 3 date e una per le 3 sigle.
Ci sono 2 tasti sul Foglio1: quello con i colori della Roma ricerca le 3 date che tu inserirai, cioè a scelta, e le ricopia con tutta la riga sul Foglio2, una di seguito all’altra. Quello con i colori della Lazio (par condicio) fa le stesse operazioni per le 3 sigle.
IMPORTANTE:
-penso che il tuo file si chiami diversamente, se così fosse nel Modulo3 devi sostituire "M1Test.xlsm" con il "Nome del tuo File";
-se le colonne del Foglio1 di M1Test.xlsm corrispondono a quelle del tuo file (cioè la colonna “sigla” è la 12 e la colonna “ggassenza” è la 13) va tutto bene, altrimenti devi nel Modulo 2 sostituire i numeri della tua colonna delle date dove leggi Range("A1").AutoFilter Field:=13, Criteria1:=crit1, Operator:=xlAnd (nelle prime tre macro) e della tua colonna delle sigle nelle macro quarta, quinta e sesta.
-Nella ricerca date (bottone giallorosso) quando ti chiede le 3 date da cercare, devi inserire la data con sistema inglese, cioè prima il mese, poi il giorno e l’anno a due cifre. Puoi anche cercare una sola data o due sole cliccando Annulla sulle rispettive Inputbox.
Ho messo comunque le note che vedrai se apri i moduli2 e 3.
Nel Modulo 1 c’è la macro di dodo che a me non funziona forse perché ho XP ed Excel 2003.
Per la simulazione ho incrementato le voci e funziona.
Se invece così compilato non fa al caso tuo, cestinalo. Ho adattato un file magazzino che ho utilizzato tempo fa molto più grande e complesso.
Saluti
Riky