Hvordan importeres / kopieres data fra lukket projektmappe til den aktuelle projektmappe?

Det er let for os at kopiere data fra et åbnet regneark og indsætte dem i en anden åbnet projektmappe, men har du nogensinde prøvet at importere data fra en lukket projektmappe til en åbnet projektmappe? Denne artikel vil jeg tale om, hvordan man importerer data fra en lukket projektmappe.

Importer data fra lukket projektmappe til den aktuelle projektmappe med VBA-kode

Importer data fra lukket projektmappe til den aktuelle projektmappe med Kutools til Excel

Importer data fra lukket projektmappe til den aktuelle projektmappe med VBA-kode

Følgende VBA-kode kan hjælpe dig med at kopiere data fra en projektmappe uden at åbne den til en aktiv åbnet projektmappe. Benyt følgende trin:

1. Hold nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Importer data fra lukket projektmappe til den aktuelle projektmappe

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. Tryk derefter på F5 nøgle til at køre denne kode, og i Fil åben vindue, vælg den projektmappe, som du vil importere dens data, se skærmbillede:

4. Klik derefter på Åbne knap og KutoolsforExcel dialogboksen vises for at minde dig om at vælge en række data, som du vil importere til en anden projektmappe, se skærmbillede:

5. Og klik derefter på OK knap, i den poppede dialogboks skal du vælge en celle, hvor du vil placere dataene, se skærmbillede:

6. og klik OK, er dataene i den lukkede projektmappe importeret til den aktuelle projektmappe.

Importer data fra lukket projektmappe til den aktuelle projektmappe med Kutools til Excel

VBA-koden kan være noget vanskelig for vores Excel-nybegynder, så her vil jeg anbefale dig et praktisk værktøj-Kutools til Excel, Med Indsæt fil på markøren funktion kan du hurtigt og nemt indsætte hele indholdet af et regneark fra en lukket projektmappe.

Efter installation Kutools til Excelskal du gøre som følger:

1. Klik Kutools Plus > Import Eksport > Indsæt fil på markøren, se skærmbillede:

2. I Indsæt fil på markøren i dialogboksen, skal du udføre følgende handlinger:

(1.) Klik på knap for at vælge en celle, hvor du vil placere de importerede data;

(2.) Klik på for at vælge den projektmappe, som du vil importere dens data.

Bemærk: Kun værdi (ingen formler): Hvis du markerer denne indstilling, importeres kun værdien, og formlerne importeres ikke.

Overfør ikke formatering: Hvis du markerer denne mulighed, importeres dataene til regnearket uden formatering.

3. Klik derefter på OK, hvis der er mere end et regneark i projektmappen, a Vælg et regneark dialogboksen vises, skal du angive et regneark, som du vil importere dataene, se skærmbillede:

4. Og klik derefter på OK knappen, er dataene i det valgte regneark importeret til den aktuelle projektmappe.

Download og gratis prøveversion Kutools til Excel nu!