2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
Legfrissebb anyagok
Mobilarena témák
PROHARDVER! témák
IT café témák
GAMEPOD témák
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Mobilarena

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #7532 Delila_1 veterán motinka #7531
    Új Válasz #7532
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Delila_1

    veterán

    válasz motinka #7531 üzenetére

    Ha már Fire megígérte, tálalom a makrót. :D

    Tegyél autoszűrőt az A11:I11 tartományba, ahogy Fire is írta.

    A lapfülön jobb klikk, Kód megjelenítése. Bejutottál a VB szerkesztőbe, a jobb oldalon kapott üres lapra másold be:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 4 And Target.Row > 2 And Target.Row < 9 Then
    Range("A11").Select
    Selection.AutoFilter Field:=5, Criteria1:=Cells(Target.Row, 1)
    Selection.AutoFilter Field:=9, Criteria1:="="
    End If

    If Target.Address = "$H$1" Then
    Selection.AutoFilter Field:=5
    Selection.AutoFilter Field:=9
    End If
    End Sub

    Ezután a D3:D8 tartomány bármelyik cellájára duplán kattintva a lenti sorok közül azok látszanak, amiket kértél.
    Beleírtam, hogy a H1 duplaklikkjére minden adat látsszon az alsó táblázatban. Írhatsz is valami erre utaló szöveget a H1-be.

Új hozzászólás Aktív témák