Как открыть excel файл в блокноте

Была ли эта статья полезной?

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

​Смотрите также​​: Михаил, видать проблема​ для себя возьмете​ кодировку или что​ захочет лопатить полметра​ по одному, читайте,​ файл читать, то​ какой код будет​ End Function Private​ As Long Private​ на два (отдельно​ с заголовками​ У меня нормально​Функции Excel (по категориям)​ Если нужно сохранить​ импорта.​Текстовые файлы​Примечание:​ в этом. Можно​monkler​ еще…​

​ текстовых данных​ закрывайте; и так​ нельзя его скопировать​ для тебя сгенерирован.​ Function get_text(window_hwnd As​ Declare Function GetWindow​ время в секундах,​конвертированный отличается от​ открывает конвертированный файл.​Jenek​ именно текущий лист,​​В диалоговом окне​​.​ Мы стараемся как можно​ шаг:​

​: Привествую.​Тимур​

• ​за вас​ по кругу. А​ во временное место,​ Код творчески переработай,​ Long) As String​ Lib «user32» (ByVal​

• ​ отдельно мс), либо​ базового текстового, тем​Jenek​: Добрый День. Прошу​ нажмите кнопку​Импорт данных​

​Найдите нужный файл и​ оперативнее обеспечивать вас​>нужно вызвать мастер​Вопрос такого плана​: Спасибо, я и​.​ для чтения, повторю,​

​ переименовать в CSV​​ если потребуется. Насчет​ If window_hwnd =​ hWnd As Long,​ (посмотрел csv) -​

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

​ что убраны лидирующие​: А у меня​ помощи. Есть Файл​ОК​выполните одно из​​ дважды щелкните его.​​ актуальными справочными материалами​ текста по столбцам​ — изменилась вставка​ не знал, что​Мотя​ делайте их локальную​ и просто открыть​ периодочности. Посмотри, как​ 0 Then Exit​ ByVal wCmd As​

1. ​ преобразовываем в секунды,​​ и конечные нули​​ разделитель «;»​​ в формате txt.​​. Другие листы можно​

2. ​ указанных ниже действий.​​Если это текстовый файл​​ на вашем языке.​​ и на первом​​ текста при копировании​

3. ​ так можно открывать)))​: !​

   • ​ временную копию в​ эту копию для​ работает функция Sleep,​ Function txtlen =​ Long) As Long​ например:​​ в числах.​​Цитата​ В нем сохранена​

   • ​ сохранить в отдельных​При необходимости нажмите кнопку​ (с расширением ТХТ),​ Эта страница переведена​

   • ​ шаге выбрать «с​ его из блокнота​спасибо огромное!!!​Интересно, банк, в​ формате csv для​

     ​ чтения в Exceл.​​ например. Но есть​ SendMessage(window_hwnd, WM_GETTEXTLENGTH, 0,​ Private Declare Function​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЗНАЧЕН(ВРЕМЗНАЧ(ЛЕВБ(A2;7))*86400&»,»&ПРАВБ(A2;2))​Jenek​Udik, 19.08.2015 в​ информация, только она​ текстовых файлах, повторив​Свойства​ запустится мастер импорта​ автоматически, поэтому ее​ разделителями» и убрать​ в excel. Если​demon​ котором Ваша контора​ облегчения и ускорения​Это все почти​ много способов это​ 0) If txtlen​ GetWindowText Lib «user32″​Если брать исходный​: Получилось. Сидел одну​ 21:28, в сообщении​ разделена пробелами. Нужно​ эту процедуру для​, чтобы задать параметры​ текста. Окончив работу​ текст может содержать​ галочки с разделителей​ фраза состоит из​: Если пользуется Опен​ получает выписки, работает​

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

​ макроса. Последнее, вообще​ наверняка возможно. И​ сделать.​ = 0 Then​

1. ​ Alias «GetWindowTextA» (ByVal​ CSV — то​ строчку в ручную​

2. ​ № 8200?’200px’:»+(this.scrollHeight+5)+’px’);»>Ну и​​ его перевести в​​ каждого из них.​​ обновления, форматирования и​​ с мастером, нажмите​​ неточности и грамматические​​ текста на втором​

   

3. ​ нескольких слов разделенных​ офисом, то там​ с «​

   ​ говоря, необязательно. Все​ для этого не​acorables​ Exit Function txtlen​ hWnd As Long,​ он тоже импортируется​ делал. Значит так:​​ пусть пишет, сохраните​ ​ формат xls, по​Откроется второе диалоговое окно​ макета импортируемых данных.​ кнопку​​ ошибки. Для нас​​ шаге мастера.​ пробелом, то каждое​

4. ​ после открыть с​​физиками​​ необходимые команды вам​ требуется чудо вытаскивания​

   • ​: Я попробовал с​​ = txtlen +​​ ByVal lpString As​ мастером (разделитель «,»);​1. Скопировал с​

   • ​ и посмотрите, что​​ строкам.​​ с напоминанием о​В группе​

     • ​Готово​ важно, чтобы эта​>​​ слово вставляется в​​ помощью Scalc сразу​

     • ​»?!​ представит макрорекордер для​ данных из закрытого​ помощью записи макроса​​ 1 txt =​​ String, ByVal cch​

5. ​ или просто открывается​​ блокнота строку в​​ получится.​

   ​В Других допустим​ том, что сохраняемый​Куда следует поместить данные?​

​, чтобы завершить операцию​ статья была вам​поподробней, пожалуйста ?​ свою отдельную ячейку.​ открывается окно импорта​Sobes​ любого почти вида​ файла.​ решить задачу, но​ Space$(txtlen) txtlen =​ As Long) As​ приложением, с последующим​

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

​ Эксель​Ну сохраняет, а​ файлах количество строк​​ лист может содержать​​выполните одно из​

1. ​ импорта.​​ полезна. Просим вас​​Михаил Лебедев​​Пример во вложении​​ «Далее уже сами​

2. ​: Вот так. легко​​ читаемого файла.​​VladConn​

