|
|
|
| Добрый день!
Если кто-нибудь может помочь или подсказать ссылку по интересующему меня вопросу - помогите!
Как можно увеличить размер объекта 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.: Простите, если вопрос составлен некорректно. Очень нужна помощь. Заранее благодарю всех, кто уделит мне немного своего времени. | |
|
| |
|
|
|
| вместо .UsableHeight и .UsableWidth
Me.InsideHeight и me.InsideWidth
и вот это
http://hiprog.com/index.php?option=com_content&task=view&id=338 | |
|
| |
|
|
|
| Олег! Огромное Вам Спасибо за ответ!
Сейчас все буду пробовать!
С уважением, Лиза | |
|
| |
|
|
|
| >вместо .UsableHeight и .UsableWidth
>Me.InsideHeight и me.InsideWidth
>и вот это
>http://hiprog.com/index.php?option=com_content&task=view&id=338
Не получилось: присвоение свойству Height значения не проходит..
Я слышала, Microsoft признал свою ошибку в том, что свойство Height объекта WebBrowser
не работает..
Может как-нибудь по-другому можно сделать? | |
|
| |
|
|
|
| ага MS признал, а Сергей Гарвилов исправил
http://hiprog.com/index.php?option=com_content&task=view&id=612&Itemid=35
и новая версия
http://hiprog.com/index.php?option=com_content&task=view&id=732&Itemid=35 | |
|
| |
|
|
|
| Олег! Вы меня просто выручили!
Спасибо!
С уважением, Лиза | |
|
| |