Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

filtrare cella

0 views
Skip to first unread message

gio

unread,
Jun 22, 2007, 1:59:01 AM6/22/07
to
ciao,
ho nella colonna A tantissimi nomi (anche doppi). Quando vado a filtrarne
uno con la funzione 'Filtro' tante volte mi è un pò difficile trovarlo perchè
sono tantissimi. Mi sarebbe più comodo cercare il nome con la funzione
'Trova', poi una volta selezionato fare partire una macro che vada a filtrare
nella colonna A il nome selezionato.
E' possibile
ciao e grazie

Maurizio Borrelli

unread,
Jun 22, 2007, 2:44:24 AM6/22/07
to
"gio" wrote in message
news:E261011E-0DED-4873...@microsoft.com:

Ciao gio.

Invece di scorrere la lista alla ricerca del nome seleziona, in quella
stessa lista, la voce:

(Personalizza...)

--
(Facci sapere se e eventualmente come hai risolto. Grazie.)

Ciao :o) Microsoft MVP (Excel)
Maurizio <http://mvp.support.microsoft.com/profile/Maurizio.Borrelli>
--------
?SPQR(C)
 X       RIO - Risorse in italiano per gli utenti di office
-------- <http://www.riolab.org>

Norman Jones

unread,
Jun 22, 2007, 2:49:44 AM6/22/07
to
Ciao Gio,

'---------------

'---------------

Non credo sia necesario utilizzare lo strumento
Trova o una macro

Per filtrare i dati, prova ad impostare il nome
utilizzando l'opzione 'Personalizzato' (Custom)

---
Regards,
Norman
Microsoft Excel MVP


gio

unread,
Jun 22, 2007, 6:20:00 AM6/22/07
to

"Norman Jones" ha scritto:

> Ciao,
dato che spesso mi trovo sul nome che poi va filtrato mi sarebbe più comodo
utilizzare la procedura che ho chiesto, e non andare sul filtro a
personalizzare la ricerca per cui chiedo se posso avere la soluzione al
quesito che ho posto (io ho provato e riprovato ma non riesco proprio)
ciao e grazie ancora

Norman Jones

unread,
Jun 22, 2007, 6:28:07 AM6/22/07
to
Ciao Gio,


'----------------
dato che spesso mi trovo sul nome che poi va filtrato mi sarebbe piů comodo


utilizzare la procedura che ho chiesto, e non andare sul filtro a
personalizzare la ricerca per cui chiedo se posso avere la soluzione al
quesito che ho posto (io ho provato e riprovato ma non riesco proprio)

'----------------

In un modulo standard (vedi di sotto),
prova:

'=============>>
Public Sub Tester()
Dim Rng As Range
Dim sStr As String

Set Rng = ActiveSheet.AutoFilter.Range
sStr = ActiveCell.Value
Rng.AutoFilter Field:=1, _
Criteria1:=sStr
End Sub
'<<=============

Alt-F11 per aprire l'Editor di VBA
Menu | Inserisci | Modulo
Incolla il suddetto codice
Alt-F11 per tornare in Excel
Alt-F8
Seleziona "Tester"
Esegui

0 new messages