Всем привет
У меня в эксель документе есть таблицы, которые мне нужно копировать в новый документ и сохрнать.(то есть я сгенерировал в Power Query данные) и выгружаю сохраняю как бы кеш.
Данный код работает исправно на маленьких объемах данных, а на больших иногда терминал(я работаю по RDP) зависает из-за объема копирования данных
tbl.Range.Copy - получается эта команда копирует все в буфер и переносит в новый документ.
Вопрос, есть ли оптимальней алгоритм копирования таблицы в новый документ?
У меня в эксель документе есть таблицы, которые мне нужно копировать в новый документ и сохрнать.(то есть я сгенерировал в Power Query данные) и выгружаю сохраняю как бы кеш.
Данный код работает исправно на маленьких объемах данных, а на больших иногда терминал(я работаю по RDP) зависает из-за объема копирования данных
tbl.Range.Copy - получается эта команда копирует все в буфер и переносит в новый документ.
Вопрос, есть ли оптимальней алгоритм копирования таблицы в новый документ?
Код |
---|
Sub csvTable2(lName As String, tName As String, fName As String) Dim tbl As ListObject Set tbl = Worksheets(lName).ListObjects(tName) Application.DisplayAlerts = False Workbooks.Add tbl.Range.Copy Range("A1") With ActiveWorkbook .SaveAs fName, xlCSV, local:=False .Saved = True .Close End With Application.DisplayAlerts = True End Sub |