У меня есть следующий (упрощенный) код VBA, который демонстрирует проблему при изменении размера отчета и его элементов управления из модуля. Для воспроизведения создайте новую пустую базу данных, добавьте таблицу и отчет, а затем добавьте этот код в новый модуль:
.Public Sub ResizeReport()
Dim rr as Report
Dim cc as Control
Set rr = Screen.ActiveReport
For Each cc in rr.Controls
cc.Width = 1 * 1440
Next
rr.Width = 5 * 1440
End Sub
Если я открою отчет в Design View
и запущу макрос, изменения останутся, когда я переключусь на другие представления (например, Report View
, Layout View
или Print Preview
). Однако, если я открою отчет в Layout View
и запущу макрос, размер отчета и его элементов управления изменится, но как только я изменю режим просмотра, отчет вернется к своему состоянию до изменения размера.
Обратите внимание, что эта проблема не возникает, если я вручную изменяю размер отчета/элементов управления с помощью маркеров перетаскивания или Property Sheet
в Layout View
.
Есть ли команда, которую мне нужно выполнить после изменения размера отчета/элементов управления из VBA, находясь в Layout View
, чтобы изменения закрепились? Или мне следует изменить размер отчета/элементов управления, используя разные команды VBA?
Я использую MS Access 2010.
Не забывайте
✓ Accept
Ответ, который помог решить вашу проблему ... вы получите <30874994149804> <308743214999999> <3087432149999999> Репутация, а ответ на ответ <30874321499800> <+15
) > респ. Вы можете Также▲ Upvote
<30874321499811> Любые ответы, которые полезны, которые также вознаграждают авторы < и <3087494149813> Преимущества сообщества переполнения стека в целом!