Как записать координаты и параметры фигур перед удалением

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Как записать координаты и параметры фигур перед удалением - Мир MS Excel

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Как записать координаты и параметры фигур перед удалением (Макросы/Sub)

Как записать координаты и параметры фигур перед удалением

SkyGreen

Дата: Четверг, 06.08.2020, 07:40 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 83

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

Приветствую всех.
У меня есть макрос где размещаются на листе разные объекты.
Но вот - координаты размещения этих объектов - не знаю как поставить.

Как разместить объекты не где-то , а по координатам представленным в таблице (столбцы H:I) ?

К сообщению приложен файл: 5892826.xls (49.5 Kb)

Ответить

gling

Дата: Четверг, 06.08.2020, 10:15 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2661

Репутация: 747 ±

Замечаний: 0% ±

2010

Здравствуйте.
Может так?[vba]

Код

                With ActiveSheet.Shapes.AddShape(tip, 20 + I * 10, 10 + I * 10, arr(I, 4), arr(I, 3))
                    .DrawingObject.Caption = arr(I, 5)
                    .Name = arr(I, 2) & " " & arr(I, 1)
                    .Left = arr(I, 6)
                    .Top = arr(I, 7)
                End With

[/vba]

ЯД-41001506838083

Сообщение отредактировал gling - Четверг, 06.08.2020, 10:15

Ответить

SkyGreen

Дата: Четверг, 06.08.2020, 17:46 | Сообщение № 3

Группа: Пользователи

Ранг: Участник

Сообщений: 83

Репутация: 0 ±

Замечаний: 20% ±

Excel 2016

gling, спасибо

Ответить

Как записать координаты и параметры фигур перед удалением (Макросы/Sub)

Страница 1 из 1
1