-
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
-
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
- PlayStation 5
- Villanyszerelés
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Formula-1
- Gitáros topic
- AMD Navi Radeon™ RX 9xxx sorozat
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- droidic: Windows 11 önállóság nélküli világ: a kontroll új korszaka
- Szünetmentes tápegységek (UPS)
- További aktív témák...
- ÁRGARANCIA!Épített KomPhone i7 14700KF 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- iMac Pro 1.1 2017 Intel Xeon W2150B 64GB 1TB VEGA 64 16GB!!! 1 év garancia!
- ÁRGARANCIA!Épített KomPhone i5 10400F 16/32/64GB RAM RX 7600 8GB GAMER PC termékbeszámítással
- GYÖNYÖRŰ iPhone 12 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3195, 95% Akkumulátor
- Telefon felvásárlás!! Xiaomi Redmi Note 12, Xiaomi Redmi Note 12 Pro, Xiaomi Redmi Note 12 Pro+
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő
Fferi50
