Preskoči na glavno vsebino

Kako uvoziti / kopirati podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek?

Preprosto kopiramo podatke iz odprtega delovnega lista in jih prilepimo v drug odprt delovni zvezek, toda, ali ste že kdaj poskusili uvoziti podatke iz zaprtega delovnega zvezka v odprti delovni zvezek? V tem članku bom govoril o tem, kako uvoziti podatke iz zaprtega delovnega zvezka.

Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s kodo VBA

Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s programom Kutools za Excel


Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s kodo VBA

Naslednja koda VBA vam lahko pomaga kopirati podatke iz delovnega zvezka, ne da bi jih odprla v aktivno odprto delovno knjigo, naredite naslednje:

1. Držite tipko ALT + F11 in odpre tipko Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.

Koda VBA: uvoz podatkov iz zaprtega delovnega zvezka v trenutni delovni zvezek

Sub ImportDatafromcloseworkbook()
'Updateby Extendoffice
Dim xWb As Workbook
Dim xAddWb As Workbook
Dim xRng1 As Range
Dim xRng2 As Range
Set xWb = Application.ActiveWorkbook
xTitleId = "KutoolsforExcel"
With Application.FileDialog(msoFileDialogOpen)
    .Filters.Clear
    .Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
    .AllowMultiSelect = False
    .Show
    If .SelectedItems.Count > 0 Then
        Application.Workbooks.Open .SelectedItems(1)
        Set xAddWb = Application.ActiveWorkbook
        Set xRng1 = Application.InputBox(prompt:="Select source range", Title:=xTitleId, Default:="A1", Type:=8)
        xWb.Activate
        Set xRng2 = Application.InputBox(prompt:="Select destination cell", Title:=xTitleId, Default:="A1", Type:=8)
        xRng1.Copy xRng2
        xRng2.CurrentRegion.EntireColumn.AutoFit
        xAddWb.Close False
    End If
End With
End Sub

3. Nato pritisnite F5 ključ za zagon te kode in v Datoteka odprta v delovnem zvezku, v katerega želite uvoziti njegove podatke, glejte posnetek zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 1

4. Nato kliknite Odprto gumb in KutoolsforExcel Pojavi se pogovorno okno, ki vas opomni, da izberete vrsto podatkov, ki jih želite uvoziti v drugo delovno knjigo, glejte posnetek zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 2

5. In nato kliknite OK gumb, v pojavnem pogovornem oknu izberite celico, kamor želite vnesti podatke, glejte posnetek zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 3

6. in kliknite OK, so podatki iz zaprtega delovnega zvezka uvoženi v trenutni delovni zvezek.


Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s programom Kutools za Excel

Koda VBA je morda nekoliko težavna za našega začetnika v Excelu, zato vam tukaj priporočam priročno orodje -Kutools za Excel, Z njegovim Vstavite datoteko v kazalec funkcijo lahko hitro in enostavno vstavite celotno vsebino delovnega lista iz zaprtega delovnega zvezka.

Kutools za Excel : z več kot 300 priročnimi dodatki za Excel, ki jih lahko brezplačno preizkusite v 30 dneh

Po namestitvi Kutools za Excel, naredite naslednje:

1. klik Kutools Plus > Uvozno-izvoznih > Vstavite datoteko v kazalec, glej posnetek zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 5

2. v Vstavite datoteko v kazalec v pogovornem oknu izvedite naslednje postopke:

(1.) Kliknite doc uvoz podatkov iz zaprtega delovnega zvezka 6gumb, da izberete celico, kamor želite shraniti uvožene podatke;

(2.) Kliknite doc uvoz podatkov iz zaprtega delovnega zvezka 7, da izberete delovni zvezek, v katerega želite uvoziti njegove podatke.

Opomba: Samo vrednost (brez formul): Če potrdite to možnost, bo uvožena samo vrednost in formule ne bodo uvožene.

Ne prenašajte oblikovanja: Če potrdite to možnost, boste podatke uvozili na delovni list brez formatiranja.

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!

3. Nato kliknite OK, če je v delovnem zvezku več delovnih listov, a Izberite delovni list Odprlo se bo pogovorno okno, določite delovni list, v katerega želite uvoziti podatke, glejte sliko zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 8

4. In nato kliknite OK Podatki na izbranem delovnem listu so bili uvoženi v trenutni delovni zvezek.

Kliknite, če želite izvedeti več podrobnosti o tej funkciji Vstavi datoteko v kazalcu.

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!


Predstavitev: Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s programom Kutools za Excel

Kutools za Excel: z več kot 300 priročnimi dodatki za Excel, brezplačno preizkusite brez omejitev v 30 dneh. Prenesite in brezplačno preskusite zdaj!

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Missed important thing. Only values need to be imported (not formulas).
This comment was minimized by the moderator on the site
Hi,
I need to import range of data (with keeping formating) from 5 different workbooks (each contain 3 sheets, only one sheet need to be imported) to 5 specified sheets in master workbook (the destination sheet need to have same name all the time, which is different than source sheet name). Every week the source file/sheet name is different. Could you help with this, please?
This comment was minimized by the moderator on the site
Works great, however in the file I open it will only allow me to open from the tab that is was last on. Is there a way to allow me to select the worksheet I want first before I select the cell range?
This comment was minimized by the moderator on the site
Hello, Patrick,When applying the above code, if the prompt box is popped out, you can just click any sheet tab you need, and then select the cell range.Please try it again, thank you!
This comment was minimized by the moderator on the site
it works grate thank you. i am having issue with data copied its formula not the value. how can i copy only value.
This comment was minimized by the moderator on the site
Buen dia! he utilizado su macro y realmente me fue muy util, pero quisiera saber, ¿como puedo agregar una instruccion a la macro para que se peguen solo los valores y no las formulas al libro abierto y también quisiera que al pegar la informacion, agregara una fila adicional para poder seguir pegando datos de otros archivos cerrados...

Esto es porque yo recibo informacion de los candidatos y lo debo de concentrar en un formato maestro.
This comment was minimized by the moderator on the site
Funcionou a primeira vez que tentei.. Agora por algum motivo não esta funcionando mais..Parece que esta copiando os valores apenas. Quando faço alteração de algum dado na planilha, nao esta mudando na outra.. o que devo fazer?
This comment was minimized by the moderator on the site
Thanks for the awesome trick here. I managed to get the coding work with my current project. My question is how can I set ''destination cell'' default to range ''A5'' without popping out InputBox
This comment was minimized by the moderator on the site
Thanks for the above. I'm trying to use VBA but when I reach to step #3: 3. Then press F5 key to run this code, and in the File Open window, select the workbook that you want to import its data I can't "see" the file I need to import the data from! the folder doesn't show that file! What can I do?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations