Рисование в Word

Алексей34
Дата: 08.02.2016 00:21:29
Здравствуйте,
Помогите решить проблему
Есть каталог координат X и Y Нужно нарисовать по координатам фигуру в Word - e
Чтобы получилось что-то наподобие кадастрового плана
Номер т X Y
1 4261529.30211 3151440.04995
2 4261467.36651 3151408.51321
3 4261354.35135 3151350.96091
4 4261355.84447 3151335.15754
5 4261359.0122 3151323.99515
6 4261452.5013 3151185.39553
7 4261541.46156 3151192.21699
8 4261550.27179 3151185.61558
9 4261576.18278 3151145.12693
10 4261581.37158 3151113.53017
11 4261574.01322 3151076.31222
12 4261570.45778 3151051.897
13 4261570.73001 3151035.11342
14 4261564.84827 3151023.60095
15 4261514.76688 3151001.54624
1 4261529.30211 3151440.04995
Predeclared
Дата: 08.02.2016 01:07:36
Как-то так попробуйте:
    With Documents(1).Shapes.AddLine(81.75, 47.75, 41.5, 68.25)
        .Nodes.Insert 1, msoSegmentLine, msoEditingAuto, 45.75, 28.75
        '...
    End With
Predeclared
Дата: 08.02.2016 02:12:16
Что-то у меня двойка по вашим точкам нарисовалась.
:)
Здесь я рисовал отдельные линии для каждого шага, так проще.