2012-01-05 142 views
1

我有一個使用Web瀏覽器對象的Powerpoint。問題在於Web瀏覽器對象上的滾動條總是存在,無論它們是否需要。有一些方法可以刪除滾動條嗎?從Web瀏覽器對象中刪除滾動條和邊框

我曾嘗試加入:

WebBrowser.Document.body.Scroll = "no" 

但使對象停止工作都在一起。

另外,對象的周圍有一層薄薄的淺色(我認爲它是白色但很難說)邊框。由於我的大部分演示文稿都是黑色的,所以我不能很好地融合,儘管我已經將HTML的背景顏色設置爲黑色。有沒有辦法擺脫邊界?

如果他們不能用vba完成,他們可以完成嗎?

回答

3

我的理解是否定的,這是不可能的。我不喜歡滾動條,但它是IE的一部分,我沒有看到任何方法可以在不完全禁用功能的情況下將其移除,正如您已經看到的那樣。

1

JimmyPena,

我做到了。經過一些測試後,我發現如果將圖像設置爲webbrowser並嘗試在同一個「f5」執行中設置其他Document.Body屬性,則不起作用。諷刺的是,如果你嘗試使用「f8」,它就會起作用。

我認爲這是因爲webbrowser組件在加載對象後無法設置某些屬性。

Sooooo,我試着製作一個HTML文件,其中設置了我的對象(在我的情況下爲gif圖片)並設置了所有屬性,包括滾動移除,邊距移除和邊框移除。

你可以在下面看到我的代碼。

HTML(test.html中):

<html> 
<head> 
</head> 

<body style="overflow: hidden; margin: 0; border: 0;"> 
    <img src="Assets/loading-small.gif" /> 
</body> 
</html> 

VBA:

Sub abaSV_showLoadingIcon() 
    AbaSV.WebBrowser1.Visible = True 

    AbaSV.WebBrowser1.Navigate ThisWorkbook.path & "\test.html" 
End Sub 

我覺得應該幫助你,JimmyPena和uncertaintea。

SeeYa!

0

除VBA部分外,您的想法很好。

所以我所做的就是像你一樣創建一個html文件,分配屬性並調用gif圖像。

然後在VBA我用下面的代碼(在片材,其中webborser可以找到):

Private Sub worksheet_activate() 
WebBrowser1.Navigate "insert html file path.html" 
End Sub