Excel лист сохранить в txt файл

ТРЕНИНГИ

   Быстрый старт
   Расширенный Excel
   Мастер Формул
   Прогнозирование
   Визуализация
   Макросы на VBA

КНИГИ

   Готовые решения
   Мастер Формул
   Скульптор данных

ВИДЕОУРОКИ

ОНЛАЙН-КУРСЫ

ФОРУМ

   Excel
   Работа
   PLEX

© Николай Павлов, Planetaexcel, 2006-2022
info@planetaexcel.ru

Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.

Техническая поддержка сайта

Импорт и экспорт текстовых файлов (в формате TXT или CSV)

​Смотрите также​​ случайно не сын​ это сделает всего​ достаточно… ну или​ Файл-Сохранить как…​ И яђ М​ прграмм.​ сейчас получиться))))​ файл (построчно)​:​DIF​ текстового файла, разделенного​ формате с разделителями-запятыми​ и необходимо получить​ текстового формата в​ к нему.​ Excel его формат​Примечание:​ старика Ковальского? -​ за 5 секунд…​ в крайнем случае​

​- задай тип​ A r i​total_commander изменяет разширение​Джон39​For lngRow =​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub qq()​DIF​ знаками табуляции, —​ (CSV). Имейте в​ дополнительные сведения о​ числовой и Преобразование​​В имеющийся лист можно​​ не изменяется — это​ Мы стараемся как можно​ Да,​

​Guest​ можно воспользоватся рекордером…​