3. ​ не вышло. Т.к.​​ SendMessage(window_hwnd, WM_GETTEXT, txtlen,​​ Long Private Declare​ «текст по столбцам».​

   • ​2. Заменил все​​ в программе где​ может быть больше,​​ возможности, которые не​​ следующих действий:​​Статья: Мастер импорта текста​

   • ​ уделить пару секунд​​: 1. Берете любой​Hugo​ смотрите какие разделители​ сливается инфа в​acorables​acorables​ в этот текстовый​ ByVal txt) get_text​

4. ​ Function GetWindowTextLength Lib​ Затем, естественно, нужно​ «;» на «,»​ открываю этот файл​​ либо меньше. Нужна​​ поддерживаются текстовыми форматами​

5. ​Чтобы поместить данные в​ Дополнительные сведения о​ и сообщить, помогла​ столбец с данными​: И что?​ применить и надо​ инет.​: Вот (в прикрепленных​​: Файлов.txt порядка 30​​ файл записывае и​ = Left$(txt, txtlen)​ «user32» Alias «GetWindowTextLengthA»​ произвести поиск и​3. Сохранил через​

6. ​ пусто.​ формула как просто​ файлов. Если в​ выбранное расположение, выберите​ разделители и дополнительные​ ли она вам,​ в екселе​По примеру текста​ ли»​А кто потом​ файлах) кое-что нашел,​​ шт., данные обновляются(добавляются​​ читает данные другая​ End Function​ (ByVal hWnd As​ замену (Ctrl+H) «.»​ Эксель в формат​Цитата​ это все переводить​​ новом текстовом файле​​ вариант​

​ параметры.​ с помощью кнопок​2. ДАННЫЕ -​ — разбивайте по​Guest​ отвечать будет. если​

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

​ может кому пригодится,​ строчки в файл.txt)​ программа, возникает конфликт.​Sanyok-OK​ Long) As Long​ на «,» ,​ CSV с разделителями​Shylo, 19.08.2015 в​ в формат csv​ нужно сохранить только​На существующий лист​Если файл имеет расширение​ внизу страницы. Для​

​ Работа с данными​ позициям символов.​: Если пользуется Опен​ контрагент потерпит убытки​

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

1. ​ самому пока не​ через 5-10мин, это​​ Т.е. мне нужно​​: Да из блокнота,​​ Private Declare Function​​ чтобы преобразовать строковое​

2. ​ пробел — запятые​ 21:23, в сообщении​Примеры прилагаю.​

3. ​ данные листа, нажмите​.​​ CSV, приложение Excel​​ удобства также приводим​

4. ​ — Текст по​​Слэн​​ офисом, то {/post}{/quote}​

​ из-за слива инфы?​​ до этого.​ порядка 150 строчек​ не открывая файл.txt​ редактировать без проблем​ PostMessage Lib «user32″​ представление в числа.​Вы правы.​ № 6200?’200px’:»+(this.scrollHeight+5)+’px’);»>enek, Попробуйте​

См. также

​С Уважением Евгений.​ кнопку​

​Чтобы поместить данные в​ автоматически откроет его​

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

​ столбцам (это и​: вопроса не вижу​

​А если пользоваться​

​уважаемый, а Вам​

support.office.com

Создание таблицы в Excel из блокнота (Формулы/Formulas)

​kmashin​​ в каждом. В​ прочитать из него​Если подскажете куда​ Alias «PostMessageA» (ByVal​И, по идее,​Как бы теперь​ без формулы. Данные​МВТ​Да​
​ верхний левый угол​ и отобразит данные​ (на английском языке).​ есть Мастер…)​ — одни утверждения​ Word, то​ не приходило в​
​: Добрый день гуру​
​ VBA построен анализ​

​ данные, какой командой​​ данный скрипт вбить,​ hWnd As Long,​ надо просто написать​ это все сделать​ — Импорт внешних​: Копируете текст в​. Если имеются сомнения​ нового листа, выберите​

​ в новой книге.​​Импортировать данные из текстовых​3. Мастер распредел…..​у меня скопировало​Тема — Вставка​ голову. что вы​ эксель!!!​ этих данных каждые​ можно обратиться к​ буду благодарен, vbs?​

​ ByVal wMsg As​​ макрос, который будет​​ проще.​​ данных — Импортировать​ Эксель, выделяете его.​ и необходимо получить​ вариант​

​Примечание:​​ файлов в Excel​ шаг 1 из​ в одну ячейку​ текста из блокнота​ давали подписку о​

​У меня такая​​ 5-10 мин и​ неоткрытому файлу и​Alex77755​ Long, ByVal wParam​ ориентирован на выбор​Блин ничего не​ данные… — Выбор​ Вкладка Данные -​ дополнительные сведения о​Новый лист​ .При открытии в Excel​ можно двумя способами:​ 3 Оставляем точку​максимум по строкам​ в эксель​ неразглашении коммерческой тайны?​ проблема, есть блокнотовский​ вывод на страницы​ прочитать находящиеся в​: Забей в модуль​ As Long, ByVal​

​ соответствующего типа поступающей​​ получилось. Получилось только​ источника данных (свой​ Текст по столбцам​ том, какие возможности​.​ файлов с расширением​
​ открыть файл в​

​ на «с разделителями»​​ разнесло​Форум — по​И привлечь Вас​ файлик с данными,​ Excel. Я делал,​

​ нем данные. Тип​​поменяй Me.hWnd на​ lParam As Long)​
​ информации и проведение​​ первая строчка с​ файл .csv) -​ — С разделителями​ Excel не поддерживаются​Нажмите кнопку​ CSV для интерпретации​
​ приложении Excel или​ Далее >​monkler​ Excel​
​ сейчас легче легкого​​ очень нужно перенести​ подобное чере API​ файла изменить нельзя.​ Application.hWnd​ As Long Private​ нужных преобразований.​ заголовками, а данных​ Открыть. Запуститься мастер​ и ставите в​ форматами текстовых файлов,​ОК​ способа импорта каждого​ импортировать его как​4. …………………………. шаг​: вопрос в том,​Ответ — по​ за эту вот​ файлы в EXCEL​ другой программы, так​ Надеюсь это возможно.​объяви переменную Dim​ Declare Function SetWindowText​Sanyok-OK​
​ так и нет​ импорта — Формат​​ качестве разделителя точку​​ нажмите кнопку​.​ столбца данных используются​ диапазон внешних данных.​ 2 из 3​ что раньше вставка​ Опен офис​Grybui​пробовал перенести через​ вот при большом​
​Заранее благодарен.​ CurrWnd можно глобально​ Lib «user32.dll» Alias​: Доброго времени суток.​ в ней​ данных с разделителем​ с запятой​

