Тема: Как "пронумеровать" выбраные блоки

суть проблемы в следующем:
на чертеже есть, например, 15 одинаковых блоков, у этих блоков есть атрибут ( если правильно выражаюсь ) NUM. Это грубо говоря, текст, отображающийся около блока.
Нужно сделать так, чтобы пользователь выбрал их ( блоки, тыкая по ним курсором) все 15, и этим самым NUMам присвоились бы значения,  например, от 1 до 4,т.е. 1-2-3-4, 1-2-3-4, 1-2-3-4, 1-2-3.
Я пока не сильна в VBA , поэтому не исключено, что глупость спросила... но у меня как-то на этом застопорилось все :(
Помогите, пожалуйста.

Re: Как "пронумеровать" выбраные блоки

> mel
Считайте сначала атрибут(ы) выбранного блока в массив (при помощи GetAttributes), а затем, при изменении значений массива, будут меняться и значения атрибутов. Пример можете посмотреть в моем посте вот здесь:
https://www.caduser.ru/forum/topic9534.html

Re: Как "пронумеровать" выбраные блоки

Для Вас, собственно, будет полезна только вот эта часть:

        ArAtr = Bltmp.GetAttributes
        ArAtr(0).TextString = n

где n и будет принимать в процессе эти самые ваши 1-2-3-4..

Re: Как "пронумеровать" выбраные блоки

Спасибо, будем осмыслять :)

Re: Как "пронумеровать" выбраные блоки

> mel
Хотел выслать готовый вариант, но не шибко
нравится когда, выкладывают фальшивый адрес...

Re: Как "пронумеровать" выбраные блоки

епрст... @ пропустила когда печатала...
прошу прощения, если выразила неуважение.
( могу даже подтвердить что это мой адрес - если хотите )

Re: Как "пронумеровать" выбраные блоки

> mel
Ну вот другое дело, файл ушел
~'J'~