• Добро пожаловать на Форум пользователей ПО АСКОН. Пожалуйста, авторизуйтесь.
 

Уважаемые пользователи,

Хотим проинформировать вас о режиме работы регистрации на нашем сайте.

Зарегистрироваться возможно в рабочие дни, с 8:00 до 20:00 (мск).

Если у вас возникнут вопросы или потребуется дополнительная информация, не стесняйтесь обращаться к нашей службе поддержки. Вы можете связаться с нами по указанным контактным данным на нашем сайте.

Благодарим вас за понимание и сотрудничество. Мы ценим ваше терпение и стремимся предоставить вам лучший опыт использования нашего сервиса.

С уважением,
Команда Ascon

использование ms office в работе компаса

Автор lik, 22.05.07, 16:27:18

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

lik

кто поможет перевести таблицу из excel в  формат табличного графика (Ftt) библиотеки построения графиков FTDraw, чтоб компас мог строить функционально зависимые кривые

Bordes

Цитата: lik от 22.05.07, 16:27:18
кто поможет перевести таблицу из excel в  формат табличного графика (Ftt) библиотеки построения графиков FTDraw, чтоб компас мог строить функционально зависимые кривые


Для таблицы из двух столбиков, возможно поможет вот такой макрос:

Sub conv()

Dim r As Range

Set r = Application.Selection

Count = r.Count / 2

Open "GrafDat.ftt" For Output Access Write As #1

Print #1, "[InitialData]"
Print #1, "RegCount=" + CStr(Count + 1)
Print #1, "[TableData]"

For i = 1 To Count

Print #1, "X" + CStr(i) + "=" + CStr(r.Cells(i, 1).Value)
Print #1, "F" + CStr(i) + "=" + CStr(r.Cells(i, 2).Value)
Next i

Close #1

End Sub

Использование:
Выделить два столбца данных (слева Х справа F) и запустить макрос.
При нормальном завершении будет создан файл с GrafDat.ftt с заданными данными. !!!! Возможно в этом файле придется заменить запятые в числах на точки !!!! И все.

Slaviation


llex