Как макросом убрать все рамки в документе

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

Dalm

Дата: Пятница, 25.07.2025, 06:03 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 132

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

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

Excel 2019

Здравствуйте.
Помогите решить проблему.

По документу расставлены элементы в рамках (либо текст, либо картинки).
Эти элементов в рамках - очень много.
Если щелкнуть по граница рамок - то появляется вот такое меню (как на скриншоте):

Как макросом удалить все имеющиеся рамки в документе (но чтобы текст и картинки - шли так же по порядку, а не перемешивались) ?

К сообщению приложен файл: 2354346456.docx (134.3 Kb) · 3322127.png (20.8 Kb)

Сообщение отредактировал Dalm - Пятница, 25.07.2025, 23:12

Ответить

Pelena

Дата: Пятница, 25.07.2025, 08:53 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19525

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

Замечаний: ±

Excel 365 & Mac Excel

Здравствуйте.
Попробуйте так
[vba]

Код

Sub Макрос1()
    Dim fr As Frame
    For Each fr In ThisDocument.Frames
        fr.Delete
    Next fr
End Sub

[/vba]

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Dalm

Дата: Пятница, 25.07.2025, 18:59 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 132

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

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

Excel 2019

Pelena, не работает.
Этот макрос после срабатывания - весь текст перемешал в хаотическом порядке.

(Картинки почему-то стали отображаться в самом низу.)

К сообщению приложен файл: 6616819.png (86.1 Kb)

Сообщение отредактировал Dalm - Пятница, 25.07.2025, 18:59

Ответить

Pelena

Дата: Пятница, 25.07.2025, 22:23 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 19525

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

Замечаний: ±

Excel 365 & Mac Excel

Вы просили убрать рамки.
Макрос именно это делает.
Если не так, уточните задачу

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Dalm

Дата: Пятница, 25.07.2025, 23:13 | Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 132

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

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

Excel 2019

Pelena, уточнил.
Как макросом удалить все имеющиеся рамки в документе (но чтобы текст и картинки - шли так же по порядку, а не перемешивались) ?

То есть наверное макросу нужно как-то определить - в каком порядке эти элементы в рамках - изначально стояли.

Ответить

Как макросом убрать все рамки в документе

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