Добрый день!

Если кто-нибудь может помочь или подсказать ссылку по интересующему меня вопросу - помогите!

Как можно увеличить размер объекта 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.: Простите, если вопрос составлен некорректно. Очень нужна помощь. Заранее благодарю всех, кто уделит мне хотя бы немного своего времени.