Visual Basic para Aplicaciones - Abrir documentos MOffice desde VB

POR FAVOR :
Requiero el codigo (QNO SEA CON SHELL) para abrir cualquiera de los tipos de documentos (*.doc, *.xls, *.ppt) desde un programa VB6. Por favor .. GRACIAS..
Si es posible q me indiquen los pasos ...??¿¿¿

Aqui te va el codigo para abrir un documento de combinacion de Word, incluyendo la base de datos.

' aplicacion es el objeto word
Set aplicacion = CreateObject("word.application")

' en documento abre el archivo origen
Set documento = aplicacion.Documents.Open(xComboOrigen.Text + xArchivoOrigen)

' Llo hace documento de combinacion
Set Combinar = documento.MailMerge

If zVersion <> "XP" Then ' con XP no funciona el codigo a continuacion

strSql = "Select * from " + xProceso ' sql statement
xtabla = "Table " + xProceso ' aqui es la conexion
Combinar.OpenDataSource Name:=xBaseDocumentos, Format:=0, ConfirmConversions:=True, _
ReadOnly:=False, LinkToSource:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Connection:=xtabla, _
SQLStatement:=strSql, SQLStatement1:=""
End If

' indica que la combinacion se envia a un nuevo
Combinar.Destination = wdsendtonewdocument
Combinar.Execute Pause = True

' nuevo tiene el nombre del nuevo documento combinado
Set nuevo = aplicacion.ActiveDocument
nuevo.SaveAs xComboDestino.Text + xArchivoDestino.Text
nuevo.Application.Visible = True

Espero te sirva