cerca

salve volevo creare una macro che mi permettese di cercare del testo inserito in foglio excel, solo che volevo come scrivevo il testo da cercare i dati scollassero, ho travato un file di esempio solo che non funziona e mi dà un errore, allego il file e l'errore spero che qualcuno sappia spiegarmi il perchè non funziona, e il perche dell'errore

Ciao Aquilarossa

Perdonami ma dalla tua richiesta non si capisce nulla.

1) qual è il valore da cercare?
2) dove deve essere cercato?
3) se trovato, cosa deve restituire? L'indirizzo di cella?

Il file che hai allegato non dice nulla e non vi è codice VBA quindi non capisco come possa essersi generato l'errore che hai mostrato.

Prova a spiegarti meglio

Comunque ti posto il codice di una funzione scritta in vba che ti restituisce l'indirizzo di cella del valore cercato.

INSERISCO UNA FOTO. NELLE CASELLE L E H CI SONO LE DIMENSIONI E NELLA CASELLA TOTALE MQ C'E LA FORMULA E MI DA IL TOTALE DI MQ, IL QUALE NON DEVE ESSERE INFERIORE A 1.3. INFATTI IN ALCUNE CASELLE E' SUPERIORE COME DEVE ESSERE. COME FACCIO A NASCONDERE 1,3 NELLE CASELLE L E H VUOTE?

Scusa Merlino(116) ti sei accodato ad una discussione che non c'entra nulla il tuo quesito.

Edita il messaggio ed apri una Tua discussione

Ciao alfrimpa, scusa il codice si trova nel foglio 1 ed è sotto remark perche da errore il valore da cercare si trova nella cella di descrizione da D4:D150.
praticamente quando inserisco il testo da cercare si devono attivare i filtri e scrollare il testo.
Forse il codice non è completo?

Ciao

Forse stiamo parlando di due file diversi.

Su quello che hai allegato c'è solo il foglio1 (non trovo nessun "remark") e sul foglio c'è solo questo

Data U.M. Q.ta Descrizione Totale
14/02/2015 2 12 Mela 24
26/07/1975 45 11 Pera 495
11/06/2007 34 56 Vino 1904
Aceto
Penne
Spaghetti
quindi sono compilate solo sei righe (tu parli di D4:D150???)

più una casella di testo posta sulla cella D2.

A cosa serve questa casella di testo? E' forse questa il remark?

Continuo a non capire.

No il file e proprio questo prova ad aprireil vb editor Alt+F11 e vai sul foglio1 c'è del codice sotto remark, questo e solo un file di esempio quando tutto funziona le righe compilate arriveranno a 150, nella casella di stesto posta in D2 va scritto il testo da cercare Da D4:D150, il proglema è che la ricerca non funziona? Come si scrive il testo le celle devono essere scollate e visualizzate solo quelle con il testo presente nelle celle D4:D150

Ciao

Prova a guardare questo file che ti allego.

Ho tolto la casella di testo perchè non ce ne è bisogno.

Ho inserito una Convalida Dati nella cella G2; quindi posizionati su questa, apri la tendina e scegli una voce dall'elenco. Automaticamente i dati saranno filtrati mostrando solo quelli che si riferiscono al valore presente in G2.

Ovviamente questo elenco andrà allungato con tutti i dati presenti in D4:D150.

Fammi sapere se era questo che volevi.

ciao alfrimpa scusa ma non riesco ad aprire il file io uso excel 2003, comunque volevo chiederti dato che funziona con la convalida dati, secondo mè può sorgere un problema nella ricerca quando ci sono troppe voci da cercare andare a trovare quella da filtrare diventa problematico, mentre quello che volevo fare io con la casella di stesto,mentre scrivevo il testo da cercare i dati dovevano essere filtrati in automatico. Comunque il codice io lo preso da internet, allego il codice trovato, ma io non riesco a farlo funzionare. spero che tu possa darmi una mano. Grazie


Private Sub TextBox21_Change()
If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilterMode = False
Dim Crit1 As String
If TextBox21.Text = "" Then Exit Sub
Crit1 = "*" & TextBox21.Text & "*"
Range("A3").AutoFilter Field:=4, Criteria1:=Crit1, Operator:=xlAnd
End Sub

Ciao Aquilarossa

Per la versione di Excel proverò più tardi a riallegarti il file in vers. 2003

Per la convalida dati la possiamo benissimo eliminare in modo da digitare direttamente il valore da cercare.

Non capisco l'utilizzo della casella di testo sul foglio quando puoi raggiungere lo stesso risultato utilizzando una semplice cella.

Il codice l'avevo visto ma non sono riuscito a farlo funzionare; ecco perché ho eliminato la casella di testo è usato la cella G2.

Comunque riproverò.

A più tardi.

Ciao


Ti riallego il file in versione 2003 ed ho eliminato la convalida dati.

Fai sapere se era quello che volevi

ciao alfrimpa ho provato il file allegato, inzia a funzionare tutto come volevo io, solo che ci sono ancora delle modifiche da apportare.
1 quando tolgo il testo dalla cella ricerca i dati dovrebbero tornare tutti visivili.
2 E' possibile attivare la ricerca solo con parte del testo digitato. esempio se scrivo Pe venga visualizzato Pera, Penne, se inserisco pen venga visualizzato penne.
3 Far partire la ricerca come digito il testo senza premere invio per iniziare la ricerca.
Spero di non aver inoltrato richieste assurde, grazie per l'aiuto.

Buona giornata, Aquilarossa;
il File che hai allegato in #1 genera l'errore che hai dichiarato Tu.
Ho provato a costruire un nuovo File con la stessa struttura del tuo, assegnando a TextBox1 i seguenti eventi:


TextBox1_Change seleziona, in modo dinamico i Record che corrispondono al Valore inserito.
Cerco di spiegarmi:
Se in TextBox1 inizio ad inserire il Carattere "P", verranno selezionati solo i Record
- Pera
- Penne
così pure se, proseguendo, inserisco "Pe"
ma se inserico "Per", verrà selezionato solo il Record:
- Pera
analogamente se inserico "Pen", verrà selezionato solo il Record:
- Penne

TextBox1_GotFocus ha la funzione di:
- cancellare il Valore inserito in Textbox1
- visualizzare tutti i Record


A disposizione.

Buona giornata.

Giuseppe

Ciao Aquilarossa

Con l'intervento di GiuseppeMN (che saluto) credo che tu abbia risolto tutti i tuoi problemi.

Grazie siete stati gentile ad uitarmi adesso funziona tutto alla ferfezione ancora grazie