OLE container fails to render DOCX, XLSX

I'm currently working with a legacy VB6 application that uses an OLE container ActiveX component to preview Office documents. It works well with classic file formats but fails to render more modern XML formats. Instead it opens the document and displays an icon placeholder with the name of the file below the icon. I'm simply using the standard CreateEmbed method as follows:

Public Sub OpenDocument(ByVal strDocument As String)
olePreview.CreateEmbed strDocument
End Sub

My dev environment is W8 x64 with Office 2010 installed.

All help appreciated.