ник: Liza
Добрый день!
Если кто-нибудь может помочь или подсказать ссылку по интересующему меня вопросу - помогите!
Как можно увеличить размер объекта WebBrowser, встроенного в форму в MS Access (не растягивая его вручную в конструкторе). В Excel это будет выглядеть так:
Private Sub Workbook_Open()
ThisWorkbook.Worksheets("Browser").Activate
SetSettings
With Application
.WindowState = xlMaximized
'-- максимальный размер для WebBrowser
If ThisWorkbook.Worksheets("Browser") _
.OLEObjects(1).Height <> .UsableHeight Then
ThisWorkbook.Worksheets("Browser") _
.OLEObjects(1).Height = .UsableHeight
End If
If ThisWorkbook.Worksheets("Browser") _
.OLEObjects(1).Width <> .UsableWidth Then
ThisWorkbook.Worksheets("Browser") _
.OLEObjects(1).Width = .UsableWidth
End If
End With
End Sub
P.S.: Простите, если вопрос составлен некорректно. Очень нужна помощь. Заранее благодарю всех, кто уделит мне немного своего времени.