​Справка​​Приложение Excel сохранит внешний​ текущие параметры по​ Чтобы экспортировать данные​ Символом разделителя является​ была иначе, скинул​Derjzemit​: Всем привет!​ мастер текстов получается​
​ количестве данных Excel​babken76​И вызови процедуру​ «SetWindowTextA» (ByVal hWnd​в блокноте имеется​

​Udik​​ (выбрать свой тип​Jenek​.​ диапазон данных в​ умолчанию. С помощью​ из Excel в​ — убираем все​ по вложении​: Добрый день форумчане.​есть проблема? помогите​ не очень.​ просто сама закрывается,​
​: -Как прочитать файл​ Command1_Click()​ As Long, ByVal​ большое количество данных​: Нет, надо файл,​

​ разделителя) — Далее​​: На столбцы поделить​Дополнительные сведения о сохранении​ выбранную позицию.​
​ мастера импорта текста​ текстовый файл, используйте​ флажки Готово​
​Hugo​ Такой вопрос, а​
​ мне ее решить.​Часть текста теряется​ на форуме есть​ не открывая?​
​Например так​
​ lpString As String)​ вида:​ который конвертировал и​
​ — Готово и​ получилось. Спасибо. Через​ файлов в других​Если Microsoft Excel не​ можно применять другие​ команду​

​5. Всё, теперь​​: Ааа, так значит​ есть ли какая-нибудь​есть текстовый документ,​ и смещаются ячейки​ про это от​-Как создать многозадачный​Private Sub CommandButton1_Click()​ As Long Private​XML ********** **************​ сохранил эксель, открыть​ ОК. Если таких​ конвертер перевожу его​ форматах см. в​ преобразует столбец в​ варианты преобразования столбцов​Сохранить как​ из txt вставляется​ не нужно разбивать​ функция или функционал,​ созданный программой АВС​нужно получить в​ других людей. Вот​

​ процессор?​​ Run «Command1_Click» End​ Declare Function SendMessage​​ ******* ********* *****​​ в блокноте (или​ файлов много Запишите​​ в формат CSV.​​ статье Сохранение книги​ необходимый формат, данные​ в различные форматы​
​и измените тип​ без разноски по​

​ по столбцам! Ну​​ который позволяет создавать​ (программа для составления​
​ табличном виде таблицу​ я мудрю в​-Как ездить на​ SubТекст из открытого​ Lib «user32» Alias​ ********** ************* *****​ аналоге) и там​ свои действия макрорекордером.​ И в программе​ в другом формате​ можно преобразовать после​
​ данных. Например, в​ файла в раскрывающемся​ столбцам.​ так не разбивайте…​ пустой документ блокнота​ смет), надо перевести​Огромное спасибо за​ меру способностей. Рад​ машине в которой​ блокнота прочитаешь в​ «SendMessageA» (ByVal hWnd​ ************* ********** ********​ уже проводить замену​ У меня получилось​
​ через которую я​
​ файла.​ импорта. Дополнительные сведения​ файле с расширением​ меню.​Всё, подробнее -​ Или кто-то заставляет?​ и заносить туда​ его в Excel,​ помощь.​ любой идеи.​ нет бензина?​ месаге​ As Long, ByVal​
​ ********* ********** *****​ через соответствующий инструмент.​ так. Но ломается​ смотрю эти файлы​Если для импорта текстового​ см. в статьях​ CSV в столбце​

excelworld.ru

Импорт данных из блокнота в Excel

​Чаще всего используются два​​ уже не смогу.​
​monkler​ указанные данные? Допустим​ по следующему алгоритму​
​kavaka​VladConn​-Как не работая​Sanyok-OK​ wMsg As Long,​ ************​
​ И еще -​ шапка. Вам виднее​ он ничего не​ файла используется мастер​
​ Преобразование чисел из​ дат может быть​ формата текстовых файлов:​
​Sham1501​: Hugo, мне не​ есть ТекстБокс, пользователь​1) строка как​: Считываете макросом свой​: А что такое,​

​ получать деньги?​​: Вот теперь точно​ ByVal wParam As​

​Нужно как то​​ в csv файле​ как она должна​ показывает.​ импорта текста, то​
​ текстового формата в​ установлен формат М/Д/Г,​текстовые файлы с разделителями​: Добрый день у​

​ совет нужен, а​​ нажимает кнопку и​ бы состоит из​

​ txt и обрабатываете​​ это «большое количество​-Как жить с​
​ не понял, в​ Long, lParam As​ импортировать данные из​
​ запятые только разделители,​ выглядеть правильно.​МВТ​ на втором этапе​ числовой и Преобразование​ а в Excel​ (TXT), в которых​ меня вопрос такое​ решение проблемы​ текст оттуда автоматом​ нескольких частей​ текст в нужный​ данных»? Насколько оно​ несколькими русскими женщинами​ какой модуль​ Any) As Long​ данного файла в​ т.е. в числах​Ну это тоже​:​ работы мастера разделитель​ дат из текстового​ по умолчанию задан​ для разделения полей​ можно реализовать?Есть лог​раньше данные из​ записывается в новосозданный​а) прайс​ вид в excel.​ большое? И как​ одновременно?​Alex77755​ Private Const WM_CHAR​ Excel​ их нет (ну​ самое что и​Jenek​ текста можно изменить​ формата в формат​ формат Г/М/Д, или​ текста обычно используется​ файл который при​ вставлялись , теперь​ файл блокнота в​б) кол-во​kmashin​ это количество образуется?​Извечные вопросы задаете​: В модуль екселя.​ As Long =​Условие, каждая новая​ или я не​Цитата​, так может, дело​ с символа табуляции​ даты.​ необходимо преобразовать в​ знак табуляции (код​ работе некоторой программы​что изменилось в​ текущей папке.​в) цена​: это как?​acorables​ батенька.​Раздел же «Форум​ &H102 Const GW_HWNDFIRST​ строка->столбец, и каждый​ увидел). А в​МВТ, 19.08.2015 в​ в программе? В​ на другой символ.​Лист Excel можно преобразовать​ текст столбец чисел,​ знака ASCII 009);​ постоянно обновляется есть​ форме вставки ?​KoGG​г) наименовние​PooHkrd​: Большое количество данных-это​))​ MS Office Exce»​ = 0 Const​ отступ->строка​ текстовом файле в​ 20:48, в сообщении​ экселе CSV нормально​ На данном этапе​ в текстовый файл,​ содержащих начальные нули,​текстовые файлы с разделением​ ли возможность чтобы​Hugo​: Sub Run_Notepad_Copy_Range() ‘​в приложении я​: Вот сколько пользовался,​ два столбца время​Заранее прошу прощения,​В какой же​ GW_HWNDNEXT = 2​XML ********** **************​ некоторых числах целая​ № 2200?’200px’:»+(this.scrollHeight+5)+’px’);»>Копируете текст​ открывается?​ также можно изменить​ используя команду меню​ так, чтобы сохранить​ значений запятыми (CSV),​ все записи этого​: Это нам нужно​ Открывет блокнот и​ подробно описал как​ ни разу такого​ и значение (число),​С уважением,​ может быть модуль?​

