Здравствуйте, Алексей! Выложите, пожалуйста, пример файла с турецкими символами (можно пустого), при чтении имени которого через FSO искажается название. Я не встречал подобного.
Эта проблема возникает из-за того, что у Вас две формы находятся в одном месте экрана и форма UserForm1 все время открыта. Сдвиньте сразу после открытия форму UserForm1 куда-нибудь влево и жизнь наладится. Для устранения этого бага открывайте формы по очереди.
Sub TestWidth()
Dim i As Long
With Range("A1")
For i = 1 To 3
.EntireColumn.ColumnWidth = .EntireColumn.ColumnWidth * .Height / .Width
Next i
End With
End Sub
Какого размера у Вас фрагмент csv-файла? Что происходит, когда в сообщении Вы нажимаете "Загрузить файлы"? Не обязательно создавать новые сообщения - Вы можете изменять (редактировать) предыдущие.
Abdurashid Umarov написал: Через макрос, который написан в файле excel, открываю csv-файл и копирую все данные и вставляю в определённый лист в excel.
Для того, чтобы мы могли ответить на вопрос, необходимо приложить файл Excel, содержащий указанный макрос, и файл csv, содержащий фрагмент исходных данных.
Необходимо приложить файл с макросом, который у Вас не работает и указать, какие действия нужно произвести, чтобы убедиться в неработоспособности макроса. Всё остальное - из области гаданий...
Выделил ячейку H6 и применил Ваш макрос. Отработало в соответствии с написанным. Если ячейка H6 пуста и Вы начинаете ввод текста, то символов не видно, пока не нажмете Enter. УФ работает.
Вариантов для CallBack функций в VBA, кроме Application.Run, немного. Можно поместить все функции для обработки данных в модуль класса и вызывать их по имени через CallByName.
Твердый написал: Пробовал через настройки : Параметры - Данные - Отключить автоматическую группировку дат. Работает, но только на моем компе, как только этот файл открывают на другом с уже запущенными екселями, при добавлении поля Дата, сгруппированные поля так же снова добавляются.
И те, кто не прогуливал, попадаются на эту удочку.