Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Курилка
Страницы: 1
RSS
VBA. Word. Как макросом составить последовательность Frames, а затем расставить содержимое в данной последовательности
 
#1
31.07.2025 02:56:27
Здравствуйте.
Помогите решить проблему в VBA.

В документе MS Word - находится множество рамок, в которых есть различное содержимое (либо текст, либо рисунки )
Эти рамочные элементы - VBA называет  Frames.

Задача - вынести это содержимое из рамок.
Использую код:
Код
Sub Макрос1()
    Dim fr As Frame
    For Each fr In ThisDocument.Frames
        fr.Delete
    Next fr
End Sub
Этот код удаляет рамки, но содержимое рамок - просто вываливает в документ word - в хаотическом порядке (перемешивая их в кучу).
Хотя нужен именно порядок размещения, а не просто удаление Frames.

Как макросом составить изначальную последовательность Frames в документе (снизу вверх, в том порядке как они отображаются в документе), а затем удалить Frames и расставить содержимое рамок в построенной последовательности ?
Изменено: Sanja - 31.07.2025 04:15:18
 
 
 
#2
31.07.2025 03:46:57
Это форум по Excel
Согласие есть продукт при полном непротивлении сторон
 
 
 
#3
31.07.2025 05:18:48
Sanja, а тут тоже VBA
Помогите
 
 
 
#4
31.07.2025 05:48:10
Возможно что такие frames обеспечивают точное позиционирование. Может быть просто границы у них убрать или сделать невидимыми.
И вы снова тему раскидываете по разным форумам одновременно, а о дублях не предупреждаете.
Изменено: nilske - 31.07.2025 05:54:10
 
 
 
#5
31.07.2025 08:50:47
Добрый день!

Может как-то так...
Код
Sub Макрос1()
    Dim fr As Frame, rw As Long: rw = 0
    For Each fr In ThisDocument.Frames
        Dim st As String
        st = fr.Range.Text
        
        Dim rng As Range
        Set rng = ThisDocument.Characters.Last
        
        rng.Text = st & vbNewLine
    Next fr
End Sub
 
 
 
#6
31.07.2025 12:00:32
Dmitriy XM, спасибо.  Не работает.
Запустил макрос - ничего не изменилось - рамки по-прежнему висят в документе.
 
 
 
#7
01.08.2025 12:33:16
Помогите с макросом
 
 
 
#8
01.08.2025 16:01:37
Обратитесь на форум по VBA. Word.
Согласие есть продукт при полном непротивлении сторон
 
 
 
#9
01.08.2025 18:33:23
Sanja, а это где ?
 
 
 
#10
06.08.2025 11:41:29
Помогите, люди добрые.
 
 
 
#11
06.08.2025 12:45:30
Цитата
visors16 написал:
Помогите, люди добрые.
нужны не только добрые, но и компетентные в теме. Если ответа нет, значит никто не знает или не имеет возможности/желания разбираться. Поднимать тему более не рекомендую. Ищите иные профильные  ресурсы.
По вопросам из тем форума, личку не читаю.
 
 
 
Страницы: 1
Читают тему
Наверх