​ Const WM_GETTEXT =​​ ******* ********* *****​ часть отделяется запятой.​
​ в Эксель, выделяете​Udik​ способ обработки последовательных​

​Сохранить как​​ их. Чтобы принудительно​
​ в которых в​ файла приносились в​
​ угадать что Вы​ копирует в него​
​ где и что​ не встречал. Может​
​ файл где-то 50Kb.​
​acorables​Лучше в новыйl​ &HD Const WM_GETTEXTLENGTH​ ********** ************* *****​ Похоже там тоже​

​ его. Вкладка Данные​​: В примере у​ разделителей (например, идущих​.​

​ запустить мастер импорта​​ качестве разделителя полей​
​ таблицу данные в​ изменили?​
​ заданный диапазон Range(«A1:D5»).Copy​ нужно сделать, заранее​
​ просто вы им​

​ Будет около 20-30​​: Можно было просто​Alex77755​ = &HE Dim​

CyberForum.ru

Как экспортировать данные из блокнота(.txt) в Excel, периодически.

​ ************* ********** ********​​ надо менять на​ — Текст по​ csv разделитель «,​ подряд кавычек).​Выберите​ текста, можно перед​ текста обычно используется​ файле такие, а​У меня разбивает​ Dim MyNotepad MyNotepad​ огромное спасибо, жду​ не так пользуетесь?​ файлов.txt. Их создает​ ответить, что это​: Вот так это​ ListItem As String​
​ ********* ********** *****​

​ точки. Проделать это​​ столбцам — С​ «. А какой​Дополнительные сведения о разделителях​Файл​ открытием файла изменить​ запятая (,).​ так же скажем​ только по строкам​ = Shell(«notepad.exe», vbNormalFocus)​ ваших предложений​Обычно ячейки смещаются,​ и в них​
​ невозможно. Просто я​ вглядит в блокноте,​ Dim Length As​ ************Заранее спасибо​ лучше до замены​ разделителями и ставите​ у Вас получился​ и дополнительных параметрах​ >​ его расширение на​Можно изменить знак разделителя,​ попадали в определённые​

​ — что я​​ AppActivate Title:=»Блокнот» SendKeys​Hugo​ когда вы загружаете​ экспортирует данные программа​ не силен в​ месаге и дебаггере​ String Dim txtlen​Surrogate​ разделителей​ в качестве разделителя​ (откройте в блокноте)?​ см. в статье​Сохранить как​ CSV или TXT​ используемый как в​ ячейки таблицы( фразы​ делаю иначе?​ «^V», False End​
​: Вероятно достаточно стандартного​

​ текст с разбивкой​​ которая сама еще​ программировании, вижу что​
​acorables​ As Long Dim​
​: это что за​Jenek​ точку с запятой​
​Shylo​ Мастер импорта текста.​
​.​ или импортировать текстовый​ TXT-, так и​
​ используемые в фале​Михаил Лебедев​
​ Sub​
​ импорта данных из​
​ на столбцы по​

​ ресурсы не слабо​​ происходит запись в​: Добрый день. Вопрос​ txt As String​ конспирация ?​: Там еще первый​Как бы на​: Jenek, Попробуйте без​В операционной системе Microsoft​Появится диалоговое окно​ файл путем подключения​ CSV-файлах. Это может​ одинаковые)​: Раньше (1997, 2003)​Блокнот тут совсем​ текста, разбивая данные​ разделителю, а знак​ потребляет. Файл.txt можно​

​ файл.txt некой программой,​​ в следующем: Данные​
​ Dim q1 As​Sanyok-OK​ самый заголовок​ столбцы делит все​ формулы. Данные -​ Windows нажмите кнопку​Сохранение документа​ к нему.​ потребоваться для обеспечения​16.03.2017 10:14:07.357 W42​ был такой «глюк»​ не нужен. Нужно​ по разделителям. Затем​ разделителя имеется в​ и открыть либо​ и мне бы​
​ находятся в файле.txt​ String Dim q2​: XML Вася Федя​H:MM:SS.ms​ ОК. Взаимосвязь нужно​ Импорт внешних данных​Пуск​.​В имеющийся лист можно​ успешного выполнения операций​
​ T1010 заявка 25414488258​ у екселя. Если​ печатать прямо в​ вручную (или макросом)​ тексте одного из​ вручную, либо может​
​ читать из него​

​ в виде столбцов​​ As Long Private​ Маша Дима Федя​который нужно менять​ теперь найти между​ — Импортировать данные…​и выберите пункт​В поле​ импортировать данные из​ импорта и экспорта.​ активно 0, исполнено​ при вставке из​ файл.​ поменять местами пару​ значений столбцов. Но​ команда есть. Изменить​ периодически не нарущая​ цифр,разделенных «,» их​ Sub Command1_Click() q1​ Маша Вася Вова​ на​ этими 2мя CSV​ — Выбор источника​

​Панель управления​​Тип файла​ текстового файла как​Примечание:​ 0, итог 0​ текстового файла применялся​

