estrarre righe excel con testo prescelto

[libraio]

Ciao a tutti (e grazie di esistere...)
Come posso estrarre in Foglio2 le righe che contencano nella colonna 'n' del Foglio 1 un testo o numero, che può essere anche parziale?
Esempio: estratte tutte le righe che in colonna B conotengano "2010"
- Atlante 2010
- dizionario 2010 italiano
- 2010 films italiani
La riga interessata dalla ricerca dovrebbe essere riportata sulk Foglio 2 nella sua completezza (composta da più colonne, in quantità variabile secondo l'elenco fonte della ricerca)
Ancora grazie per il vostro prezioso aiuto
libraio

[Anthony47]

Per cominciare vai su Foglio1, seleziona tutta la colonna N e applicaci un filtro automatico (Menu /Dati /Filtro /Filtro automatico). Clicca sulla freccina di N1, scegli Personalizza, scegli "Contiene", digita il tuo valore (es 2010), Ok.
Ti fara' vedere solo le righe che cerchi.
Se l' uso che devi fare della prestazione e' saltuaria dovrebbe bastarti gia' questo; altrimenti puoi lavorare con una macro, ispirandoti ad esempio a questa discussione: viewtopic.php?f=26&t=84789
Nel tuo caso dovrai impostare MioFiltro = "=*" & Sheets("Foglio2").Range("K1").Value & "*"
Ovviamente la macro che registri copiera' anche le colonne complete di Foglio1 (quelle che ti interessano) e le incollera' in A1 di Foglio2.

Se con questi spunti non risolvi posta ancora spiegando dove sei arrivato.
Ciao

[libraio]

Grazie Anthony,
la prima opzione è sicuramente buona per ricerche "sporadiche".
Ho tentato applicare la seconda soluzione (che trovo ottimale per le mie ricerche a filtro periodiche); ho seguito le istruzioni del tuo link, ma... non succede nulla.
Eccoti il codice risultante, che tento di applicare con un pulsante inserito nel Foglio1:

Sub ricerca_filtrata()
'
' ricerca_filtrata Macro
' Macro registrata il 19/02/2010 da Libreria Garibaldi
'

'
MioFiltro = "=*" & Sheets("Foglio2").Range("K1").Value & "*"
Selection.AutoFilter Field:=1, Criteria1:=MioFiltro, Operator:=xlAnd
End Sub

Dov'è l'errore?
libraio

[ricky53]

Ciao,
il codice funziona bene.

Ti descrivo cosa il codice fa:
filtra per la parola presente in "K1" del foglio2 se contenuta nella colonna "A" del foglio1

i dati devono essere:
nel foglio1, in colonna "A" devi avere i dati
nel foglio2 cella K1 c'è il dato da cercare

Ciao da Ricky53

[libraio]

Grazie della precisazione.
Ma se io voglio applicare la ricerca ad una colonna diversa dalla A, come devo intervenire?
libraio

[ricky53]

Ciao,
modifica
Field:=1 in Field=numero tua colonna da filtrare.

Ciao da Ricky53

[libraio]

Approffitto ancora della tua cortesia:
per semplicità, vorrei inserire il dato da cercare in K2 del Foglio1 (anzichè in Foglio2).
E' possibile? Cosa devo modificare?
Grazie!
libraio

[Anthony47]

Devi modificare MioFiltro = "=*" & Sheets("Foglio2").Range("K1").Value & "*" in

Codice: Seleziona tutto

MioFiltro = "=*" & Sheets("Foglio1").Range("K2").Value & "*"

A integrazione di quanto ha detto Ricky, tieni presente che in Selection.AutoFilter Field:=XX, Criteria1:=MioFiltro, Operator:=xlAnd quell' XX identifica quale colonna, tra quelle a cui hai applicato il filtro automatico, sara' filtrata; quindi se hai applicato il filtro automatico as esempio a col M-N-O, allora Field:=1 fara' riferimento alla colonna M. Insomma e' un indice "relativo".

Ciao

[libraio]

Grazie Anthony,
mi complimento per la chiarezza espositiva.
libraio