Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - TextBox i filtrowanie

bobol · Wysłany: 05-02-2007, 18:25 **TextBox i filtrowanie**

Witam wszystkich!
Mam w formularzu textboxa i commandbuttona

Jak zrobić żeby po kliknięciu commandbuttona aktywował mi się ukryty arkusz
z założonym filtrem, wartość do filtrowania z textboxa , filtrowana kolumna "B"

Trebor · Excel Expert **Pomógł:** 1752 razy Posty: 4680

Hej
To by było jakoś tak, gdy filtr rozpoczyna się od komórki A1

Kod:

Private Sub CommandButton1_Click()
Sheets("Ukryty").AutoFilterMode = False
Sheets("Ukryty").Range("A1").AutoFilter Field:=2, Criteria1:=TextBox1.Text
End Sub

Zaznaczam, że nie wiem co masz na myśli pisząc aktywował.

Pozdrawiam

bobol · Wysłany: 05-02-2007, 19:58

Kod:

Range("B3:B149").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=UserForm1.TextBox14.Text

I tak jest OK. ale jak teraz zrobić żeby np. w komórce "F160" sumowały się tylko widoczne
komórki z kolumny "F" ?

Trebor · Excel Expert **Pomógł:** 1752 razy Posty: 4680

Formuła

Kod:

=SUMY.POŚREDNIE(109;F1:F36)

Powinna dać radę. Zmień zakres bo suwak się mi zaciął. ;-)

Pozdrawiam

bobol · Wysłany: 05-02-2007, 20:33

Dzięki Trebor!
Faktycznie dała radę.
Pozdrawiam