Ciao a tutti,
ho un file excel salvato in un percorso di rete condiviso, e nel quale piu utenti posso scrivere o leggere dati.
Ho inserito un codice nella mia maschera access che va a verificare se la riga é vuota, e ci scrive dentro, altrimenti utilizza la riga successiva.
Il codice funziona, il problema ora si presenta quando il file é gia aperto da un altro utente. Esiste un modo per aggiornare in tempo reale il file excel gia aperto da piu utenti.
So che aprendo il file direttamente da excel, viene visualizzato in tempo reale l'utente che sta scrivendo nelle caselle, ma da Access come potrei gestire questo?
Grazie
Private Sub cmdSend_Click()
Dim programma As Excel.Application
Dim cartella As Excel.workbook
Dim foglio As Excel.Worksheet
Dim I As Integer
Dim RigaVuota As Boolean
Set programma = CreateObject("excel.application")
Set cartella = programma.Workbooks.Open("P:\Shared\List.xlsx")
Set foglio = cartella.Sheets(1)
RigaVuota = False
I = 2
Do Until RigaVuota = True Or I = 5
If IsEmpty((foglio.Cells(I, 4))) Then
foglio.Cells(I, 4) = "TEST OK"
MsgBox ("Scrivo su riga " & I)
cartella.Save
RigaVuota = True
Else
I = I + 1
End If
Loop
' Releasing objects
Set foglio = Nothing
cartella.Close False
Set cartella = Nothing
' Closing Excel
programma.Quit
Set programma = Nothing
End Sub