Как объединить / импортировать несколько файлов CSV на несколько листов?
Если вы хотите импортировать несколько файлов CSV из папки в виде отдельных листов в книге, как вы могли бы справиться с этим заданием в Excel?
Импортируйте несколько файлов CSV в отдельные листы с кодом VBA
Импортируйте несколько файлов CSV на отдельные листы с помощью Kutools for Excel
Разделите книгу на несколько отдельных файлов csv / pdf / txt / excel
Импортируйте несколько файлов CSV в отдельные листы с кодом VBA
Чтобы быстро импортировать несколько файлов CSV в книгу, следующий код VBA может оказать вам услугу. Сделайте следующее:
1. Удерживайте ALT + F11 ключи в Excel, чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: импортировать несколько текстовых файлов на отдельные листы:
Sub CombineCsvFiles()
'updateby Extendoffice
Dim xFilesToOpen As Variant
Dim I As Integer
Dim xWb As Workbook
Dim xTempWb As Workbook
Dim xDelimiter As String
Dim xScreen As Boolean
On Error GoTo ErrHandler
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
xDelimiter = "|"
xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
If TypeName(xFilesToOpen) = "Boolean" Then
MsgBox "No files were selected", , "Kutools for Excel"
GoTo ExitHandler
End If
I = 1
Set xTempWb = Workbooks.Open(xFilesToOpen(I))
xTempWb.Sheets(1).Copy
Set xWb = Application.ActiveWorkbook
xTempWb.Close False
Do While I < UBound(xFilesToOpen)
I = I + 1
Set xTempWb = Workbooks.Open(xFilesToOpen(I))
xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
Loop
ExitHandler:
Application.ScreenUpdating = xScreen
Set xWb = Nothing
Set xTempWb = Nothing
Exit Sub
ErrHandler:
MsgBox Err.Description, , "Kutools for Excel"
Resume ExitHandler
End Sub
3, Затем нажмите F5 нажмите клавишу для выполнения этого кода, и появится окно, перейдите в определенную папку и выберите файлы CSV, которые вы хотите импортировать в Excel, см. снимок экрана:
4, Затем нажмите Откройте Кнопка, выбранные CSV-файлы были импортированы как отдельные рабочие листы в новую книгу.
5. Наконец, вы можете сохранить новую книгу по мере необходимости.
Импортируйте несколько файлов CSV на отдельные листы с помощью Kutools for Excel
Если вы только что Kutools for Excel, с его мощным инструментом -Сочетать, вы можете быстро объединить или импортировать несколько файлов CSV в один рабочий лист или несколько отдельных листов по мере необходимости.
После установки Kutools for Excel, пожалуйста, сделайте так:
1, Пожалуйста, нажмите Кутулс Плюс > Сочетать, см. снимок экрана:
2. В Комбинировать листы диалоговое окно, выберите Объедините несколько листов из книг в одну книгу, см. снимок экрана:
3. В Шаг 2 мастера, щелкните Добавить > Файл чтобы выбрать файлы csv, которые вы хотите объединить, см. снимок экрана:
4. В выскочившем Откройте диалоговое окно, выберите (* .csv) из раскрывающегося списка, а затем укажите файлы CSV, которые вы хотите объединить.
5. Затем нажмите Откройте кнопку, и выбранные вами файлы CSV были импортированы в диалоговое окно, см. снимок экрана:
6. В Шаг 3, выполните следующие действия:
(1.) Проверка Первая строка каждого рабочего листа (комментарии) из Вставить информацию о листе раздел, вся информация о файлах csv будет вставлена в объединенные листы в виде комментариев;
(2.) Вы можете переименовывать файлы CSV по своему усмотрению;
(3.) вы можете пропустить пустые файлы csv при включении пустого файла csv.
7. Затем нажмите Завершить кнопку, и после завершения объединения вы можете указать имя файла и расположение для вашей новой объединенной книги. Смотрите скриншот:
8. Затем нажмите Сохранить кнопку, в появившемся окне подсказки вы можете открыть новый файл, щелкнув Даи закройте его, нажав Нет, см. снимок экрана:
9. И тогда вы можете сохранить этот сценарий или нет, как хотите. Смотрите скриншот:
10. Наконец, выбранные вами файлы csv были импортированы в новую книгу с отдельным листом, см. Снимок экрана:
Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!
Демонстрация: импортируйте несколько файлов CSV на отдельные рабочие листы с помощью Kutools for Excel
Разделите книгу на несколько отдельных файлов csv / pdf / txt / excel
В определенном случае вы можете разделить книгу на отдельные файлы csv, Kutools for Excel's Split Workbook утилита может завершить эту работу быстро и легко.
После установки Kutools for Excel, пожалуйста, сделайте так:
1. Нажмите Кутулс Плюс > Workbook > Разделить книгу, см. снимок экрана:
2. В Разделить книгу диалоговое окно:
(1.) Отметьте листы, которые вы хотите разделить;
(2.) И проверьте Укажите сохранитьформат, затем выберите формат файла, который хотите сохранить;
(3.) Затем щелкните Split и укажите папку для хранения разделенных файлов.
3, Затем нажмите OK чтобы начать разбиение, книга будет разделена на отдельные нужные вам файлы csv.
Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!
Разделите книгу на несколько отдельных файлов csv / pdf / txt / excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!