Назначение координаты для элемента фигуры

Старая форма входа

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Назначение координаты для элемента фигуры (Макросы/Sub)

димитрий2

Дата: Вторник, 26.03.2019, 16:32 | Сообщение № 1

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

Ранг: Прохожий

Сообщений: 5

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

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

Excel 2013

Доброго дня.
Помогите решить непростой вопрос, уважаемые форумчане.

Я макросом создаю на листе такую вещь как облачко диалога:
[vba]

Код

Sub Макрос1()

    ActiveSheet.Shapes.AddShape(msoShapeRoundedRectangularCallout, 305.25, 125.25, _
        139.5, 103.5).Select
    Selection.ShapeRange.Adjustments.Item(1) = 1.58199
    Selection.ShapeRange.Adjustments.Item(2) = 0.84239
    Range("A1").Select
End Sub

[/vba]

С размещением основного объекта - никаких проблем - достаточно указать координаты, высоту и ширину.
А вот с таким элементом как выноска - сложнее.
Команда Selection.ShapeRange.Adjustments.Item(1) - видимо оперирует какими-то относительными величинами, а не координатами.

Ответьте, если кто знает - как привязать точку выноски - к конкретной координате указанной в ячейках F3, G3 ?

Потому что сейчас - очень сложно понять где окажется конец выноски - если пользоваться командой Selection.ShapeRange.Adjustments.Item(1) = 1.58199, оперирующей какими-то относительными величинами.

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

Сообщение отредактировал димитрий2 - Вторник, 26.03.2019, 16:33

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Назначение координаты для элемента фигуры (Макросы/Sub)

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