- MasterDeeJay: Asus Q170M-C coffeetime mod!
- MasterDeeJay: Comet lake (10gen) és DDR3 - mert ilyet is lehet!
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- mefistofeles: Az elhízás nem akaratgyengeség! 2 Ahogy én csinálom.......
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Geri Bátyó: Régi VGA, HDMI és a felbontás
- sziku69: Fűzzük össze a szavakat :)
- Candy: IGPU dGPU passthrough, avagy a nem minden arany, amin megy a Furmark
- gerner1
- Luck Dragon: Asszociációs játék. :)
-
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
-
Fferi50
Topikgazda
válasz
rovgab
#52855
üzenetére
Szia!
1. Kézzel: Kijelölöd a teljes területet amit szűrni kívánsz, szűrés nélkül- Ezután lapelrendezés - nyomtatási terület kijelölése. A szűrő alkalmazás után csak a látszó területet fogja nyomtatni.
Természetesen ezt minden munkalapon meg kell csinálnod.
2. Makróval:
Ha az A1 cellától kezdődik a területed:
ActiveSheet.PageSetup.PrintArea=Range("A1").CurrentRegion.Address
Ha nem az első sortól, akkor a terület első celláját kell beírnod, pl. A5 ha az ötödik sortól kezdődik. FONTOS a terület legyen "leválasztva", azaz előtte - utána legyen üres sor, illetve üres oszlop ha nem az első oszlopban kezdődik (pl. D5, akkor a 4. sor és a C oszlop legyen üres, A1 helyére D5 kerüljön a makróba).
Ezután bármilyen szűrés esetén csak az adott tartományban látható sorok kerülnek kinyomtatásra.
ActiveSheet helyére írhatod ezt is Sheets("név"), ezáltal bármelyik munkalap nyomtatási területét beállíthatod, anélkül, hogy át kellene váltanod rá.
Remélem sikerülni fog.
Üdv.
Új hozzászólás Aktív témák
- 3D nyomtatás
- AMD GPU-k jövője - amit tudni vélünk
- Milyen belső merevlemezt vegyek?
- HiFi műszaki szemmel - sztereó hangrendszerek
- A cégvezetők látják az AI költségeit, csak azt nem hogyan lesz ebből haszon
- Kiadta majd visszavonta a legújabb GeForce drivert az NVIDIA
- Több könyvet passzolna el a Samsung, mint kagylót
- Google Pixel topik
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Motoros topic
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- PC Game Pass előfizetés
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Kingston hyperX fury 8GB kit 2400mhz
- BESZÁMÍTÁS! ASUS H110M i5 7500 8GB DDR4 240GB SSD GTX 1050Ti 4GB Cooler Master ATX DeepCool 400W
- Lenovo Thinkpad X230,12.5",HD,i5-3320M,4GB DDR3,500GB HDD,WIN10
- Dell Precision 7550 i7-10850H 32GB 1TB Nvidia RTX3000 6GB 1 év garancia
- Bomba ár! Dell Latitude 5400 - i5-8265U I 16GB I 256SSD I 14" HD I HDMI I Cam I W11 I Gari
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50