-
Fototrend
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
-
Thyb
senior tag
Szeintem próbálkozz ezzel a Macroval.
Nagyjából beleirtam mit csinál, és ez a legjobb megoldás, bár ha külön oldalon akarod mindenképp látni az adatokat, akkor más a helyzet.
Sub Searchfor()
'
' Macro1 Macro
' Macro edited 2006.02.10 by tkiss
'
'Te adhatod meg, a 7-ik sorban, hogy mely területet akarod vizsgálni,
'ez a módszer segit abban, ha több azonos adat van az A oszlopban, akkor mindet megjelenitse
'
'Ezt az egésszet lehet ugy is bonyolitani, hogy két inputboxot dobsz fel,
'és két oszlopban csinálsz szürést
Dim mydata, Message, Title, default
Message = ''Irja be a keresett értéket'' ' Set üzenet.
Title = ''Érték keresés'' ' Set Fejléc.
default = ''x'' ' Set alapérték.
' Megjelenited a beviteli mezőt, cimet, alapértéket
mydata = InputBox(Message, Title, default)
Range(''A160000'').AdvancedFilter Action:=xlFilterInPlace, Unique:=False
Range(''A1'').Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=mydata
End Sub
Sub ShowAll()
'
' Macro3 Macro
' Macro edited 2006.02.10 by tkiss
'
'
Selection.AutoFilter 'torli az autofiltert
End SubHa a hatalom csúcsán nincs erkölcs, alatta nincs szabadság.
Új hozzászólás Aktív témák
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz