Прескочи на основното съдържание

Как да импортирам данни от друг работен лист?

Автор: Xiaoyang Последна промяна: 2014-06-30

Когато работите с Excel файл, може да искате да импортирате някои данни от друг работен лист в текущия си работен лист. Днес ще говоря за някои интересни трикове за справяне с този проблем.

Импортирайте данни от друг работен лист с функция Connections

Импортирайте данни от друг работен лист с VBA код

Импортирайте данни от друг работен лист с Kutools за Excel


стрелка син десен балон Импортирайте данни от друг работен лист с функция Connections

Ако сте запознати с Връзки функция в Excel, можете да импортирате други данни от работен лист в текущата работна книга и вашите импортирани данни ще бъдат актуализирани автоматично с оригиналните данни.

1. Отидете на щракване Дата > Връзки, вижте екранна снимка:

doc-import-data-to-worksheet-1

2. В Връзки с работни книги кликнете върху Добави бутон и изскочи Съществуващи връзки кликнете върху Прегледайте за още бутон, вижте екранни снимки:

doc-import-data-to-worksheet-2
-1
doc-import-data-to-worksheet-3

3. След това изберете работната книга, чиито данни искате да експортирате в текущия работен лист.

doc-import-data-to-worksheet-1

4. След като изберете работната книга, щракнете отворено и изберете един работен лист, който искате да използвате. Вижте екранна снимка:

doc-import-data-to-worksheet-1

5, След това кликнете OK, ще се върне към Връзки с работни книги диалогов прозорец и избраната от вас работна книга е добавена към списъчното поле, моля, затворете този диалогов прозорец.

6. След това продължете да щраквате Дата > Съществуващи връзки, вижте екранна снимка:

doc-import-data-to-worksheet-1

7. В Съществуващи връзки диалоговия прозорец щракнете върху работната книга, която сте добавили току-що и щракнете върху отворено бутон. Вижте екранна снимка:

doc-import-data-to-worksheet-1

8. И в изскочи Импортиране на данни изберете една опция, която харесвате от Изберете как искате да видите тези данни във вашата работна книгаи след това изберете един от съществуващите диапазони от работни листове или нов работен лист, за да поставите данните.

doc-import-data-to-worksheet-1

9, След това кликнете OK, данните от друг работен лист са импортирани в посочения от вас работен лист.

doc-import-data-to-worksheet-1

Забележки:

1. Използвайки този метод, можете да импортирате данните с типа на маса, Отчет с обобщена таблица or PivotChart и Отчет с обобщена таблица.

2. Вашата работна книга е свързана с тези външни данни, ако искате да получите най-новите данни в собствената си работна книга. Отидете на Дата > Обнови всички за да получите актуализираните данни.

doc-import-data-to-worksheet-1


стрелка син десен балон Импортирайте данни от друг работен лист с VBA код

Има толкова много стъпки от горния метод, може да се почувствате уморени, тук следният VBA код също може да ви помогне да импортирате данни от друг работен лист.

1. Задръжте натиснат ALT + F11 ключове и отваря Прозорец на Microsoft Visual Basic за приложения.

2. Щракнете Поставете > Модулии поставете следния код в Прозорец на модула.

VBA код: Импортирайте данни от друг работен лист

Sub ImportDatafromotherworksheet()
    Dim wkbCrntWorkBook As Workbook
    Dim wkbSourceBook As Workbook
    Dim rngSourceRange As Range
    Dim rngDestination As Range
    Set wkbCrntWorkBook = ActiveWorkbook
    With Application.FileDialog(msoFileDialogOpen)
        .Filters.Clear
        .Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
        .AllowMultiSelect = False
        .Show
        If .SelectedItems.Count > 0 Then
            Workbooks.Open .SelectedItems(1)
            Set wkbSourceBook = ActiveWorkbook
            Set rngSourceRange = Application.InputBox(prompt:="Select source range", Title:="Source Range", Default:="A1", Type:=8)
            wkbCrntWorkBook.Activate
            Set rngDestination = Application.InputBox(prompt:="Select destination cell", Title:="Select Destination", Default:="A1", Type:=8)
            rngSourceRange.Copy rngDestination
            rngDestination.CurrentRegion.EntireColumn.AutoFit
            wkbSourceBook.Close False
        End If
    End With
