Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk mengimport / menyalin data dari buku kerja tertutup ke dalam buku kerja semasa?

Sangat mudah bagi kami untuk menyalin data dari lembaran kerja yang dibuka dan tampalnya ke buku kerja lain yang dibuka, tetapi, adakah anda pernah cuba untuk mengimport data dari buku kerja tertutup ke dalam buku kerja yang dibuka? Artikel ini, saya akan bercakap mengenai cara mengimport data dari buku kerja tertutup.

Import data daripada buku kerja tertutup ke dalam buku kerja semasa dengan kod VBA

Import data daripada buku kerja tertutup ke dalam buku kerja semasa dengan Kutools untuk Excel


Import data daripada buku kerja tertutup ke dalam buku kerja semasa dengan kod VBA


Kod VBA berikut boleh membantu anda menyalin data dari buku kerja tanpa membukanya ke buku kerja yang aktif dibuka, sila lakukan dengan langkah berikut:

1. Tahan ALT + F11 kunci, dan ia membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Klik Memasukkan > Modul, dan tampal kod berikut dalam Modul Window.

Kod VBA: Import data daripada buku kerja tertutup ke dalam buku kerja semasa

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. Kemudian tekan F5 kunci untuk menjalankan kod ini, dan dalam Fail Terbuka tetingkap, pilih buku kerja yang anda mahu untuk mengimport datanya, lihat tangkapan skrin:

data import doc dari buku kerja tertutup 1

4. Kemudian klik Dibuka butang, dan KutoolsforExcel kotak dialog timbul untuk mengingatkan anda memilih pelbagai data yang ingin anda import ke buku kerja lain, lihat tangkapan skrin:

data import doc dari buku kerja tertutup 2

5. Kemudian klik OK butang dalam kotak dialog yang muncul, pilih sel di mana anda mahu meletakkan data, lihat tangkapan skrin:

data import doc dari buku kerja tertutup 3

6. dan klik OK, data dalam buku kerja tertutup telah diimport ke dalam buku kerja semasa.


Import data daripada buku kerja tertutup ke dalam buku kerja semasa dengan Kutools untuk Excel

Kod VBA mungkin agak sukar untuk pemula Excel kami, jadi, di sini, saya akan mengesyorkan anda alat berguna-Kutools untuk Excel, Dengan itu Masukkan Fail pada Kursor ciri, anda boleh memasukkan keseluruhan kandungan lembaran kerja dari buku kerja tertutup dengan cepat dan mudah.

Kutools untuk Excel : dengan lebih daripada 300 berguna tambahan Excel, bebas untuk mencuba tanpa had pada hari 60.

Selepas memasang Kutools untuk Excel, sila lakukan seperti berikut:

1. Klik Enterprise > Import / Eksport > Masukkan Fail pada Kursor, lihat tangkapan skrin:

data import doc dari buku kerja tertutup 4

2. Di dalam Masukkan Fail pada Kursor kotak dialog, lakukan operasi berikut:

(1.) Klik data import doc dari buku kerja tertutup 6butang untuk memilih sel di mana anda mahu meletakkan data yang diimport;

(2.) Klik data import doc dari buku kerja tertutup 7butang untuk memilih buku kerja yang anda mahu untuk mengimport datanya.

Catatan: Nilai sahaja (tiada formula): Jika anda menyemak pilihan ini, hanya nilai yang akan diimport, dan formula tidak akan diimport.

Jangan pindahkan pemformatan: Memeriksa pilihan ini akan mengimport data ke dalam lembaran kerja tanpa pemformatan.

Muat turun dan percubaan percuma Kutools untuk Excel Sekarang!

3. Kemudian klik OK, jika terdapat lebih daripada satu lembar kerja ke dalam buku kerja, a Pilih Lembaran Kerja kotak dialog akan keluar, sila nyatakan lembaran kerja yang anda ingin import data, lihat tangkapan skrin:

data import doc dari buku kerja tertutup 8

4. Kemudian klik OK butang, data dalam lembaran kerja yang dipilih telah diimport ke dalam buku kerja semasa.

Klik untuk mengetahui lebih banyak maklumat tentang Fail Insert ini pada ciri Kursor.

Muat turun dan percubaan percuma Kutools untuk Excel Sekarang!


Demo: Mengimport data daripada buku kerja tertutup ke dalam buku kerja semasa dengan Kutools untuk Excel

Kutools untuk Excel: dengan lebih daripada 200 berguna Excel tambahan, bebas untuk mencuba tanpa had pada hari 60. Muat turun dan percubaan percuma Sekarang!



Cadangan Alat Produktiviti untuk Excel

Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

  • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
  • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
  • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
  • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
  • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
  • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

  • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
  • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
  • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
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?
G|translate Your license is inactive or expired, please subscribe again!