Note: The other languages of the website are Google-translated. Back to English

Sut i fewnforio / copïo data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol?

Mae'n hawdd i ni gopïo data o daflen waith agored a'u pastio i lyfr gwaith agored arall, ond, a ydych chi erioed wedi ceisio mewnforio data o lyfr gwaith caeedig i mewn i lyfr gwaith agored? Yr erthygl hon, byddaf yn siarad am sut i fewnforio data o lyfr gwaith caeedig.

Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol gyda chod VBA

Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol gyda Kutools for Excel


Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol gyda chod VBA

Efallai y bydd y cod VBA canlynol yn eich helpu i gopïo data o lyfr gwaith heb ei agor i lyfr gwaith gweithredol agored, gwnewch y camau canlynol:

1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

Cod VBA: Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol

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. Yna pwyswch F5 allwedd i redeg y cod hwn, ac yn y Agor Ffeil ffenestr, dewiswch y llyfr gwaith rydych chi am fewnforio ei ddata, gweler y screenshot:

doc mewnforio data o lyfr gwaith caeedig 1

4. Yna cliciwch agored botwm, a KutoolsforExcel blwch deialog yn galw allan i'ch atgoffa rhag dewis ystod o ddata rydych chi am ei fewnforio i lyfr gwaith arall, gweler y screenshot:

doc mewnforio data o lyfr gwaith caeedig 2

5. Ac yna cliciwch OK botwm, yn y blwch deialog popped out, dewiswch gell lle rydych chi am roi'r data, gweler y screenshot:

doc mewnforio data o lyfr gwaith caeedig 3

6. a chliciwch OK, mae'r data yn y llyfr gwaith caeedig wedi'i fewnforio i'r llyfr gwaith cyfredol.


Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol gyda Kutools for Excel

Efallai y bydd y cod VBA ychydig yn anodd i'n dechreuwr Excel, felly, yma, byddaf yn argymell teclyn defnyddiol i chi-Kutools ar gyfer Excel, Gyda'i Mewnosod Ffeil yn y Cyrchwr nodwedd, gallwch fewnosod cynnwys cyfan taflen waith o lyfr gwaith caeedig yn gyflym ac yn hawdd.

Kutools ar gyfer Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel a ganlyn:

1. Cliciwch Kutools Byd Gwaith > Mewnforio ac Allforio > Mewnosod Ffeil yn y Cyrchwr, gweler y screenshot:

doc mewnforio data o lyfr gwaith caeedig 5

2. Yn y Mewnosod Ffeil yn y Cyrchwr blwch deialog, gwnewch y gweithrediadau canlynol:

(1.) Cliciwch doc mewnforio data o lyfr gwaith caeedig 6botwm i ddewis cell lle rydych chi am roi'r data a fewnforiwyd;

(2.) Cliciwch doc mewnforio data o lyfr gwaith caeedig 7botwm i ddewis y llyfr gwaith rydych chi am fewnforio ei ddata.

Nodyn: Gwerth yn unig (dim fformwlâu): Os gwiriwch yr opsiwn hwn, dim ond y gwerth fydd yn cael ei fewnforio, ac ni fydd y fformwlâu yn cael eu mewnforio.

Peidiwch â throsglwyddo fformatio: Bydd gwirio'r opsiwn hwn yn mewnforio'r data i'r daflen waith heb ei fformatio.

Dadlwythwch a threialwch am ddim Kutools ar gyfer Excel Now!

3. Yna cliciwch OK, os oes mwy nag un taflen waith yn y llyfr gwaith, a Dewiswch Daflen Waith bydd blwch deialog yn popio allan, nodwch daflen waith rydych chi am fewnforio'r data, gweler y screenshot:

doc mewnforio data o lyfr gwaith caeedig 8

4. Ac yna cliciwch OK botwm, mae'r data yn y daflen waith a ddewiswyd wedi'i fewnforio i'r llyfr gwaith cyfredol.

Cliciwch i wybod mwy o fanylion am y nodwedd Mewnosod Ffeil yn Cyrchwr.

Dadlwythwch a threial am ddim Kutools ar gyfer Excel Now!


Demo: Mewnforio data o'r llyfr gwaith caeedig i'r llyfr gwaith cyfredol gyda Kutools ar gyfer Excel

Kutools ar gyfer Excel: gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Dadlwythwch a threial am ddim Nawr!

Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (7)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am yr uchod. Rwy'n ceisio defnyddio VBA ond pan fyddaf yn cyrraedd cam # 3: 3. Yna pwyswch allwedd F5 i redeg y cod hwn, ac yn y ffenestr Ffeil Agored, dewiswch y llyfr gwaith yr ydych am fewnforio ei ddata ni allaf "weld " " y ffeil dwi angen mewnforio'r data ohoni! nid yw'r ffolder yn dangos y ffeil honno! Beth alla i ei wneud?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am y tric anhygoel yma. Llwyddais i gael y gwaith codio gyda fy mhrosiect presennol. Fy nghwestiwn yw sut y gallaf osod '' cell cyrchfan'' rhagosodedig i ystod ''A5'' heb popio allan InputBox
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Funcionou a primeira vez que tentei.. Agora por algum motivo não esta funcionando mais..Parece que esta copiando os valores apenas. A oes unrhyw beth arall i'w wneud â'r cynllun, na'r hyn sydd ei angen arnoch chi, na'r gweddill.. o que devo fazer?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Buen dia! mae'n defnyddio su macro y realmente mi fue muy util, pero quisiera saber, ¿como puedo agregar una cyfarwyddyd a'r macro er mwyn i peguen unigol valores a dim fformiwlâu las al libro a quisiera quisiera que al pegara una gwybodaeth, adicional para poder seguir pegando datos de otros archivos cerrados...

Esto es porque yo yo recibo information of los ymgeiswyr a lo debo de concentrar en un formato maestro.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
mae'n gweithio grât diolch. Yr wyf yn cael problem gyda data copïo ei fformiwla nid y gwerth. sut alla i gopïo gwerth yn unig.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn gweithio'n wych, fodd bynnag yn y ffeil rwy'n ei hagor ni fydd ond yn caniatáu imi agor o'r tab a oedd ymlaen ddiwethaf. A oes ffordd i ganiatáu i mi ddewis y daflen waith yr wyf am ei chael yn gyntaf cyn i mi ddewis yr ystod celloedd?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Patrick,Wrth gymhwyso'r cod uchod, os bydd y blwch annog yn cael ei popped allan, gallwch glicio ar unrhyw dab dalen sydd ei angen arnoch, ac yna dewiswch yr ystod cell. Rhowch gynnig arall arni, diolch!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir