- VR topik
- Fejhallgató erősítő és DAC topik
- Milyen notebookot vegyek?
- Véleményes teszt bizonygatja mennyit ér a Macbook Neo 8 GB RAM-ja
- Gaming notebook topik
- Univerzális kontrolleradapter PlayStationökhöz és PC-hez
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Mini-ITX
- A kisebb független stúdiók álma lehet a DLSS 5
- Milyen Android TV boxot vegyek?
-
PROHARDVER!
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
- VR topik
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Amazfit Active 2 NFC - jó kör
- Fejhallgató erősítő és DAC topik
- Spórolós topik
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Xbox Series X|S
- Milyen routert?
- Mire lesz elég a Z Fold8 extra akkumulátora?
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- További aktív témák...
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- MS SQL Server 2016, 2017, 2019
- Szerver / szerverterem / szerver infrastruktúra felvásárlás, 1-1db is, kiszállással, logisztikával
- AlzaPower LML-120 Monitor Light Bar 5W, 51cm, fekete
- Geforce GTX 1050, 1050 Ti, 1060, 1650, 1660/ RTX 2060/ GT 1030 - Low profile is (LP)
- Keresünk iPhone 16/16e/16 Plus/16 Pro/16 Pro Max
- AKCIÓ! 2TB Samsung 980 PRO NVMe SSD meghajtó garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50
