Discussion :

[toytoy18]

bonjour
je travaille sur une gestion de base de données Excel sous visual basic.
La base de données en question se trouve sur le réseau de l'entreprise. plusieurs personne peuvent y avoir accès en même temps. Je voudrais savoir s'il était possible de savoir si un fichier excel est ouvert même sur un autre ordinateur pour en bloquer l'accès dans le cas où une deuxième personne voudrais aussi l'ouvrir. Ou s'il existait une autre solution pour bloquer l'accès à un fichier Excel déja ouvert

[SilkyRoad]

bonjour

tu pourrais par exemple ouvrir le classeur et verifier s'il est en lecture seule (donc deja ouvert) .Si c'est le cas tu refermes le classeur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
xlApp.DisplayAlerts = False
Set wb = xlApp.Workbooks.Open(Filename:="J:\leClasseur.xls")
 
If wb.ReadOnly Then
    MsgBox "déja ouvert"
 
    wb.Close 'refermeture si deja ouvert
    xlApp.DisplayAlerts = True
 
    Else
 
    '
    '....
    '
End If

bonne journée
michel

[medkarim]

ouvre ta base en mode exclusive
voir aide dao ou ado selon ce que tu utilise

[toytoy18]

Merci c'est la focntion que je cherchais