• ​ файла «текстовый»​ a l C​ за три секунды,​: Нужно создать файл​ 1 To 3​a = Cells(1,​

• ​Формат обмена данными. Сохраняет​ для использования в​ виду, что при​ том, какие возможности​ дат из текстового​ импортировать данные из​

​ можно видеть в​ оперативнее обеспечивать вас​сын, но что​: Если честно, разу​ а потом немного​Вот тогда и​ y r 1​

​ но решил проверить​​ для загрузки данных​a = Cells(lngRow,​ 1).Value & String$(15​ только активный лист.​

Импорт текстового файла путем его открытия в Microsoft Excel

​ операционной системе Макинтош​ сохранении книги в​ Excel не поддерживаются​ формата в формат​ текстового файла как​​ строке заголовка Microsoft​​ актуальными справочными материалами​ «случайно», я слышу​ макрос не писал,​ подпилить код.​ придёт к тебе​ » И яђ​ и открыл блокнотом​ в 1C, которая​ 1).Value & String$(15​ — Len(Cells(1, 1).Value),​

1. ​SYLK​​ — и гарантирует,​​ другом формате может​​ форматами текстовых файлов,​​ даты.​

2. ​ диапазон внешних данных.​​ Excel, где имя​​ на вашем языке.​​ впервые.​​ всегда формулами обходился.​

3. ​xxxspeed​ счастье!​

   • ​ М A r​ увидел, что кодировка​ ест только xml,​ — Len(Cells(lngRow, 1).Value),​ » «) &​SLK​​ что символы табуляции,​​ быть утрачена часть​ нажмите кнопку​

   • ​Лист Excel можно преобразовать​Щелкните ячейку, в которую​ отображается с расширением​ Эта страница переведена​

   • ​•​ Плиз, помогите.​: Добрый день! Может​Beforydeath​ i a l​

     ​ была нарушина и​​ csv, txt. Может​ » «) &​ _​Формат Symbolic Link. Сохраняется​ разрывы строк и​ форматирования, данных и​Справка​ в текстовый файл,​ требуется поместить данные​ текстового файла (например,​ автоматически, поэтому ее​В Одессе на​JDC555​ кто знает как​: почитай про макросы​ C y r​ вместо нормального вида​ из xml и​ _​Cells(1, 2).Value &​ только активный лист.​ другие символы будут​ возможностей.​.​ используя команду меню​ из текстового файла.​ .TXT или .CSV).​ текст может содержать​ рынке.​: Доброго времени суток​ конвертировать таблицу их​ в excel`е.. думаю​

Импорт текстового файла путем подключения к нему

​ 1 »  ​ в MS DOS​ csv загружать и​Cells(lngRow, 2).Value &​

1. ​ String$(14 — Len(Cells(1,​A_3485​ интерпретироваться правильно. Сохраняет​

2. ​Внимание:​​Дополнительные сведения о сохранении​​Сохранить как​​На вкладке​​Последовательно выберите пункты​​ неточности и грамматические​​Покупательница: — Почем​

   

3. ​ уважаемый форумчане!​ excel в txt.​ моно там что-то​

   ​ яђ М A​ (текста и набора​ проще, но в​ String$(14 — Len(Cells(lngRow,​ 2).Value), » «)​: Уважаемы формучане добрый​ только активный лист.​​  При сохранении книги​ ​ файлов в других​.​Данные​файл​​ ошибки. Для нас​​ Ваши​Столкнулся с проблемой.​

4. ​ Чтоб сохранился весь​​ нахимичить​​ r i a​ цифр) иероглифы.​

   • ​ обучающем видео показывают​​ 2).Value), » «)​​ & _​ день!​Текст (MS-DOS)​

   • ​ в любом текстовом​​ форматах см. в​​Выберите​в группе​

     • ​>​ важно, чтобы эта​синенькие? Продавец:​​ необходимо Excel таблицу​​ порядок строк и​

     • ​Irq​ l C y​———————————————————-пример как надо:——————————————————————————————​ только как правильно​​ & _​​Cells(1, 3).Value &​

5. ​Помогите пожалуйста разобраться​​TXT​​ формате теряются все​

   ​ статье Сохранение книги​Файл​Получение внешних данных​

​Открыть​ статья была вам​- Дура, это​ с 3 столбцами​ столбцов.​: Можно написать макрос​ r 1 И​DEPT.M : Depth​ грузить из TXT,​Cells(lngRow, 3).Value &​ String$(20 — Len(Cells(1,​ с макросом экспорта​

Экспорт данных в текстовый файл путем его сохранения

​Сохраняет книгу в виде​ элементы форматирования.​ в другом формате​​ >​​нажмите кнопку​

1. ​.​​ полезна. Просим вас​​ цыплята! •​​ , как то​​cross​

2. ​ как предлагают. Макрос​​ @ ђ A​​ curve​

3. ​ поэтому я пока​​ String$(20 — Len(Cells(lngRow,​​ 3).Value), » «)​ содержимого Лист1 в​

   • ​ текстового файла, разделенного​​Откройте книгу, которую вы​ файла.​​Сохранить как​​Из текстового или CSV-файла​​В диалоговом окне​

   • ​ уделить пару секунд​​- Извините, -​ перевести в txt,​: наверно сохранить как​ будет сам открывать​ r i a​INT .U.E :​ пойду по этому​ 3).Value), » «)​

4. ​ & _​ файл txt.​ знаками табуляции, —​ хотите сохранить.​​Если для импорта текстового​​.​

5. ​.​Открыть​ и сообщить, помогла​ спрашивает молодая мать​ чтобы информация в​ xml и с​ каждый файл (например​ l / #​​ Integralnyi signal SGDT​​ пути.​ & _​Cells(1, 4).Value​Из блуждания по​ для использования в​

6. ​На вкладке​ файла используется мастер​Появится диалоговое окно​Найдите файл, который нужно​выберите пункт​ ли она вам,​ сидящую в женской​ txt отображалась с​ ним уже баловаться​ все файлы в​ , # #​​SEL .U.E :​​Итак, есть таблица​Cells(lngRow, 4).Value​Debug.Print a​ сети нашел код​ операционной системе MS-DOS​Файл​ импорта текста, то​​Сохранение документа​​ импортировать, и дважды​

​Текстовые файлы​ с помощью кнопок​консультации даму, -​ разделителями.​Hugo​ указанной папке) и​

Изменение разделителя, используемого в текстовом файле

​ 0 » @.​ Selectivnyi signal SGDT​ excel с тремя​Print #1, a​End Sub​ и попробовал его​ — и гарантирует,​выберите команду​ на втором этапе​.​ щелкните его.​.​ внизу страницы. Для​

​ чем Вы кормите​000002|А.Захар Александрович|00100.00​: Сохранить как текст​ сам же будет​

Изменение разделителя во всех текстовых CSV-файлах

1. ​ » ; ​TOL .U.E :​​ столбцами.​​’Debug.Print aне отличие,​​0000000001 -10000 0​​ применить к моим​

2. ​ что символы табуляции,​Сохранить как​ работы мастера разделитель​

3. ​В поле​Следуйте инструкциям мастера импорта​​Найдите нужный файл и​​ удобства также приводим​

4. ​ ребенка? — Как​​000003|А.Елена Петровна|00100.00​​ не подходит? Почему?​

​ пересохранять. Там же​​ — # ,​ Tolshinomer SGDT​Мне нужно создать текстовый​ просто не нужно​ SEL​ данным:​ разрывы строк и​.​

См. также

​ текста можно изменить​Тип файла​

​ текста. Дополнительные сведения​ дважды щелкните его.​

​ ссылку на оригинал​

​ чем? Пока​000004|А.Полина Юрьевна|00100.00​

​cross​

​ наверняка можно указать​

support.office.com

Сохранение книги в текстовом формате (TXT или CSV)

​ # # 0​SEL .U.E :​ файл в котором​Next lngRow​Сожранные пробелы заменил​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub Экспорт_данных()​ другие символы будут​Выберите расположение, где нужно​ с символа табуляции​выберите формат текстового​ об использовании мастера​Если это текстовый файл​ (на английском языке).​

​бюстом! •​​Заранее благодарен.​: наверно сохранить как​ кодировку (при сохранении).​ » @. «​

1. ​ Selectivnyi signal SGDT​ данные столбцов будут​

2. ​’ закрываем​​ звездочкой​​Dim lngRow As​​ интерпретироваться правильно. Сохраняет​​ сохранить книгу.​

   

3. ​ на другой символ.​ файла для листа.​

   

4. ​ импорта текста см.​​ (с расширением ТХТ),​​Импортировать данные из текстовых​- Папа, скажи,​

5. ​Казанский​​ xml и с​​Валерий старосветсков​ 9 # ,​NG .U.E :​

   ​ разделены точкой с​​Close #1​0000000001*****-10000********0*******************SEL​ Long​ только активный лист.​В диалоговом окне​

   

6. ​ На данном этапе​Например, выберите​​ в его справке,​​ запустится мастер импорта​ файлов в Excel​

Доступные форматы текстовых файлов

support.office.com

Экспорт данных из Excel в txt (Макросы/Sub)

​ 0 » @.​​ Ak-amplituda po kolonne​astana2015​
​: Добрый день! В​ Long​ файл (построчно)​ Consortium.​
​ формат файла (TXT​ см. в статье​ Различные форматы поддерживают разные​ кнопку​Статья: Мастер импорта текста​
​ из Excel в​
​- Рабинович! У​ Excel - формат​
​cross​ данных(больше 100 тыс​
​ " ; ​AP .V :​
​: очень легко нужно​ excel набрана таблица​' Открываем файл​
​For lngRow =​CSV (разделители — запятые)​
​ или CSV).​ Мастер импорта текста.​ наборы функциональных возможностей.​
​Готово​ Дополнительные сведения о​
​ текстовый файл, используйте​ Вас на голове​ ячеек "|'@, а​: [оффтоп]Не пинайте сильно,​ строк) в Excel​ # , #​
​ Ap-amplituda po porode​
​ файл.​
​ с данными сотрудников.​
​ для сохранения​
​ 1 To 3​
​CSV​
​Примечание:​
​В операционной системе Microsoft​
​ Дополнительные сведения о​, чтобы завершить операцию​ разделители и дополнительные​ команду​ сидит муха! -​ потом сохранить как​
​ приходится пользоватся разными​ формате, нужно перевести​ # 0 .​
​~ASCII Log Data​можно сделать через​
​ Есть необходимость частичные​Open «C:данные.txt» For​
​’ Записываем содержимое​Сохраняет книгу в виде​ Список доступных форматов файлов​ Windows нажмите кнопку​
​ функциональных возможностях, поддерживаемых​

​ импорта.​​ параметры.​​Сохранить как​
​ Вы что, хотите​ форматированный текст, открыть​ браузерами - так​ их в txt.​ 0 0 "​
​2.50 -999.250 -999.250​ ms access.​ столбцы перенести в​ Output As #1​
​ всех столбцов строки​ текстового файла, разделенного​ зависит от типа​Пуск​
​ различными форматами текстовых​
​В диалоговом окне​
​Если файл имеет расширение​
​и измените тип​сказать, что я​
​ блокнотом и сохранить​ как они косячат​
​ Открытие каждого файла​

​ @. » ;​​ -999.250 -999.250 -999.250​Hugo​ txt формат, причем​
​' Записываем выделенную​
​ lngRow​ знаками запятой, —​
​ активного листа в​и выберите пункт​
​ файлов, см. в​Импорт данных​
​ CSV, приложение Excel​ файла в раскрывающемся​ - говно? -​
​ в txt.​ по разному и​
​ и "сохранение его​ - #​ -999.250 1512.000 50.834​: Выгружайте в csv.​ информация друг от​
​ части таблицы в​For intCol =​ для использования в​ книге (лист, лист​
​Панель управления​ разделе Поддерживаемые Excel​выполните одно из​ автоматически откроет его​
​ меню.​
​ Я ничего не​
​tip-42​
​ не всегда можно​
​ как" не подходит,​
​ , # #​
​ 46.854​

​SLAVICK​​ друга отделяется определенным​
​ файл (построчно)​
​ 1 To 1​ другой операционной системе​
​ диаграммы или другой).​.​
​ форматы файлов.​ указанных ниже действий.​
​ и отобразит данные​Чаще всего используются два​ хочу сказать! Но​
​: Здравствуйте, кто знает?​ зайти в тему​
​ так как каждый​ 0 . 0​2.60 -999.250 -999.250​: Попробуйте сохранить как:​ символом, например: Иванов'​
​For lngRow =​Write #1, Selection.Cells(lngRow,​ Windows — и​Примите имя, предложенное в​
​Откройте диалоговое окно изменения​Перейдите в папку, в​При необходимости нажмите кнопку​ в новой книге.​
​ формата текстовых файлов:​
​ муху​
​ Надо сделать импорт​ с одного и​
​ файл открывается минут​
​ 0 " @.​
​ -999.250 -999.250 -999.250​
​ CSV (MS-DOS).​
​ Иван’ Иванович ‘1997’​ 1 To 3​

​ 1).Value & «»​​ гарантирует, что символы​

excelworld.ru

из excel в txt формат (Word)

​ поле​​ региональных и языковых​ которой нужно сохранить​Свойства​Примечание:​текстовые файлы с разделителями​не обманешь.​ из файла txt​ тогоже[оффтоп]​ по 15.​ » E #​ -999.250 1512.000 50.777​
​Или взять например​ Россия’ и т.д.​a = Cells(lngRow,​ & Selection.Cells(lngRow, 2).Value​ табуляции, разрывы строк​Имя файла​ параметров.​

​ новый текстовый файл,​​, чтобы задать параметры​ .При открытии в Excel​
​ (TXT), в которых​​•​ в Excel но,​а по сабжу​Может кто подскажет​ , #​ 47.658​ отсюда второй макрос​Подскажите, пожалуйста, как​ 1).Value & String$(15​ & «» &​ и другие символы​, или введите новое​Введите новый разделитель в​ и нажмите кнопку​ обновления, форматирования и​ файлов с расширением​

​ для разделения полей​​- Роза! Ты​ что бы строки​ — может надо​

excelworld.ru

Как преобразовать таблицу в txt с разделителями (Формулы/Formulas)

​ как сохранять файлы​​___________________________________________________________________________________________________​2.70 -999.250 -999.250​ — и использовать​ это сделать побыстрее​ — Len(Cells(1, 1).Value),​ Selection.Cells(lngRow, 3).Value &​ будут интерпретироваться правильно.​ имя книги.​ поле​Сохранить​ макета импортируемых данных.​ CSV для интерпретации​ текста обычно используется​ ничего не заметила?​
​ из txt не​ куда экспортировать как​ в txt без​​я новичек в​ -999.250 -999.250 -999.250​ его, только заменить​ (в таблице 500​ » «) &​
​ «»; Selection.Cells(lngRow, 4).Value;​ Сохраняет только активный​Формат​Разделитель элементов списка​.​

​В группе​​ способа импорта каждого​ знак табуляции (код​
​ У меня давно​ разбивались по строкам​

​ базу через некий​​ открытия и установки​

​ таких сложных процессах.​​ -999.250 1511.616 50.806​ vbTab на «;»​
​ строк и 25​ _​Next intCol​ лист.​Расширение​

​.​​Откроется диалоговое окно с​Куда следует поместить данные?​ столбца данных используются​ знака ASCII 009);​ выпадают​ в екселе. Надо,​ интерфейс, а создатель​ сторонних самопальных программ???​ так что помогите​
​ 48.408​Gustav​
​ столбцов). Ручной перенос​Cells(lngRow, 2).Value &​’ следующая строка​CSV (Макинтош)​Описание​Дважды нажмите кнопку​

excelworld.ru

Перевод формата XLS в TXT

​Cells(lngRow, 4).Value​​ совсем не тот​ что символы табуляции,​
​Текст (разделители — знаки​
​ новый символ. Та​. Другие листы можно​ верхний левый угол​
​ CSV в столбце​ TXT-, так и​
​Надо, что бы​ Скажите, -​
​ глупый вопрос, ступил.​
​ макросом — никак​Jurii​
​ % яяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяя u’НБЂ​ такую формулу:​
​ «‘» — разделитель​Write #1, a​
​ что мне нужен.​ разрывы строк и​
​ табуляции)​ же процедура позволяет​ сохранить в отдельных​

​ нового листа, выберите​​ дат может быть​ CSV-файлах. Это может​ один анекдот распологался​спрашивает приезжий у​

​Guest​​SLAVICK​: Ну вы блин​ б °Б в​=СЦЕПИТЬ(A1; «;»; B1; «;»;​ апостроф (можно любой​Debug.Print a​ Я пытаюсь в​ другие символы будут​TXT​ изменить символ на​

​ текстовых файлах, повторив​​ вариант​ установлен формат М/Д/Г,​ потребоваться для обеспечения​

Конвертирование Excel файлов в txt (Иное/Other)

​ в одной строке,​​ одессита, — этот​
​: Работы прибавляется и​: Макросом… А чтобы​ даёте!​ p B​ C1)​ другой, можно сделать​Next lngRow​ файле данные.txt получить​ интерпретироваться правильно. Сохраняет​Сохраняет книгу в виде​ принятый по умолчанию.​ эту процедуру для​
​Новый лист​ а в Excel​ успешного выполнения операций​ а следующий был​ фонтан когда -​

​ возникают новые нерешенные​​ файл не так​
​Это-ж получается:​ °a А =​Формулу протягиваете до​ ссылкой на ячейку,​’ закрываем​ следующее:​ только активный лист.​

​ текстового файла, разделенного​​Общие сведения о формулах​ каждого из них.​.​ по умолчанию задан​ импорта и экспорта.​
​ в следующей строке.​ нибудь​
​ задачи. Подскажите, можно​ долго открывался можно​- написал программу​ њ Ї ј​ конца таблицы, копируете​ в которой будет​Close #1​
​1. Вторая колонка​CSV (MS-DOS)​ знаками табуляции, —​ в Excel​Откроется второе диалоговое окно​Нажмите кнопку​ формат Г/М/Д, или​

excelworld.ru

конвертировать excel в txt

​Примечание:​​ Разделитель в данном​бил? — Что​ ли как нить​ попробовать включить ручной​ в Паскале или​ = x ЊUp58​ столбец D, переходите​

​ прописан этот разделитель)),​​End Sub​ (Лист1) должна начинаться​CSV​

​ для использования в​​Рекомендации, позволяющие избежать появления​ с напоминанием о​

​ОК​​ необходимо преобразовать в​ Можно импортировать и экспортировать​ случае большая точка.​

​ за вопрос?! Он​​ сохранить сразу 40​ пересчет формул.​ С​ [email protected] Ќ «​ в пустой файл​

​ протягиваете формулу на​​RAN​ с 16 символа;​Сохраняет книгу в виде​ другой операционной системе​ неработающих формул​ том, что сохраняемый​.​ текст столбец чисел,​ до 1 048​
​StoTisteg​ бил, есть и​ файлов в формате​Это поможет если​- поменял расширение​ · Ъ 1​ в Блокноте, вставляете,​ сколько нужно строк​
​: Охо-хох!​2. Третья колона​ текстового файла, разделенного​

​ Microsoft Windows —​​Поиск ошибок в формулах​ лист может содержать​

​Приложение Excel сохранит внешний​​ содержащих начальные нули,​ 576 строк и​: Если работа разовая,​ будет бить!​ txt, не проводя​ там много формул.​ на.exe​ » И яђ​ сохраняете файл TXT.​

​ 16 384 столбцов.​​ открываете любой текстовый​•​ эти действия для​100 000 -​

planetaexcel.ru

Из excel в txt с разделителями

​- и мона​​ М A r​проблема заключается в следующем​
​ новый файл Сохранить​Dim lngRow As​3. Четвертая (Лист1)​ для использования в​ символы табуляции, разрывы​ клавиши в Excel​ поддерживаются текстовыми форматами​ выбранную позицию.​
​ их. Чтобы принудительно​
​Текстовый файл, созданный в​
​ редактор, поддерживающий регулярки​
​- Скажите, это​

​ каждого файла отдельно.​​ это не так​ запускать программу?​ i a l​ есть более 300​

​ как — в​​ Long​ с 55;​ операционной системе MS-DOS​ строк и другие​Функции Excel (по алфавиту)​ файлов. Если в​Если Microsoft Excel не​ запустить мастер импорта​

CyberForum.ru

Из txt в Excel (Word)

​ другой программе, можно​​ (тысячи их) и​ правда, что в​Guest​ и много у​~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~​ C y r​ файлов с разширением​ «тип файла» выбираете​’ Открываем файл​5. Никаких симолов​ — и гарантирует,​ символы будут интерпретироваться​
​Функции Excel (по категориям)​ новом текстовом файле​
​ преобразует столбец в​ текста, можно перед​ открыть как книгу​
​ делаете замены: rn​ Одессе отвечают на​: Нет, нельзя.​ меня файлики по​
​Для «новичка в​ 1 » И​ xls. их необходимо​ «Текстовые файлы с​
​ для сохранения​
​ («, ….) в​ что символы табуляции,​ правильно. Сохраняет только​В некоторых случаях вам​
​ нужно сохранить только​ необходимый формат, данные​ открытием файла изменить​
​ Microsoft Excel с​ -> пусто (повторять​ во — прос​В любом случае,​
​ 700 — 800тыс.​ таких сложных процессах»:​ яђ М A​
​ перевести в txt​
​ табуляцией».​Open «C:данные.txt» For​
​ файле быть не​ разрывы строк и​
​ активный лист.​
​ может потребоваться сохранить​ данные листа, нажмите​
​ можно преобразовать после​ его расширение на​ помощью команды​
​ пока число замен​вопросом? — А​ придётся перебирать все​ открываются меньше чем​
​- открой свои​
​ r i a​ с последующим изменением​ИринаИрина​
​ Output As #1​ должно.​ другие символы будут​Текст (Макинтош)​
​ книгу в другом​
​ кнопку​ импорта. Дополнительные сведения​ CSV или TXT​Открыть​
​ больше 0); •​ зачем Вам это​ файлы в цикле.​ за мин.​ таблицы в экселе​
​ l C y​
​ формата. на внутрений​
​: ОЙ, спасибо огромное​’ Записываем выделенную​Помогите пожалуйста​ интерпретироваться правильно. Сохраняет​
​TXT​ формате файла, например​Да​
​ см. в статьях​ или импортировать текстовый​. При открытии текстового​ -> rn потом​
​ надо знать? •​
​А в чем,​Подходящих макросов в​- выбери меню​ r 1 «​ формат одной из​ вроде бы все​ части таблицы в​

​RAN​​ только активный лист.​Сохраняет книгу в виде​ текстовом (TXT) или​. Если имеются сомнения​ Преобразование чисел из​ файл путем подключения​ файла в Microsoft​ спокойно открываете Экселем.​- Скажите, Вы​ собственно, проблема? Макрос​

excelworld.ru

​ сети более чем​

Как сохранить каждый лист в виде отдельного текстового файла из книги?

Если вы хотите сохранить рабочий лист как текстовый файл, вы можете использовать функцию Excel «Сохранить как», чтобы сохранить рабочий лист как текстовый файл. Но если вы хотите сохранить каждый лист книги в виде отдельного текстового файла, шаги Сохранить как должны вас раздражать. Здесь я предлагаю вам несколько интересных приемов, которые помогут вам быстро решить эту скучную работу в Excel.

Сохраните лист как текстовый файл с помощью VBA

Сохраняйте каждый лист книги как отдельный текстовый файл с Kutools for Excel

Экспорт выделенного листа в виде текстового файла с помощью Kutools for Excel

Сохраните лист как текстовый файл с помощью VBA

Если вам не нравится использовать функцию «Сохранить как» для сохранения листа в виде текстового файла, вы можете использовать код VBA.

1. Активируйте лист, который хотите сохранить как текстовый файл.

2. Нажмите Alt + F11 ключи для отображения Microsoft Visual Basic для приложений окно.

3. Нажмите Вставить > Модули из окна, а затем вставьте ниже код VBA в модуль.

VBA: сохранить лист как текстовый файл.

Sub SaveSheetToTxt()
'Updateby20150910
    Dim xRet As Long
    Dim xFileName As Variant
    On Error GoTo ErrHandler:
    xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
    If xFileName = False Then Exit Sub
    If Dir(xFileName) <> "" Then
        xRet = MsgBox("File '" & xFileName & "' exists.  Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
        If xRet <> vbYes Then
            Exit Sub
        Else
            Kill xFileName
        End If
    End If
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs xFileName, xlUnicodeText
    If ActiveWorkbook.Name <> ThisWorkbook.Name Then
        ActiveWorkbook.Close False
    End If
My_Exit:
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
End Sub

4. Нажмите Run кнопку для выполнения кода, а затем в Kutools for Excel выберите папку, в которую будет помещен текстовый файл, и укажите имя текстового файла. Смотрите скриншот:

5. Нажмите Сохраните. Теперь активный лист сохраняется как текстовый файл.

Наконечник: с VBA вы можете одновременно сохранить только один лист в виде текстового файла.

Сохраняйте каждый лист книги как отдельный текстовый файл с Kutools for Excel

Если у вас есть большая книга с сотнями листов, которые необходимо сохранить в отдельные текстовые файлы, метод VBA также является напрасной тратой времени. В этом случае вы можете попробовать использовать Kutools for ExcelАвтора Разделить книгу справиться с этой работой, которая преподнесет вам неожиданный сюрприз.

После бесплатная установка Kutools for Excel, пожалуйста, сделайте следующее:

1. Включите книгу, листы которой вы хотите сохранить как независимые текстовые файлы, а затем щелкните Кутулс Плюс > Workbook > Разделить книгу. Смотрите скриншот:

2. в Разделить книгу выберите листы, которые вы хотите разделить и сохранить как текстовые файлы, по умолчанию все листы выбраны, а затем установите флажок Укажите формат сохраненияИ выберите Текст в Юникоде (*. Txt) из раскрывающегося списка снизу. Смотрите скриншот:

3. Нажмите Трещина, а затем выберите папку для размещения текстовых файлов из Просмотр папки диалог. Смотрите скриншот:

4. Нажмите OK. Теперь каждый лист книги сохраняется как отдельный текстовый файл в выбранной папке.

Работы С Нами Разделить книгу of Kutools for Excel, вы можете разделить книгу и сохранить их как отдельные файлы xls, файлы xlsx, файлы PDF или файлы CSV, нажмите здесь, чтобы узнать больше об этой утилите.

Нажмите здесь, чтобы скачать бесплатно Kutools for Excel

Экспорт выделенного листа в виде текстового файла с помощью Kutools for Excel

Работы С Нами Kutools for Excel, вы также можете экспортировать выбранный лист в виде текстового файла, используя его Диапазон экспорта в файл.

После бесплатная установка Kutools for Excel, пожалуйста, сделайте следующее:

1. Выберите диапазон или диапазоны, которые вы хотите сохранить как текстовый файл, и нажмите Кутулс Плюс > Импорт/Экспорт > Диапазон экспорта в файл. Смотрите скриншот:

2. Затем в появившемся диалоговом окне отметьте Текст Юникода вариант под Формат файла раздел, затем перейдите к Параметры текста раздел, чтобы выбрать нужный вариант, а затем выберите место для сохранения.

3. Нажмите Ok. Теперь назовите экспортируемый текстовый файл во всплывающем окне. Диапазон экспорта в файл диалоговое окно и щелкните OK кнопку.

Пока выбор был экспортирован в отдельный текстовый файл.

Есть более 120 инструменты в Kutools for Excel, чтобы установить его и получить 60-дневную пробную версию, вы можете найти множество невероятных полезных функций.

Сконвертируйте ваши xls-файлы в txt онлайн и бесплатно

This VBA Program reads an Excel Range (Sales Data) and write to a Text file (Sales.txt)

Excel VBA code to read data from an Excel file (Sales Data – Range “A1:E26”).  Need two “For loop” for rows and columns. Write each value with a comma in the text file till the end of columns (write without comma only the last column value). Do the above step until reach the end of rows. 

Sales Data in Excel: 5 columns and 25 rows

VBA code to create a text file as below

VBA Code:

• Declaring Variables :  

'Variable declarations
Dim myFileName As String, rng As Range, cellVal As Variant, row As Integer, col As Integer

• Initialize variables:
  • myFileName: The file name with the full path of the output text file
  • rng: Excel range to read data from an excel.

'Full path of the text file
myFileName = "D:ExcelWriteTextsales.txt"
'Data range need to write on text file
Set rng = ActiveSheet.Range("A1:E26")

Open the output text file and assign a variable “#1”

'Open text file
Open myFileName For Output As #1

‘Nested loop to iterate both rows and columns of a given range eg: “A1:E26” [5 columns and 26 rows]

'Number of Rows
For row = 1 To rng.Rows.Count
   'Number of Columns
   For col = 1 To rng.Columns.Count

Assign the value to variable cellVal 

cellVal = rng.Cells(row, col).Value

Write cellVal with comma.  If the col is equal to the last column of a row.  write-only value without the comma.

'write cellVal on text file
    If col = rng.Columns.Count Then
        Write #1, cellVal 
    Else
        Write #1, cellVal, 
    End If

Close both for loops

   Next col
Next row

Close the file

Close #1

Approach:

Step 1: Add a shape (Create Text File) to your worksheet 

Step 2: Right-click on “Create a Text file” and “Assign Macro..”

Step 3: Select MacroToCreateTextFile

Step 4: Save your excel file as “Excel Macro-Enabled Workbook”  *.xlsm

Step 5: Click “Create Text file”