Hirdetés
- MasterDeeJay: Mi ez a pici videókártya? AMD E9173 teszt
- Gurulunk, WAZE?!
- GoodSpeed: Mutasd magad topic!
- Luck Dragon: Asszociációs játék. :)
- gban: Ingyen kellene, de tegnapra
- Andras-G: Az internet veszélyei [2. rész] - Facebook Marketpalce
- Klaus Duran: RCS
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Yutani: 20 év a Prohardveren
- mefistofeles: Az elhízás nem akaratgyengeség!
-
LOGOUT
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
-
Delila_1
veterán
válasz
motinka
#7531
üzenetére
Ha már Fire megígérte, tálalom a makrót.

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 SubEzutá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
- MasterDeeJay: Mi ez a pici videókártya? AMD E9173 teszt
- Gaming notebook topik
- A '90-es évek jutnak az eszünkbe az ATK készülő egeréről
- Garmin Venu 4 - a nagy ugrás
- Anglia - élmények, tapasztalatok
- Motoros topic
- Trollok komolyan
- MWC 2026: Rangos díjjal távozott az S26 Ultra
- iPad topik
- Xbox tulajok OFF topicja
- További aktív témák...
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- The Elder Scrolls Online Imperial Collector s Edition
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- 236 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090
- iPhone 13 128Gb 100%(1év Garancia) - AKCIÓ
- Új és újszerű 13-14 Gamer, ultrabook, üzleti, 2in1, X360, Touch készülékek kedvező áron Garanciával
- SteelSeries vezeték nélküli fejhallgató Arctis 9
- Azonnali készpénzes GAMER / üzleti notebook felvásárlás személyesen / csomagküldéssel korrekt áron
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50