KAIU. Программа "Аппроксимация таблично заданной функции" (VBA, Excel) Паучок

Программа "Аппроксимация таблично заданной функции" (VBA, Excel)

Главная » Мои программы » Аппроксимация таблично заданной функции (VBA, Excel)

 

Аппроксимация таблично заданной функции v1.0 Аппроксимация таблично заданной функции v1.0      Программа (или точнее файл в которой код этой программы на VBA) предназначена для упрощения получения координат точек функции(-ий) заданной в виде рисунка. Такие рисунки бывают в старых книгах, документациях. Вроде рисунок есть, а табличных данных нет и надо много времени сидеть, измерять, вводить эти данные в таблицы, чтобы потом можно было подобрать приближенную функцию и использовать в вычислительной технике.
Пример рисунка для аппроксимации Запустив файл "AprTzfInP.xlsm" на исполнение и разрешив макросы в Excel-е, можно увидеть вверху документа кнопку "Получить данные из рисунка графика". Нажав на эту кнопку вы запустите на показ форму сделанную на VBA, преимущество такого подхода в том, что почти любой человек может разобраться в таком программировании. На данной форме надо осуществить выбор рисунка, задать левую и правую границу на рисунке графика, для чего просто кликается по рисунку и координаты сами вводятся. Так же верх, низ, задаются числовые значения графика (подписаны на осях).
После, можно нажать на кнопку ниже, что приведет к отображению второй вкладки с рисунком, где и надо кликать на точки графика и, таким образом, упрощенно собирать данные. На третьей вкладке вы увидите сами эти координаты, которые можно пересчитать в значения и после вставить по нужной позиции листа Excel.
В самом файле приведен сложный пример, когда данных не много, но много функций. Для каждого графика подобран тренд (аппроксимация), а формула показана на самом графике. Имея уже эти формулы можно получить любое количество промежуточных данных, использовать эти формулы где-то в вычислениях, программировании и тд.


Скачать с этого сайта программу "Аппроксимация таблично заданной функции" (VBA, Excel) v1.0 [72 Kb]










На главную