End Sub

3. След това натиснете F5 за да изпълните този код и изберете работната книга, чиито данни искате да вмъкнете в текущата работна книга, вижте екранната снимка:

doc-import-data-to-worksheet-1

4. След като изберете работната книга, щракнете отворено и изберете работен лист или диапазон от вашата работна книга, чиито данни трябва да експортирате. Вижте екранна снимка:

doc-import-data-to-worksheet-1

5. След това кликнете OKи изберете една клетка, за да поставите вашите импортирани данни в текущия ви работен лист, вижте екранна снимка:

doc-import-data-to-worksheet-1

6. Продължете да щракате OKи избраните от вас данни са импортирани във вашия работен лист.

Забележка: С този метод импортираните данни няма да се актуализират с оригиналните данни.


стрелка син десен балон Импортирайте данни от друг работен лист с Kutools за Excel

Kutools за Excel също така предвижда Вмъкване на файл в курсора функция за решаване на този проблем.

Kutools за Excel включва повече от 300 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега

1. Отворете работната си книга, в която искате да вмъкнете други данни от работен лист.

2. Щракнете Enterprise > Внос / Износ > Вмъкване на файл в курсора, вижте екранна снимка:

doc-import-data-to-worksheet-1

3, И в Вмъкване на файл в курсора диалогов прозорец, изберете клетка, в която искате да поставите началото на данните, и след това щракнете паса бутон, за да изберете една работна книга, която искате да вмъкнете.

doc-import-data-to-worksheet-1

4, След това кликнете OKи изберете един работен лист, ако вашата работна книга съдържа няколко работни листа от диалоговия прозорец Избор на работен лист, вижте екранна снимка:

doc-import-data-to-worksheet-1

5, И после щракнете върху OK, вашият избран работен лист е импортиран във вашия конкретен работен лист.

Забележка: С този метод импортираните данни няма да се актуализират с оригиналните данни.

За да научите повече за тази функция за вмъкване на файл в курсора.


Свързана статия:

Как да импортирам текстов файл или работен лист в Excel?

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How to import only values with VBA, this VBA paste formulas when importing?
This comment was minimized by the moderator on the site
Amazing, thank you
This comment was minimized by the moderator on the site
This post is FANTASTIC!!!! This is extremely helpful! Thank you!!!
This comment was minimized by the moderator on the site
How can i use relative paths instead of fixed paths,
because these files will be uploaded to SVN and paths will be differ
This comment was minimized by the moderator on the site
This was incredibly useful. Thank you!
This comment was minimized by the moderator on the site
I am using the VBA Code. How can I unhide and remove all filter before select source range?
This comment was minimized by the moderator on the site
Sub Clear()
'
' Clean Sheet
'
Dim A As Long

Sheets("Sheet1").Select
ActiveSheet.Range("Range").Select
Selection.Clear

End Sub


Example
range mean A2:D35
This comment was minimized by the moderator on the site
How do I adapt the VBA code so that it will continuously update with another file?
This comment was minimized by the moderator on the site
I want to learn VBA, can you give me the number of WhatsApp to facilitate communication
This comment was minimized by the moderator on the site
Hit the record button in execl and ALT+f11 look at the code and then change it run it its the way learnt well that was 20year ago
Even know I still hit the record and change it to fix the problem
This comment was minimized by the moderator on the site
Hi, It is very useful for me and my organisation. I need help in this. While connecting the excel files I am not able to open the html links which are there in main file. Please help me out on this.
This comment was minimized by the moderator on the site
How would you adjust the VBA code so that it would paste selections as values?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations