Поиск
Автор: Андрей VG. "JayBhagavan написал:
rs.Charset = "windows-1251""Добрый день, Иван.
Это не поможет. Кодировка текстового файла UTF-8BOM. Не встречалось, чтобы access SQL драйвера для работы брали такую кодировку текстовых файлов. Лучше смотреть в сторону Power Query.
Изменен: 23.07.2021
Читать сообщение на форуме или сайте.Автор: Lizard2. Евгений Смирнов, спасибо.
Но макрос зачем-то вписывает лишний знак пробела в самом начале.
И в моем файле - кодировка текстового файла - UTF-8, а не ANSI
Изменен: 15.11.2023
Читать сообщение на форуме или сайте. ... кодировки) текстового файла
' В качестве параметров функция получает путь filename$ к текстовому файлу,
' и название кодировки ... DestCharset$ (в которую будет переведён файл)
' ... filename$, 2 ' сохраняем файл уже в новой кодировке
' .Close
End With
... выбора текстовых файлов
.FilterIndex = 1 'устанавливаем тип файлов по умолчанию - Text files(Текстовые файлы)
... .InitialFileName = ThisWorkbook.Path 'назначаем папку отображения и имя файла ...
Изменен: 27.09.2021
Читать сообщение на форуме или сайте. ... кодировки) текстового файла
' В качестве параметров функция получает путь filename$ к текстовому файлу,
' и название кодировки ... DestCharset$ (в которую будет переведён файл)
' Функция ... кодировку
.Open
.LoadFromFile filename$ ' загружаем данные из файла
FileContent$ = .ReadText ' считываем текст файла ... $
.SaveToFile filename$, 2 ' сохраняем файл уже в новой кодировке
.Close
End With ...
Изменен: 18.01.2022
Читать сообщение на форуме или сайте. ... . Доброго здоровья!
Вопрос перекодировки файлов у меня возник года 3 ... -4 назад. Решил сделать файл Эксель для хранения контактов.(Для ... загрузки их в телефон нужен файл Vcard, написал макросы экспорта ... итоге оказалось, что телефон хочет кодировку UTF-8. (Наотрез отказался от ... так и не согласился перекодировать файлы в UTF-8 всяко уговаривал ... в режиме прямого доступа к текстовым файлам отрезать эту BOM. В итоге ... этого объекта. В файле функция и процедура для перекодировки текстового файла.
Private Function ...
Изменен: 28.01.2022
Читать сообщение на форуме или сайте. ... кодировки) текстового файла
' В качестве параметров функция получает путь filename$ к текстовому файлу,
' и название кодировки ... DestCharset$ (в которую будет переведён файл)
' Функция ... $
.SaveToFile filename$, 2 ' сохраняем файл уже в новой кодировке
.Close
End With ...
Изменен: 15.02.2015
Читать сообщение на форуме или сайте. ... кодировки) текстового файла
' В качестве параметров функция получает путь filename$ к текстовому файлу,
' и название кодировки ... DestCharset$ (в которую будет переведён файл)
' Функция ... Filename$, 2 ' сохраняем файл уже в новой кодировке
.Close
End With
ChangeFileCharset ...
Изменен: 10.03.2018
Читать сообщение на форуме или сайте. ... $) As Boolean
' функция перекодировки (смены кодировки) текстового файла
' В качестве параметров функция получает ... путь filename$ к текстовому файлу,
' Функция возвращает TRUE, если ... кодировку
.Open
.LoadFromFile filename$ ' загружаем данные из файла
FileContent$ = .ReadText ' считываем текст файла ... в переменную FileContent$
.Close
.Charset = DestCharset$ ' назначаем новую кодировку " ...
Изменен: 04.06.2018
Читать сообщение на форуме или сайте.Автор: Евгений Смирнов. dim284 Вот файл с вашими текстовыми файлами у меня все корректно отрабатывает Изменил только кодировку.
Изменен: 21.10.2023
Читать сообщение на форуме или сайте. ... .Frolov, вы бы приложили парочку текстовых файлов, а мы бы подумали как ... помочь. Если у вас в текстовых файлах по 50.000 слов, то ... тем, что он понимает многие текстовые кодировки. На форуме сидят много специалистов ... .к. никто не видит ваши текстовые файлы.
Изменен: 28.02.2021
Читать сообщение на форуме или сайте. ... ."
Во вложении Ваш текстовый файл в кодировке ANSI с лидирующими пробелами в ... ;quot;C:\", откройте файл "Пример.xlsm& ...
Изменен: 12.10.2018
Читать сообщение на форуме или сайте.Автор: ikki. а в какой кодировке этот файл? у меня "по дефолту" кракозябры какие-то открываются...
Изменен: 11.10.2014
Читать сообщение на форуме или сайте. ... кодировки) текстового файла
' В качестве параметров функция получает путь filename$ к текстовому файлу,
' и название кодировки ... DestCharset$ (в которую будет переведён файл)
' ... $, 2 ' сохраняем файл уже в новой кодировке
.Close
End With
... выбора текстовых файлов
.FilterIndex = 1 'устанавливаем тип файлов по умолчанию - Text files(Текстовые файлы)
... .InitialFileName = ActiveWorkbook.Path 'назначаем папку отображения и имя файла ...
Изменен: 27.12.2021
Читать сообщение на форуме или сайте. ... кодировки) текстового файла ' В качестве параметров функция получает путь filename$ к текстовому файлу, ' и название кодировки ... DestCharset$ (в которую будет переведён файл) ' Функция ... кодировку .Open .LoadFromFile filename$ ' загружаем данные из файла FileContent$ = .ReadText ' считываем текст файла ... filename$, 2 ' сохраняем файл уже в новой кодировке .Close End With ChangeFileCharset ...
Изменен: 20.03.2023
Читать сообщение на форуме или сайте. ... процесс выглядит так: берем последний файл Excel, который состоит из одного ... ... Текстовый файл с разделителем табуляция".
Полученный файл txt открывается через notepad++ изменяется кодировка ... не перекладывая туда-сюда файл?
Основной вопрос в кодировке. Как сохранить сразу ... после сохранения в txt поменять кодировку не открывая руками файл?
Изменен: 21.11.2023
Читать сообщение на форуме или сайте. ... = 1 'устанавливаем тип файлов по умолчанию - Text files(Текстовые файлы) .InitialFileName = ThisWorkbook.Path ... (смены кодировки) текстовоq строки ' В качестве параметров функция получает текстовую строку txt ... $, ' и название кодировки DestCharset$ (в ... Then .Charset = SourceCharset$ ' указываем исходную кодировку .Open .WriteText txt$ .Position = 0 ... .Charset = DestCharset$ ' назначаем новую кодировку ChangeTextCharset = .ReadText .Close End With ...
Изменен: 24.01.2023
Читать сообщение на форуме или сайте. ... : realmen80. В папке есть много файлов ".csv".
При открытии ... такого файла в Эксель через "Данные" из "Текстового/csv файла ... " показывает кодировку win-1251 и текст ... открытия не читается....
Когда выбираю кодировку UTF-8 - текст стает нормальным ... возможность в автоматическом режиме пересохранить кодировку во всех файлах в папке?
Изменен: 28.06.2023
Читать сообщение на форуме или сайте. ... открытии XML файлов в PQ как текстовых документов не могу подобрать кодировку для ... корректного отображения кириллицы. Если окрыть этот файл, например ... корректно отображаются символы при открытии файла в PQ как таблицы XML ... именно как к текстовому файлу для извлечения данных. Подскажите как подобрать/исправить кодировку?
Изменен: 08.01.2022
Читать сообщение на форуме или сайте. ... .
1. Вывести текстовый файл в "родной" кодировке (если она ... (UTF16, Windows-1200). Про изменение кодировки файла макросом можно, например, посмотреть здесь ... Scripting.FileSystemObject сразу писать в текстовый файл в кодировке Unicode.
Изменен: 18.01.2018
Читать сообщение на форуме или сайте. ... необходимо:
выгрузить данные в текстовый файл кодировки utf-16 (номер кодировки 1200, Unicode). К ...
с помощью ADODB.STREAM изменить кодировку текстового файла с utf-16 на utf ...
Изменен: 29.05.2018
Читать сообщение на форуме или сайте.Автор: New. Sub Test()
Dim blResult As Boolean
blResult = SaveTextToFile(Range("A1"), "C:\Temp\test.txt", "ANSI")
End Sub
Function SaveTextToFile(ByVal txt$, ByVal filename$, Optional ByVal encoding$ = "windows-1251") As Boolean
'https://excelvba.ru/code/SaveTextToFile
' функция сохраняет текст txt в кодировке Charset$ в файл filename$
Dim FSO As Object, ts As Object, binaryStream As Object
On Error Resume Next
Err.Clear
Select Case encoding$
Case " ...
Изменен: 20.11.2021
Читать сообщение на форуме или сайте. ... , прошу помощи.
Макрос считывает имена файлов в указанной папке.
На ПК ... , на другом во время обработки файлов, в именах которых присутствует буква ... ': не удалось найти файл ...\беи?сболки..xlsx".
Sub ... error '1004': не удалось найти файл xFile"
Set act_wb = ActiveWorkbook ...
Пробовал хардово заменять в имени файла "и~?" на " ... кодировке, в интернете нашёл только примеры исправления кодировки содержимого и в основном текстовых файлов ...
Изменен: 16.05.2022
Читать сообщение на форуме или сайте. ... версий метод PublishObjects.Publish пишет текстовый файл в кодировке UTF-8 (ранее - в ... кодировке Windows по умолчанию).Ошибка возникает при чтении созданного указанным методом файла ...
Изменен: 20.08.2021
Читать сообщение на форуме или сайте. ... по последнюю занятую ячейку в текстовый файл на диске С:Sub СОХРАСТ ... сохраняет по умолчанию текст в кодировке Windows 1251.
У меня в ... сохраняются знаками "?" в текстовом файле.
Через запись макросов удалось вытащить ... сохранения занятых ячеек столбца в текстовый файл?
Файл для наглядности и скрины текста ... кого не откроется) прилагаю вложением.
Файлы удалены: превышение допустимого размера вложения ...
Изменен: 15.04.2015
Читать сообщение на форуме или сайте. ... VG. "Zhukov_K написал:
своего файла)"Вы бы пример своего ... подозрение, высказанное выше, что это текстовый файл у которого просто поменяли расширение ... не глядя, без указания кодировки провели импорт текстового файла и сохранили как xslx ...
Изменен: 28.04.2016
Читать сообщение на форуме или сайте. ... таблицу необходимо сохранить в качестве текстового файла с разделителями табуляции (любой другой ... подходит). При сохранении файла в нужном формате устанавливается кодировка ANSI, из-за ... .
Редактировать отдельные символы в конечном файле не представляется возможным (количество данных ...
Изменен: 01.11.2015
Читать сообщение на форуме или сайте. ... прошедшим!
Проблема следующая, формирую xml файл, по карте, с рандомным именим ... как-нибудь открыть как xml файл, и заменить в нем ns1 ... русского алфавита. Пробовал открывать как текстовый файл, заменяет, работает, НО только на ... множество функций по смене кодировки текста, самого файла, но либо меняет неймспэйсы ...
Изменен: 24.02.2019
Читать сообщение на форуме или сайте. ... подправить, что данные в правильной кодировке записывались в лист UTF-8Attribute ... ;
End Sub
Sub ЗагрузитьТекстовыйФайлВНовуюКнигу()
' текстовый файл с разделителем "пробел" ... ByVal Title$ = "Выберите файл для обработки", _
Optional ... _
Optional ByVal FilterDescription$ = "Текстовые файлы", _
Optional ByVal FilterExtention ... As Range
' Функция запрашивает имя файла (текстового, CSV, и т.п.), обрабатывает ...
Изменен: 28.04.2016
Читать сообщение на форуме или сайте. ... ;
Ниже код макроса, также вложил текстовый файл с кодом.
/**
* Функция замены текста ... ($dir)) !== false){ // перебираем пока есть файлы
if($file != "." && $ ... ($folderName."/".$file)){ // если файл
$contentFile = file_get_contents($folderName."/& ... quot;.$file); // открываем файл
//$contentFile = iconv("windows- ... ", $contentFile); // для работы с файлами в кодировке windows-1251
$contentFile = ...
Изменен: 18.07.2022
Читать сообщение на форуме или сайте. ... макрос, переносящий текст из txt-файла в xls (причем раскидывает его ... текстовые файлы)
Но он почему-то его переносит вот в такой странной кодировке ...
Изменен: 15.09.2019
Читать сообщение на форуме или сайте.