Ricerca dati per Cognome e/o Nome

Anonimo
2015-04-30T08:55:37+00:00

Salve Forum

Premesso che ho un file  denominato “ Registro dei Decreti” che è composto da due schede: “DECRETI” e “RICERCA”.

Attualmente l’originale che detengo funziona con delle formule che ne rallentano di non poco l’esecuzione delle operazioni, atteso che i record programmati per la trascrizione  dei dati sono 10.000.

Tanto premesso chiedo se qualcuno può fornirmi un codice  in VBA in sostituzione della miriade di formule usate.

L’esempio del file è QUI

Per ulteriori delucidazioni, ovviamente, sono a disposizione.

Grazie, Paolo

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento
Risposta accettata dall'autore della domanda
Anonimo
2015-05-06T16:20:09+00:00

Ciao Paolo,

scarica questo: Registro dei Decreti 5.xlsm.

(E considera che quello che chiedi, con l'impostazione attuale, ha un piccolo costo in termini di prestazioni. Vedi se è tollerabile, altrimenti bisogna rimetter mano a qualche cosetta.)

La risposta è stata utile?

0 commenti Nessun commento
Risposta accettata dall'autore della domanda
Anonimo
2015-05-05T20:39:47+00:00

... e questo è il 4, identico al 3 tranne che per la ricerca, che restituisce cognomi e nomi esatti:

Registro dei Decreti 4.xlsm

La risposta è stata utile?

0 commenti Nessun commento

42 risposte aggiuntive

Ordina per: Più utili
  1. Anonimo
    2015-05-05T22:23:41+00:00

    ... e ovviamente lo zero mancava anche nella definizione della query. Facciamo così, carico allo stesso link il file (4) con le correzioni.

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2015-05-05T22:12:42+00:00

    Ops!... Manca uno zero.

    Nel modulo modGlobal correggi l'istruzione:

    Public Const gcstrDecRgRange    As String = "B5:B1004"

    in:

    Public Const gcstrDecRgRange    As String = "B5:B10004"

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2015-05-05T21:44:30+00:00

    Ciao Maurizio

    Effettivamente adesso c'è una bella differenza rispetto al 2...

    Comunque, nella scheda "DECRETI" nonostante o inserito i dati dal record 5° al record 10.004, mi sono accorto che la corretta funzionalità si ferma al record 1.004 ((dal record 1.005 al record 10.004 succedono due cose;

    1. la Colonna "A" della scheda "DECRETI" non restituisce più il numero progressivo;
    2. La "RICERCA" funziona correttamente solo per i dati registrati  nel range B5:I1.004 e non anche sino al record 10-004.

    fatto questo, per il resto hai messo a posto ogni cosa, bravo!

    Ciao, Paolo

    La risposta è stata utile?

    0 commenti Nessun commento