Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

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

Preprosto je, da kopiramo podatke iz odprtega delovnega lista in jih prilepimo na drugo odprto delovno knjigo, ali ste kdaj poskusili uvoziti podatke iz zaprtega delovnega zvezka v odprto delovno knjigo? 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 for Excel


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


Naslednja VBA koda vam lahko pomaga, da kopirate podatke iz delovnega zvezka, ne da bi jo odprli v aktivno odprto delovno knjižico, storite z naslednjimi koraki:

1. Drži dol ALT + F11 tipke in odpre Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduli, in prilepite naslednjo kodo v Okno modula.

VBA koda: Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek

Sub ImportDatafromcloseworkbook()
'Update 20150707
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 Open okno, izberite delovni zvezek, ki ga želite uvoziti, glejte sliko:

doc uvoz podatkov iz zaprtega delovnega zvezka 1

4. Nato kliknite Odprto gumb in KutoolsforExcel se prikaže pogovorno okno, ki vas opomni, da izberete vrsto podatkov, ki jih želite uvoziti v drugo delovno knjižico, glejte sliko zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 2

5. In nato kliknite OK gumb, v pogovornem oknu izklopljen, izberite celico, kamor želite dati podatke, si oglejte posnetek zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 3

6. in kliknite OK, so podatki v zaprtem delovnem zvezku uvoženi v trenutno delovni zvezek.


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

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

Kutools za Excel : z več kot 300 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60.

Po namestitvi Kutools za Excel, storite naslednje:

1. klik Podjetje > Uvozno-izvoznih > Vstavi datoteko na kazalniku, si oglejte sliko zaslona:

doc uvoz podatkov iz zaprtega delovnega zvezka 4

2. v Vstavi datoteko na kazalniku pogovorno okno naredite naslednje operacije:

(1.) Kliknite doc uvoz podatkov iz zaprtega delovnega zvezka 6gumb, da izberete celico, v katero želite ujeti podatke;

(2.) Kliknite doc uvoz podatkov iz zaprtega delovnega zvezka 7da izberete delovni zvezek, ki ga želite uvoziti.

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

Ne prenašajte oblikovanja: Preverjanje te možnosti bo podatke uvažalo v delovnem listu brez oblikovanja.

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!

3. Nato kliknite OK, če je v delovni zvezek več delovnih listov, a Izberite delovni list pogovorno okno se bo pojavilo, prosimo, navedite delovni list, ki ga želite uvoziti, glejte sliko:

doc uvoz podatkov iz zaprtega delovnega zvezka 8

4. In nato kliknite OK gumb, so bili podatki v izbranem delovnem listu uvoženi v trenutno delovni zvezek.

Kliknite, če želite izvedeti več podrobnosti o tej vstavi datoteko na funkciji kurzorja.

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!


Demo: Uvozite podatke iz zaprtega delovnega zvezka v trenutni delovni zvezek s programom Kutools for Excel

Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Guilherme · 6 months ago
    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?
  • To post as a guest, your comment is unpublished.
    Mir · 2 years ago
    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
  • To post as a guest, your comment is unpublished.
    Tawfiq · 3 years ago
    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?