Как добавить файл CSV через VBA без чтения пустых отформатированных ячеек

Question

У меня есть код, который может добавить диапазон данных на листе в существующий файл CSV.Однако я заметил, что когда существующий файл CSV содержит пустые, но отформатированные ячейки за пределами диапазона данных, функция Append также учитывает эти пустые ячейки.

Например, существующий файл CSV содержит 10 строк данных, в то время как строки с 11 по 20 пусты, но отформатированы (например, как «dd-mmm-yy»).Поэтому, когда я добавляю файл CSV, новые данные добавляются в строку 21 вместо строки 11.

Помимо ручного удаления строк 11–20 в файле CSV, есть ли быстрое решение этой проблемы?У меня много существующих CSV-файлов, поэтому невозможно выполнить вручную.Относительно того, почему некоторые строки пусты, но отформатированы, это связано с некоторыми ранее внесенными изменениями.

Ценю помощь.

Answer 1

I имеет код , который может добавить диапазон данных в рабочей таблице к существующему файлу CSV.Однако я заметил, что когда существующий файл CSV содержит пустые, но отформатированные ячейки за пределами диапазона данных, функция Append также учитывает эти пустые ячейки.

Если вы написалиэтот код, он должен учитывать отформатированные ячейки, которые вы хотите игнорировать.Допустим, вы обмениваетесь данными из файла .xlsx в файл .csv, и все это делается на платформе Excel.Тогда, например, если «Общий» - это формат, который лучше всего подходит для вас, но некоторые конечные ячейки в столбце .csv A, лист 1 - это не так, тогда ваш код оценивает в цикле, является ли CSV Worksheets("Book1").Range("A[whatever row]").NumberFormat = "General"

Тогда пусть ваш код поменяет те, которые не являются, на General;затем перейдите к дополнению.