Filtriranje kolone

Filtriranje kolone 15.10.2010. u 11:28 · pre 195 meseci #1

Da li je moguce da se radi filtriranje kolone u kojoj su unestni neki nazivi gde bi recimo ako je u pitanju kolona A:A polje A1 sluzilo za filtriranje te kolone. A da za filtiranje kucam pocetno slovo npr.
Kucam slovo B
a dole kolone mi se filtriraju tj ostaju mi samo mesta koja pocinju sa slovom B

pa npr dodam BE
a on mi filtrira samo samo ona koja pocinju sa BE

i ako je to moguce da ih tavlja na vrh kolone (ne da budu izbrisana ona koja ne ispunjavaju taj uslov) jer recimo ako imam 1000 naziva da nemoram da skrolujem)

Trazio sam ali nigde nisam mogao da nadje tako nesto

(nemora da bude u excelu!!!)

Potpis

Ono sto ne moze niko Mogu i ja

Re: Filtriranje kolone 17.10.2010. u 20:35 · pre 195 meseci #2

Tako nešto se može postići sa Advance filterom. Iznad tabele koju filtriraš umetni tri reda.
U A1 unesi tačan naziv kolone po kojoj filtriraš. U A2 unesi prvih nekoliko slova i onda aktiviraj Advance filter. Kao List Range navedi opsega za tabelu koju filtriraš, a Kriterija ranbe A1:A2. Nakon OK dobićeš filtranu tabelu.

Nezgoda ovog rešenja je što svaki put moraš da aktiviraš Advance filter. Postoji mogućnost da uz pomoć VBA na promenu sadržaja ćelije A2 automatski aktiviraš Advance filter. Rešenje se sastoji iz rutine koju pozivaš iz događaja Worksheet_Change

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
' Poziva advance filter na promenu celije
'
   If Not Intersect(Range("A2"), Target) Is Nothing Then
        Range("A4:A11").AdvancedFilter _
                 Action:=xlFilterInPlace, _
                 CriteriaRange:=Range("A1:A2")
   End If
End Sub

Sada kad uneseš nekoliko slova i Enter dobićeš filtriranu tabelu. Kad Selektuješ A2 i Delete dobićeš kompletnu listu.

Pogledaj i rešenje QuickSearch koje je postavio Timmy http://www.elitesecurity.org/t326700-0#1977150

Potpis

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

AutoAdvFilter.xls32.5k

1

Re: Filtriranje kolone 18.10.2010. u 19:28 · pre 195 meseci #3

Jako interesantna tema, a pogotovu resenje. Ja sam primer ukljucio u jedan svoj obrazac, i odlicno radi, osim - ako su u koloni "A" pocetni karakteri brojevi. Npr. ako je u A10 - "11 Beograd", i otkucam u A2 - "11", nema rezultata. Tek kad otkucam - "11 B", filter proradi. Pokusao sam da preformatiram kolonu "A" na text, na numeric, ali bez efekta. Pozdrav.

AutoAdvFilter-2.xls32k

Re: Filtriranje kolone 22.10.2010. u 19:34 · pre 195 meseci #4

Naravno da nema rezultata jer se uneti brojevi tretiraju kao - brojevi.

Sem toga, kada imaš potrebu da filtriraš za delimičan unos, koristi džoker '*'.

Za ovaj slučaj će biti dovoljno da uneseš "11*" (a istovremeno će džoker pretvoriti i broj u txt). :)

Potpis

Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!

Re: Filtriranje kolone 22.10.2010. u 21:49 · pre 195 meseci #5

Ni pomislio nisam na dzoker-znake. Hvala puno. Pozdrav

Re: Filtriranje kolone 05.11.2010. u 14:37 · pre 194 meseca #6

E to sam trazio

Code:
If Not Intersect(Range("C2"), Target) Is Nothing Then
        Range("C4:C272").AdvancedFilter _
                 Action:=xlFilterInPlace, _
                 CriteriaRange:=Range("C1:C2")
    End If

Hvalaaaaaaa

Potpis

Ono sto ne moze niko Mogu i ja

Forum kao aplikacija na telefonu

Srodne teme