Сохранение в .txt с разделителем - точка с запятой [UTF-8]

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Сохранение в .txt с разделителем - точка с запятой [UTF-8] (Макросы/Sub)

MfeaR

Дата: Суббота, 28.02.2015, 17:05 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 3

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

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

[vba]

Код

Sub users_save()
         Sheets("Users").Select
         ThisWorkbook.Sheets("users").Copy
         With ActiveWorkbook
         .SaveAs Filename:="C:\source\files\users.txt", FileFormat:=xlCSV, _
         CreateBackup:=False
         .Close SaveChanges:=False
         End With

End Sub

[/vba]

При попытке сохранить в формате "Текстовый файл в формате Unicode" опять сталкиваюсь с проблемой, что разделение в виде запятой, а мне нужно в виде точки с запятой.