​Sub Print_Range_to_text_file() Dim​​ столбцов.​ если так, то​ способ экспорта сложно,​ работу той(некой) программы.​ надо экспортировать в​ = FindWindow(vbNullString, GetWindowsList(«​ Жора Георгийв такое​Time​ файлами тот что​ данных (свой файл​.​выберите формат текстового​ диапазон внешних данных.​ Можно импортировать и экспортировать​16.03.2017 10:14:07.357 Действие​ мастер вставки, и​ i&, j&, TextLine​Но в примере​ тогда стандартный инструмент​ для нее правда​ Вобще мне на​ Excel. Т.е. VBA​ — Блокнот»)) If​

​XML Вася Федя​​и эти «:»​ работает и мой​ .csv) — Открыть.​Откройте диалоговое окно изменения​ файла для листа.​Щелкните ячейку, в которую​ до 1 048​ завершено: T1010 MouseBid​ там задавалось разнесение​ As String Open​ одного разделителя не​ не подойдет. Придется​ есть комплект разработчика(пишуться​ этом форуме уже​ должен дать команду​ q1 = 0​ Маша Дима Федя​ тоже менять на​Jenek​ Запуститься мастер импорта​ региональных и языковых​Например, выберите​ требуется поместить данные​ 576 строк и​ Buy​ по столбцам, то​ «C:tempexport.txt» For Output​ хватает… Думаю это​ лепить макрос, в​ dll на Delphi),​ помогали решать задачи​ «взять данные из​

​ Then MsgBox «Окно​​ Маша Вася Вова​ «,»​: Причем даже тот​ — Формат данных​ параметров.​

CyberForum.ru

Перенести инфу из Блокнота в EXCEL

​Текстовые файлы (с разделителями​​ из текстового файла.​ 16 384 столбцов.​
​16.03.2017 10:14:07.357 W42​ в дальнейшем ексель​ Lock Write As​ брак​ котором указывать исключения.​
​ но описание очень​ для меня не​ файла.txt с такими-то​
​ не найдено!» Else​ Жора Георгий​
​Я уже кучу​ Файл что в​
​ с разделителем (выбрать​Введите новый разделитель в​

​ табуляции)​​На вкладке​Текстовый файл, созданный в​ T1011 заявка 25414489989​ это разнесение по​

​ #1 For i​​Grybui​

​kmashin​​ краткое. Если уж​ посильные задачи, так​ разделителями»,» и поместить​ q2 = FindWindowEx(q1,​Krasme​
​ вариантов перепробовал​ примере который формата​ свой тип разделителя)​ поле​или​Данные​ другой программе, можно​ активно 1, исполнено​ столбцам эээ… «запоминал,​ = 1 To​, а не ABC​: kavaka, а есть​ другого пути нет,​

​ что спасибо.​​ в столбец Excel».​ 0, vbNullString, «»)​

​: полагаю, тут только​​AndreTM​ CSV. Он даже​ — Далее -​​Разделитель элементов списка​​CSV (разделители — запятые)​в группе​ открыть как книгу​ 0, итог 0​ что ли… и​ 5 TextLine =​Покажите оригинальный текст​ такой макрос?​ буду копаться в​VladConn​ Периодически желательно, через​ MsgBox «Содержимое блокнота:​ макросом…​: Вообще я что-то​ не разделен на​ Готово и ОК.​.​​.​​Получение внешних данных​

​ Microsoft Excel с​​16.03.2017 10:14:10.217 W42​
​ при следующей вставке​ «» For j​ от ABC.​PooHkrd​​ нем.​​: acorables,​

​ 10 мин. Поджскажите​​ » & get_text(q2)​Alex77755​ ничего не понимаю…​
​ столбцы он и​ Если таких файлов​Дважды нажмите кнопку​Примечание:​
​нажмите кнопку​ помощью команды​ T1011 заявка 25414489989​ из текстового файла​ = 1 To​
​Grybui​: Чтобы появился макрос​VladConn​

planetaexcel.ru

Текст из блокнота в Excel (Формулы/Formulas)

​Если только читать,​​ кто может, хотябы​
​ End If End​: Прям из блокнота​
​Если брать исходный​ так работает в​ много Запишите свои​ОК​ Различные форматы поддерживают разные​Из текстового или CSV-файла​
​Открыть​ активно 0, исполнено​ (простой вставке, Ctrl+C​
​ 4 TextLine =​
​: оригинальный текст файла​
​ или другое решение,​
​: Ну что ж,​
​ то работе другой​ команды VBA Excel.​ Sub Private Function​ надо импортировать?​ файл TXT -​ программе.​

​ действия макрорекордером. У​​.​ наборы функциональных возможностей.​.​. При открытии текстового​ 1, итог 1​ > Ctrl+V) он​ TextLine & Cells(i,​
​ АВС​ нужно чтобы​ раз так, то​ программы это не​​Заранее благодарен.​​ GetWindowsList(strFiltr As String)​
​Тогда так. Правда​ то он отлично​

​Дело скорей всего​​ меня получилось так.​Примечание:​

excelworld.ru

Вставка текста из блокнота в эксель

​ Дополнительные сведения о​​Найдите файл, который нужно​ файла в Microsoft​
​16.03.2017 10:14:10.217 Действие​ уже также разносил​ j).Value & «​Тимур​вы​ если эти 50​ должно мешать. Операции​VladConn​ CurrWnd = GetWindow(Me.hWnd,​ ещё надо будет​ открывается в Excel,​ в том что​ Но ломается шапка.​ После изменения символа разделителя​ функциональных возможностях, поддерживаемых​

​ импортировать, и дважды​​ Excel его формат​ завершено: T1011 MvOrder​ текст по столбцам.​
​ » Next j​

​: Добрый день гуру​​понимали причину, по​ килобайт представляют число​ чтения и записи​: Раз данные в​ GW_HWNDFIRST) Do While​ обработать результат​ мастером импорта (указываем​ в нем разделено​ Вам виднее как​

​ элементов списка на​​ различными форматами текстовых​ щелкните его.​
​ не изменяется — это​ Buy​
​ Помогало только выкл-вкл​ Print #1, TextLine​ эксель!!!​
​ которой не получается​ строк, меньшее числа​
​ есть операции независимые.​ файле txt разделены​

planetaexcel.ru

Экспорт данных из экселя в блокнот

​ CurrWnd <> 0​​Private Declare Function​ разделитель «;» и​ «,» а у​ она должна выглядеть​ данном компьютере все​ файлов, см. в​Следуйте инструкциям мастера импорта​ можно видеть в​16.03.2017 10:14:10.218 W42​ екселя. Похоже, что​ Next i Close​У меня такая​ сделать импорт текста​ строк страницы Excel,​

​ А вот сохраняет​​ запятой, то ему​ Length = GetWindowTextLength(CurrWnd)​ FindWindow Lib «user32″​ всё). Кстати, он​ меня «;»​ правильно.​ программы будут использовать​ разделе Поддерживаемые Excel​ текста. Дополнительные сведения​
​ строке заголовка Microsoft​ T1011 сделка по​ «глюк» остался. Если​ #1 End Sub​
​ проблемка, есть блокнотовский​ в Эксель стандартным​ то последний сам​ ли она эти​ лучше временно придать​ ListItem = Space(Length​ Alias «FindWindowA» (ByVal​ открывается и просто​Udik​Jenek​ новый символ. Та​ форматы файлов.​ об использовании мастера​ Excel, где имя​ заявке 25414489989: 1*108320,​ данная тема вызвана​Derjzemit​

​ файлик с данными,​​ мастером. Или хотя​ собой никогда не​ свои изменения от​ расширение не txt,​

​ + 1) Length​​ lpClassName As String,​ приложением, если переименовать​: Тогда можно попробовать​: В Экселе нормально​
​ же процедура позволяет​Перейдите в папку, в​

CyberForum.ru

Вставка данных из Блокнота

​ импорта текста см.​​ отображается с расширением​
​ итог 1*108320​ как раз этим,​: Да, спасибо, работает)​ он создается програмулькой​ бы, на примере​ умрет. И 30​ записи до записи​ а csv (comma​ = GetWindowText(CurrWnd, ListItem,​ ByVal lpWindowName As​
​ его с расширением​

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

​ текстового файла (например,​​SLAVICK​ то нужно вызвать​
​ первое логичное, но​ досовской, и русский​
​ одного из приложенных​ файлов — не​

​ или делает это​​ separated values). Тогда​ Length + 1)​ String) As Long​ csv.​

