Kopírovanie údajov do iného zošita v programe Excel
Tento článok vás oboznámi s oboma metódami kopírovania údajov do iného zošita v programe Microsoft Excel.
- Presunúť alebo kopírovať údaje v rovnakom zošite
- Presunúť alebo kopírovať údaje v rôznych zošitoch
- Presunúť alebo kopírovať údaje pomocou VBA
Presunúť alebo kopírovať údaje v rovnakom zošite
Prvým krokom je výber hárkov, ktoré chcete presunúť alebo kopírovať. Ak chcete vybrať viacero hárkov, jednoducho vyberte svoj prvý hárok a potom podržte kláves Control pri kliknutí na ďalšie hárky, ktoré chcete kopírovať.Na karte Domov v hornej lište nástrojov nájdite skupinu Bunky a kliknite na položku Formátovať . V časti Usporiadať listy kliknite na položku Presunúť alebo Kopírovať list .
Otvorí sa dialógové okno. V zozname Predtým môžete buď kliknúť na hárok, pred ktorým chcete vložiť presunuté alebo skopírované hárky, alebo môžete kliknúť presunúť na koniec, aby ste vložili hárky za posledný hárok v zošite.
Ak chcete kopírovať listy namiesto ich premiestnenia, začiarknite políčko Vytvoriť kópiu, ktoré sa nachádza v dialógovom okne Presunúť alebo Kopírovať .
Presunúť alebo kopírovať údaje v rôznych zošitoch
Ak chcete presunúť alebo skopírovať hárky programu Excel do iného zošita, musíte najprv skontrolovať, či je cieľový zošit otvorený v rovnakej verzii programu Microsoft Excel.Vyberte hárky, ktoré chcete presunúť alebo kopírovať. Potom prejdite na kartu Domov na paneli s nástrojmi a kliknite na položku Skupina buniek > Formát . V časti Usporiadať listy kliknite na položku Presunúť alebo Kopírovať list .
Otvorí sa dialógové okno. V zozname Do knihy vyberte premiestnenie alebo skopírovanie vybratých hárkov do existujúceho zošita alebo presunutie alebo skopírovanie hárkov do nového zošita.
V zozname Predtým môžete buď kliknúť na hárok, pred ktorým chcete vložiť presunuté alebo skopírované hárky, alebo môžete kliknúť presunúť na koniec, aby ste vložili hárky za posledný hárok v zošite.
Presunúť alebo kopírovať údaje pomocou VBA
Sub CopyOpenItems ()
'
'CopyOpenItems Makro
'Kopírovať otvorené položky na hárok.
'
Klávesová skratka: Ctrl + Shift + O
'
Dim wbTarget Ako zošit zošit, kde sa majú údaje prilepiť
Dim wbTento zošit zo zošita, z ktorého sa majú údaje kopírovať
Dim strName Ako názov reťazca zdrojového hárka / cieľového zošita
'nastavený na aktuálny aktívny zošit (zdrojová kniha)
Nastaviť wbThis = ActiveWorkbook
'dostať aktívny listname knihy
strName = ActiveSheet.Name
'otvorte zošit, ktorý má rovnaký názov ako názov listu
Nastaviť wbTarget = Workbooks.Open ("C: cesta k súboru" & strName & ".xlsx")
'vyberte bunku A1 v cieľovej knihe
wbTarget.Range ( "A1"). Vyberte
'Vymazať existujúce hodnoty z cieľovej knihy
wbTarget.Range ( "A1: M51") ClearContents.
aktivovať zdrojovú knihu
wbThis.Activate
'Vymazať akúkoľvek vec v schránke pre maximalizáciu dostupnej pamäte
Application.CutCopyMode = False
'kopírovať rozsah zo zdrojovej knihy
wbThis.Range. ( "A12: M62") Copy
'vložte údaje do cieľovej knihy
wbTarget.Range ( "A1"). PasteSpecial
'Vymazať akúkoľvek vec v schránke pre maximalizáciu dostupnej pamäte
Application.CutCopyMode = False
'uložiť cieľovú knihu
wbTarget.Save
'Zatvorte zošit
wbTarget.Close
znovu aktivovať zdrojovú knihu
wbThis.Activate
jasnú pamäť
Nastaviť wbTarget = Nič
Nastaviť wbThis = Nič
End Sub