Рисование линейки

[strannick]

Добрый день, уважаемые форумчане!
Имеется таблица с данными замеров следующего вида:
Линейка 1
Деление 0 10 20 30 40 50 60 70 80 90 100
Высота (мм) 7 11 8 9 10 9 12 12 9 8 8

Необходим макрос, который бы рисовал по заданным данным простой рисунок в виде ученической линейки с делениями, расположенной вертикально с обозначениями делений (верхняя строка) и заданным расстоянием между ними (нижняя строка).

Что посоветуете в этом плане? Или стоит искать решение посредством макросов в кореле?

Заранее спасибо!!!

[EducatedFool]

Ну зачем для такой простой задачи Корел привлекать...

можно макросом в Excel нарисовать все эти линии,
можно ещё проще - при помощи диаграммы (без всяких макросов)

Покажите пример файла Excel с исходными данными и результатом.

[strannick]

Да я, в общем-то, и не сомневался, но, как-то, не знаю, осторожничал, что ли. Вопрос в том, чтобы соблюсти заданное расстояние между делениями в миллиметрах (точность - 2 знака п.з.)
Прикрепил прототип таблички с данными. Таблица будет пополняться данными замеров для Линеек. Размерность таблицы ориентировочно 500 строк. Размерность по столбцам - до 200. Под табличкой грубо нарисовал кусочек рисунка.)))))

[IgorGO]

между шрихами расстояия пропорциональны указанным высотам.
(и без макросов обошлось)

[strannick]

IgorGO не могли бы Вы прокомментировать вот эту формулу

=ИНДЕКС(4:4;2+ЦЕЛОЕ((СТОЛБЕЦ()-1)/3))

которая тут используется для подсчета расстояний между делениями?

[IgorGO]

добавил немного функциональности в формулу:

=ИНДЕКС($1:10;ПОИСКПОЗ($A13;$A$1:$A10;)+1;2+ЦЕЛОЕ((СТОЛБЕЦ()-1)/3))

теперь достаточно указать название линейки (линейка 1, линейка 2, линейка 3) и получить на выходе шкалу, для выбранной линейки.
формула привязана с расположению данных, и к сожалению не настроиться сама если добавить (удалить колонки перед данными).
ИНДЕКС
в диапазоне $1:10
выбираем строку с данными: ПОИСКПОЗ($A13;$A$1:$A10+1
потом столбец с данными: 2+ЦЕЛОЕ((СТОЛБЕЦ()-1)/3)
2 + потому что исходные начинаются с 3-й колонки (2 добавляем всегда)
/3 - потому что для каждого у неоходимо три линии нарисовать
ЦЕЛОЕ((СТОЛБЕЦ()-1)/3) - это как раз какое из значений интересует (1-е, 2-е, 3-е...).

или формулу можно записать так:

=ИНДЕКС($1:10;ПОИСКПОЗ($A13;$A$1:$A10;)+1;ПОИСКПОЗ(ЦЕЛОЕ((СТОЛБЕЦ()-1)/3)*10;$1:$1;))

суть формулы таже, что и раньше.

в файле часть записано так, часть по другому.

[strannick]

Спасибо огромное. А то дело дошло до воплощения, и я запнулся слегка. Буду разбираться)))