​ (поиск и замена)​​ файл exl в​ принятый по умолчанию.​ новый текстовый файл,​ которую можно вызвать​ .TXT или .CSV).​

​: Можно:​​ мастер текста по​ немного обходное, а​ текст она создает​
​ файлов, описали что​ должно быть проблемой,​
​ по некоему график?​ EXCEL его открывает​

​ If Length <>​​ Private Declare Function​Остается только проблема​ в конвертированном файле​
​ csv Через сам​Общие сведения о формулах​ и нажмите кнопку​ с помощью кнопки​

​Последовательно выберите пункты​​Цитата​ столбцам и на​ второе самое то.​ в виде абракадабры.​ вы делаете, что​ ведь нету такой​ От этого зависят​ без оглядки. Это​ 0 Then If​ FindWindowEx Lib «user32″​ — если преобразовать​ «;»на «, «.​ эксель, сохраняя там​ в Excel​Сохранить​Справка​файл​Pelena, 18.11.2015 в​ первом шаге выбрать​StepInLik​ Можно ли при​ получается в итоге​ необходимости держать их​ результаты прочтения файла,​ одно из стандартных​ InStr(ListItem, strFiltr) <>​ Alias «FindWindowExA» (ByVal​ первый столбец в​ Только там ещё​ в таком формате.​Рекомендации, позволяющие избежать появления​

​.​​на любой странице​>​ 11:05, в сообщении​
​ «с разделителями» и​: Посмотрите эту тем:​ копировании текста из​ и что конкретно​ открытыми для чтения​ а так же​ расширений, которые он​ 0 Then GetWindowsList​
​ hWndParent As Long,​
​ число-время, то мы​

​ могут проблемы возникнуть​​Вот что пишет​ неработающих формул​Откроется диалоговое окно с​
​ мастера. Окончив работу​Открыть​ № 3 ()​ убрать галочки с​ Вствка текста из​
​ блокнота в лист​ у вас пропадает​ одновременно? Там же​ режим этого чтения.​ понимает.​
​ = ListItem End​ ByVal hWndChildAfter As​ потеряем миллисекунды, так​ на конечном пробеле.​Udik​
​Поиск ошибок в формулах​ напоминанием о том,​ с мастером, нажмите​.​
​ 200?’200px’:»+(this.scrollHeight+5)+’px’);»>Данные — Из​ разделителей текста на​

planetaexcel.ru

Онлайн перенос данных из блокнота в Excele

​ VBA в notepad​​ эксель, переделать эту​ и куда съезжает.​ все равно периодичность​И я так​А насчет команд​ If End If​ Long, ByVal lpClassName​ что либо оставляем​ Проверять в вашей​: Ну и пусть​Сочетания клавиш и горячие​ что в текстовом​ кнопку​В диалоговом окне​ текста — С​ втором шаге мастера.​
​ и обратно​ абракадабру в удобочитаемый​ Без этого вряд​ в 10 минут.​
​ и не понял,​ — воспользуйся макрорекордером​ CurrWnd = GetWindow(CurrWnd,​
​ As String, ByVal​ его как есть,​ программе надо, можно​ пишет, сохраните и​
​ клавиши в Excel​ файле будет сохранен​Готово​Открыть​
​ разделителем — Символ​monkler​Может что нового​
​ вид, изменить ему​ ли тут кто​ Открывайте себе их​ почему, если можно​

​ и посмотри сам,​​ GW_HWNDNEXT) DoEvents Loop​
​ lpWindowName As String)​​ строкой, либо разбиваем​ на паре строк​ посмотрите, что получится.​Функции Excel (по алфавиту)​ только текущий лист.​, чтобы завершить операцию​выберите пункт​

excelworld.ru

​ табуляции​

Is this article up to date?

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

