| Написать комментарий | |
Сергей Пилипенко
04-11-2010 19:15 (ссылка)
Re: как повернуть линиию относительно любой опорной точки
Например так: ActiveSheet.Shapes("Line 1").Nodes.SetPosition 1, 204#, 156# Но ИМХО рисование эл. схем в Эксе дело неблагодарное. Пользуйтесь Автокадом. Там и Бейсик встроен и связь с таблицами Эксель.
ответить
(с цитатой)
1 комментарий
Свернуть
Сергей Пилипенко
05-11-2010 08:52 (ссылка)
Re: как повернуть линиию относительно любой опорной точки
Если в экселе, то только такой вариант:
Selection.ShapeRange.Item(1).Left = 96.75
Selection.ShapeRange.Item(1).Width = 130.5
Selection.ShapeRange.Item(1).Top = 219#
Selection.ShapeRange.Item(1).Height = 6#
И вспоминаем тригонометрию...
Selection.ShapeRange.Item(1).Left = 96.75
Selection.ShapeRange.Item(1).Width = 130.5
Selection.ShapeRange.Item(1).Top = 219#
Selection.ShapeRange.Item(1).Height = 6#
И вспоминаем тригонометрию...
| Написать комментарий | ||
