Private Sub CommandButton1_Click()
'références cochées dans VBE
'[X] Microsoft HTML Library
'[X] Microsoft Internet Controls
'affiche l'aperçu avant impression de IE
'test OK sur Excel 2010 et Excel 2013
'WebBrowser1.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DONTPROMPTUSER
'//////////////////////////////////////////////////////////////////
WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER
'test OK sur Excel 2010, l'impression se lance directement
'impression papier testée sur Windows 7PRO + Excel 2010 + IE11
End Sub
Private Sub UserForm_Initialize()
WebBrowser1.Navigate "http://info.cern.ch/"
End Sub