CSV (Comma Separated Values) – распространённый формат для хранения табличных данных (числовых и текстовых) в виде простого текста. Этот формат файлов популярен и живуч благодаря тому, что огромное количество программ и приложений понимают CSV, хотя бы как альтернативный вариант файлового формата для импорта / экспорта. Более того, формат CSV позволяет пользователю заглянуть в файл и немедленно найти проблему с данными, если таковая имеется, изменить разделитель CSV, правила цитирования и так далее. Это возможно потому, что CSV – это простой текст, и даже не очень опытный пользователь, сможет легко его понять без специальной подготовки.

В этой статье мы изучим быстрые и эффективные способы экспорта данных из Excel в CSV и узнаем, как преобразовать файл Excel в CSV, сохранив без искажений все специальные и иностранные символы. Описанные в статье приёмы работают во всех версиях Excel 2013, 2010 и 2007.

• Преобразуем данные из формата Excel в CSV
• Экспортируем из Excel в формат CSV UTF-8 или UTF-16
• Другие способы преобразования из формата Excel в CSV (сохраняя специальные символы)

Как преобразовать файл Excel в CSV

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

1. В рабочей книге Excel откройте вкладку Файл (File) и нажмите Сохранить как (Save as). Кроме этого, диалоговое окно Сохранение документа (Save as) можно открыть, нажав клавишу F12.
2. В поле Тип файла (Save as type) выберите CSV (разделители – запятые) (CSV (Comma delimited)).Кроме CSV (разделители – запятые), доступны несколько других вариантов формата CSV:
   • CSV (разделители – запятые) (CSV (Comma delimited)). Этот формат хранит данные Excel, как текстовый файл с разделителями запятыми, и может быть использован в другом приложении Windows и в другой версии операционной системы Windows.
   • CSV (Macintosh). Этот формат сохраняет книгу Excel, как файл с разделителями запятыми для использования в операционной системе Mac.
   • CSV (MS-DOS). Сохраняет книгу Excel, как файл с разделителями запятыми для использования в операционной системе MS-DOS.
   • Текст Юникод (Unicode Text (*txt)). Этот стандарт поддерживается почти во всех существующих операционных системах, в том числе в Windows, Macintosh, Linux и Solaris Unix. Он поддерживает символы почти всех современных и даже некоторых древних языков. Поэтому, если книга Excel содержит данные на иностранных языках, то рекомендую сначала сохранить её в формате Текст Юникод (Unicode Text (*txt)), а затем преобразовать в CSV, как описано далее в разделе Экспортируем из Excel в формат CSV UTF-8 или UTF-16.

Замечание: Все упомянутые форматы сохраняют только активный лист Excel.

1. Выберите папку для сохранения файла в формате CSV и нажмите Сохранить (Save).После нажатия Сохранить (Save) появятся два диалоговых окна. Не переживайте, эти сообщения не говорят об ошибке, так и должно быть.
2. Первое диалоговое окно напоминает о том, что В файле выбранного типа может быть сохранён только текущий лист (The selected file type does not support workbooks that contain multiple sheets). Чтобы сохранить только текущий лист, достаточно нажать ОК.Если нужно сохранить все листы книги, то нажмите Отмена (Cancel) и сохраните все листы книги по-отдельности с соответствующими именами файлов, или можете выбрать для сохранения другой тип файла, поддерживающий несколько страниц.
3. После нажатия ОК в первом диалоговом окне, появится второе, предупреждающее о том, что некоторые возможности станут недоступны, так как не поддерживаются форматом CSV. Так и должно быть, поэтому просто жмите Да (Yes).

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

Экспортируем из Excel в CSV с кодировкой UTF-8 или UTF-16

Если на листе Excel содержатся какие-либо специальные или иностранные символы (тильда, ударение и подобные) или иероглифы, то преобразование листа Excel в CSV описанным выше способом не сработает.

Дело в том, что команда Сохранить как > CSV (Save as > CSV) исказит все символы, кроме ASCII (American Standard Code for Information Interchange). И если на листе Excel есть парные кавычки или длинные тире (перенесённые в Excel, например, из документа Word при копировании / вставке текста) – такие символы также будут искромсаны.

Простое решение – сохранить лист Excel как текстовый файл Unicode(.txt), и затем преобразовать его в CSV. Таким образом все символы, не входящие в ASCII, останутся в целости и сохранности.

Прежде чем двинуться дальше, позвольте мне кратко пояснить главные отличия между кодировками UTF-8 и UTF-16, чтобы в каждом индивидуальном случае Вы могли выбрать подходящий формат:

• UTF-8 – это более компактная кодировка, использующая для каждого символа от 1 до 4 байт. Чаще всего рекомендуется использовать этот формат, когда символы ASCII преобладают в файле, т.к. большинство таких символов требует 1 байт памяти. Ещё одно преимущество в том, что кодировка файла UTF-8, содержащего только символы ASCII, ничем не будет отличаться от такого же ASCII-файла.
• UTF-16 использует от 2 до 4 байт для хранения каждого символа. Учтите, что не во всех случаях файл UTF-16 требует больше места в памяти, чем файл UTF-8. Например, японские символы занимают от 3 до 4 байт в UTF-8 и от 2 до 4 байт в UTF-16. Таким образом, есть смысл использовать UTF-16, если данные содержат азиатские символы, в том числе Японские, Китайские и Корейские. Существенный недостаток этой кодировки в том, что она не полностью совместима с ASCII-файлами и требуются специальные программы для отображения таких файлов. Помните об этом, если планируете импортировать получившиеся файлы из Excel куда-то ещё.

Как преобразовать файл Excel в CSV UTF-8

Предположим, у нас есть лист Excel с иностранными символами, в нашем примере – это японские имена.

Чтобы экспортировать этот лист Excel в файл CSV, сохранив при этом все иероглифы, сделаем следующее:

1. В Excel откройте вкладку Файл (File) и нажмите Сохранить как (Save as).
2. Введите имя файла, в поле Тип файла (Save as type) выберите Текст Юникод (Unicode Text (*.txt)) и нажмите Сохранить (Save).
3. Откройте созданный файл в любом стандартном текстовом редакторе, например, в Блокноте.

Замечание: Не все простые текстовые редакторы полностью поддерживают символы Юникод, поэтому некоторые из них могут отображаться как прямоугольники. В большинстве случаев, это никак не повлияет на итоговый файл, и можно просто не обращать на это внимание или выбрать более продвинутый редактор, например, Notepad++.

