WebOptions Property Example
This example specifies that cascading style sheets and Western document encoding be used when items in the first workbook are saved to a Web page.
Set objWO = Workbooks(1).WebOptions objWO.RelyOnCSS = True objWO.Encoding = msoEncodingWestern