проблема с neuroshell2 - страница 2

jartmailru спасибо конечно но мне бы хотелось файл в формате XLS с текстовым файлом (txt) я более или менее разобрался,он нормально импортируется без ошибок. Ошибки выдаются на файл XLS

Так что, Вам не нравится сохранять файл Excel в txt?

Это действительно неприятно, я попробовал. 

Дело в том, что при сохранении выскакивает как минимум два предупреждения

и потом приходится опять сохраняться как xls. 

Это не лень... так можно сделать один, ну два раза.

.

Вероятно, NS2 хочет Excel файлы старого формата- типа Excel 97 или 2000 :-)

.

Слегка через ж%, но можно написать макрос типа такого и прилепить его к кнопке в самом Excel :-) :

Public Function FileExists(Fname As String) As Boolean
If Fname = "" Or Right(Fname, 1) = "\" Then
  FileExists = False: Exit Function
End If
FileExists = (Dir(Fname) <> "")
End Function

Sub Макрос1()
    
    ChDir "P:\"
    
    ' убиваем временную копию
    If FileExists("P:\2x2-temp.xls") Then Kill "P:\2x2-temp.xls"
    
    ' создаем временную копию
    ActiveWorkbook.SaveAs Filename:="P:\2x2-temp.xls", FileFormat:=xlNormal, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
    
    ' удаляем текстовый файл
    If FileExists("P:\2x2.txt") Then Kill "P:\2x2.txt"
    
    ' удаляем excel файл
    If FileExists("P:\2x2.xls") Then Kill "P:\2x2.xls"
    
    ' сохраняем как текст
    ActiveWorkbook.SaveAs Filename:="P:\2x2.txt", FileFormat:=xlText, _
        CreateBackup:=False
    
    ' сохраняем обратно как Excel
    ActiveWorkbook.SaveAs Filename:="P:\2x2.xls", FileFormat:=xlNormal, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
End Sub

Нет. Т.к. у меня NS2 по аглицки, т.к. во времена оные это (русифицированность) также могла быть причиной ошибок

У меня Excel 2003 (тоже из прынцыпа), соответственно какие рюшечки/как и куда прописывает 2007ой не знаю. Как вариант - попробуйте сохранять в формате "5.0-95".

Это не выход. Вы убедитесь, что у меня все работает, не больше. (Никакими уловками/извращениями - кроме "системной запятой-разделителя" - не смог добиться именно такой!!! ошибки. Максимум - предупреждения о не понимании "рускоязычных функций" с последующей загрузкой правильных результатов). Тем не менее...