1. Так как в нашем текстовом Юникод файле в качестве разделителей используется символ табуляции, а мы хотим преобразовать его в CSV (разделители – запятые), то необходимо заменить символы табуляции на запятые.

Замечание: Если нет строгой необходимости получить файл именно с разделителями – запятыми, а нужен любой файл CSV, который Excel сможет понять, то этот шаг можно пропустить, так как Microsoft Excel отлично понимает файлы с разделителем – табуляцией.

1. Если всё же нужен файл CSV (разделители – запятые), то выполните в Блокноте следующие действия:

   В Блокноте результат будет приблизительно вот такой:

   

2. Кликните Файл > Сохранить как (File > Save as), введите имя для файла и в выпадающем списке Кодировка (Encoding) выберите UTF-8. Затем нажмите кнопку Сохранить (Save).
3. Запустите Проводник Windows и измените расширение файла с .txt на .csv.По-другому изменить расширение .txt на .csv можно непосредственно в Блокноте. Для этого в диалоговом окне Сохранить как (Save as) в поле Тип файла (Save as type) выберите вариант Все файлы (All files), а к имени файла в соответствующем поле добавьте «.csv», как показано на рисунке ниже.
4. Откройте файл CSV в Excel, для этого на вкладке Файл (File) нажмите Открыть > Текстовые файлы (Open > Text files) и проверьте в порядке ли данные.

Замечание: Если Ваш файл предназначен для использования за пределами Excel и формат UTF-8 является обязательным требованием, то не совершайте на листе никаких изменений и не сохраняйте его снова в Excel, поскольку это может привести к проблемам с чтением кодировки. Если какая-то часть данных не отображается в Excel, откройте тот же файл в Блокноте и в нём внесите исправления в данные. Не забудьте снова сохранить файл в формате UTF-8.

Как преобразовать файл Excel в CSV UTF-16

Экспортировать в файл CSV UTF-16 намного быстрее и проще, чем в UTF-8. Дело в том, что Excel автоматически применяет формат UTF-16 при сохранении файла как Текст Юникод (Unicode Text).

Для этого сохраняем файл при помощи инструмента Сохранить как (Save as) в Excel и затем в Проводнике Windows изменяем расширение созданного файла на .csv. Готово!

Если нужен файл CSV с запятой или точкой с запятой в качестве разделителя, замените все символы табуляции на запятые или точки с запятой соответственно в Блокноте или в любом другом текстовом редакторе на свой выбор (ранее в этой статье есть подробная инструкция, как это делается).

Другие способы преобразования файлов Excel в CSV

Описанные выше способы экспорта данных из Excel в CSV (UTF-8 и UTF-16) универсальны, т.е. подойдут для работы с любыми специальными символами и в любой версии Excel от 2003 до 2013.

Существует множество других способов преобразования данных из формата Excel в CSV. В отличие от показанных выше решений, эти способы не будут давать в результате чистый UTF-8 файл (это не касается OpenOffice, который умеет экспортировать файлы Excel в несколько вариантов кодировки UTF). Но в большинстве случаев получившийся файл будет содержать правильный набор символов, который далее можно безболезненно преобразовать в формат UTF-8 при помощи любого текстового редактора.

Преобразуем файл Excel в CSV при помощи Таблиц Google

Как оказалось, можно очень просто преобразовать файл Excel в CSV при помощи Таблиц Google. При условии, что на Вашем компьютере уже установлен Google Drive, выполните следующие 5 простых шагов:

1. В Google Drive нажмите кнопку Создать (Create) и выберите Таблица (Spreadsheet).
2. В меню Файл (File) нажмите Импорт (Import).
3. Кликните Загрузка (Upload) и выберите файл Excel для загрузки со своего компьютера.
4. В диалоговом окне Импорт файла (Import file) выберите Заменить таблицу (Replace spreadsheet) и нажмите Импорт (Import).

Совет: Если файл Excel относительно небольшой, то для экономии времени можно перенести из него данные в таблицу Google при помощи копирования / вставки.

1. В меню Файл (File) нажмите Скачать как (Download as), выберите тип файла CSV – файл будет сохранён на компьютере.

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

Сохраняем файл .xlsx как .xls и затем преобразуем в файл CSV

Для этого способа не требуется каких-либо дополнительных комментариев, так как из названия уже всё ясно.

Это решение я нашёл на одном из форумов, посвящённых Excel, уже не помню, на каком именно. Честно говоря, я никогда не использовал этот способ, но, по отзывам множества пользователей, некоторые специальные символы теряются, если сохранять непосредственно из .xlsx в .csv, но остаются, если сначала .xlsx сохранить как .xls, и затем как .csv, как мы делали в начале этой статьи.

Так или иначе, попробуйте сами такой способ создания файлов CSV из Excel, и если получится, то это будет хорошая экономия времени.

Сохраняем файл Excel как CSV при помощи OpenOffice

OpenOffice – это пакет приложений с открытым исходным кодом, включает в себя приложение для работы с таблицами, которое отлично справляется с задачей экспорта данных из формата Excel в CSV. На самом деле, это приложение предоставляет доступ к большему числу параметров при преобразовании таблиц в файлы CSV (кодировка, разделители и так далее), чем Excel и Google Sheets вместе взятые.

Просто открываем файл Excel в OpenOffice Calc, нажимаем Файл > Сохранить как (File > Save as) и выбираем тип файла Текст CSV (Text CSV).

На следующем шаге предлагается выбрать значения параметров Кодировка (Character sets) и Разделитель поля (Field delimiter). Разумеется, если мы хотим создать файл CSV UTF-8 с запятыми в качестве разделителей, то выбираем UTF-8 и вписываем запятую (,) в соответствующих полях. Параметр Разделитель текста (Text delimiter) обычно оставляют без изменения – кавычки («). Далее нажимаем ОК.

Таким же образом для быстрого и безболезненного преобразования из Excel в CSV можно использовать ещё одно приложение – LibreOffice. Согласитесь, было бы здорово, если бы Microsoft Excel предоставил возможность так же настраивать параметры при создании файлов CSV.

В этой статье я рассказал об известных мне способах преобразования файлов Excel в CSV. Если Вам знакомы более эффективные методы экспорта из Excel в CSV, расскажите об этом в комментариях. Благодарю за внимание!