Aggiornamento

Per aprirlo ci sono riuscito con questo codice:

Private Sub Command1_Click()
Dim args()
Set oServiceManager = CreateObject("com.sun.star.ServiceManager")
'Create the Desktop
Set oDesktop = oServiceManager.createInstance("com.sun.star.frame .Desktop")
'Open a calc document
Set oDoc = oDesktop.loadComponentFromURL("file:///c:/certificato.xls", "_blank", 0, args)
Set oSheet = oDoc.getSheets().getByIndex(0)
Il problema ora è come fare a "dirgli" di inserire in determinate celle quello che risulta scritto nelle textbox

Aiuto