Hirdetés
-
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
-
bozsozso
őstag
Sziasztok,
Az alábbi kódrészlettel illesztek be egy word dokumentumba táblázatot valamint a végén törlöm is a forrás adatokat.
Sheets("Fej").Select
Range("A1").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
.Selection.PasteAndFormat wdFormatOriginalFormatting
Range("A2").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
Range("J1").ClearContents
Sheets("Fő").SelectA problémám az lenne, hogy ha a táblázat átcsúszik egy következő lapra akkor esetlegesen megtöri a cellákat és úgy folytatódik a következő oldalon. Ezt el lehet kerülni valahogy? Esetlegesen úgy kezdve a következő oldalt, hogy a forrás 1. sorával kezdjen? Így a táblázat oszlop nevei is minden oldalon látszódnának.
Előre is köszönöm a segítséget.
Új hozzászólás Aktív témák
- MS SQL Server 2016, 2017, 2019
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Bomba Ár! Lenovo ThinkPad L14 G2i - i5-1145G7 I 16GB I 256SSD I 14" FHD I Cam I W11 I Gar
- Honor 200 Pro 512GB,Újszerű,Dobozaval,12 hónap garanciával
- Lenovo Thinkpad X1 Yoga 5th Gen. i7 10th, 16GB RAM 27% ÁFÁS (0329)
- HIBÁTLAN iPhone 14 256GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3535
- 191 - Lenovo Legion 5 (15AKP10) - AMD Ryzen AI 7 350, RTX 5060 (ELKELT)
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Fferi50

