Registrazione dati su excel con VB6

[Marco_BPA]

Ciao a tutti , sto sviluppando un'applicazione in VB6 che registra dei dati ogni minuto in un file excel.
Mi succede che , se il file è già aperto , i dati non vengono registrati (mi crea delle righe vuote) ma il codice non mi da nessun errore.
Qui di seguito il codice che utilizzo per scrivere i dati nel file excel.
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Open(Path_file & snomefile)

'Add data to cells of the first worksheet in the new workbook
Set oSheet = oBook.Worksheets(1)

oSheet.Range("A" & Contatore).Value = Now

'Save the Workbook and Quit Excel
oBook.Application.DisplayAlerts = False
oBook.save
oExcel.Quit

Qualcuno sa suggerirmi se posso scrivere i dati anche se il file è aperto ?
Grazie mille

[gibra]

Mostra le dichiarazioni degli oggetti.

[Marco_BPA]

Ciao e grazie per avermi risposto , gli oggetti li ho dichiarati così :

dim oexcel as object
dim obook as object
dim osheet as object

[gibra]

Bene, le dichiarazioni sono OK.

Però se il file era già stato aperto di norma l'ultima apertura avviene in modalità read-only, a meno che non si condivida la cartella di lavoro, seppur con delle limitazioni, come indicato qui:

Utilizzare una cartella condivisa per la collaborazione - Excel
http://office.microsoft.com/it-it/ex...010342985.aspx

[Marco_BPA]

Ciao e grazie per la risposta. A questo punto credo che farò un controllo prima di scrivere il file , se lo trovo aperto non registro niente e segnalo un errore.