Hur importerar / kopierar jag data från stängd arbetsbok till aktuell arbetsbok?
Det är lätt för oss att kopiera data från ett öppnat kalkylblad och klistra in dem i en annan öppnad arbetsbok, men har du någonsin försökt importera data från en stängd arbetsbok till en öppnad arbetsbok? Den här artikeln kommer jag att prata om hur man importerar data från en stängd arbetsbok.
Importera data från stängd arbetsbok till aktuell arbetsbok med VBA-kod
Importera data från stängd arbetsbok till aktuell arbetsbok med Kutools för Excel
Importera data från stängd arbetsbok till aktuell arbetsbok med VBA-kod
Följande VBA-kod kan hjälpa dig att kopiera data från en arbetsbok utan att öppna den till en aktiv öppnad arbetsbok, gör med följande steg:
1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic för applikationer fönster.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: Importera data från stängd arbetsbok till aktuell arbetsbok
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. Tryck sedan på F5 för att köra den här koden och i Filen är öppen välj den arbetsbok som du vill importera dess data, se skärmdump:
4. Klicka sedan Öppen knappen och KutoolsforExcel dialogrutan dyker upp för att påminna dig om att välja en rad data som du vill importera till en annan arbetsbok, se skärmdump:
5. Och klicka sedan på OK -knappen, i dialogrutan popped out, välj en cell där du vill placera data, se skärmdump:
6. och klicka OKhar data i den stängda arbetsboken importerats till den aktuella arbetsboken.
Importera data från stängd arbetsbok till aktuell arbetsbok med Kutools för Excel
VBA-koden kan vara lite svår för vår Excel-nybörjare, så här rekommenderar jag dig ett praktiskt verktyg-Kutools för Excel, med dess Infoga fil på markören kan du infoga hela innehållet i ett kalkylblad från en stängd arbetsbok snabbt och enkelt.
| Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. |
När du har installerat Kutools för Excel, gör så här:
1. Klicka Kutools Plus > Import Export > Infoga fil på markören, se skärmdump:
2. I Infoga fil på markören dialogrutan, gör följande:
(1.) Klicka på 
knappen för att välja en cell där du vill placera de importerade data;
(2.) Klicka på 
för att välja den arbetsbok som du vill importera dess data.
Notera: Endast värde (inga formler): Om du markerar det här alternativet importeras bara värdet och formlerna importeras inte.
Överför inte formatering: Om du markerar detta alternativ importeras data till kalkylbladet utan formatering.
3. Klicka sedan OK, om det finns mer än ett kalkylblad i arbetsboken, a Välj ett kalkylblad dialogrutan dyker upp, ange ett kalkylblad som du vill importera data, se skärmdump:
4. Och klicka sedan på OK -knappen har data i det valda kalkylbladet importerats till den aktuella arbetsboken.
Klicka för att få mer information om denna infoga fil vid markörfunktionen.
Ladda ner och testa gratis Kutools för Excel nu!
Demo: Importera data från stängd arbetsbok till aktuell arbetsbok med Kutools för Excel
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
