Besoin d'une alerte "fichier déjà ouvert" Excel 2003
Résolu
HIBISCUS988
Messages postés
31
Date d'inscription
Statut
Membre
Dernière intervention
-
HIBISCUS988 Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
HIBISCUS988 Messages postés 31 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Besoin d'une alerte "fichier déjà ouvert" Excel 2003
- Fichier bin - Guide
- Fichier epub - Guide
- Cette action ne peut pas être réalisée car le fichier est ouvert dans system - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
2 réponses
Bonjour,
J’utilise ce code :
J’utilise ce code :
Public Function EstOuvertFichier(nomCompletFichier As String) As Boolean ' Teste si le fichier est ouvert Dim n°F As Integer EstOuvertFichier = False n°F = FreeFile On Error Resume Next Open nomCompletFichier For Input Lock Read As #n°F If Err = 70 Then EstOuvertFichier = True Close #1 On Error GoTo 0 End Function
Donc après avoir partagé mon fichier, et fait les tests d'utilisation, si un utilisateur 1 a ouvert le fichier pour y faire des modifications, et qu'un autre utilisateur 2 ouvre à son tour le fichier, y fait ses modifications, enregistre et ferme le fichier, il y a la copie utilisateur 2 avec son enregistrement et ensuite la copie utilisateur 1 avec son enregistrement mais n'incluant pas l'enregistrement de l'utilisateur 2. Donc toujours le même problème. Si quelqu'un a la solution merci infiniment d'avance. J'aimerai tant retrouver le système d'alerte à l'ouverture du fichier comme ci dessous :


Je ne pense pas que ça fonctionnera avec ce code, car il nécessite de préciser le nom complet du fichier, or, à chaque fois qu'un utilisateur va faire une modification dans ce fichier, ça crée une copie de "nom du fichier", si personne ne le renomme, en fin de journée on se retrouve avec une copie de copie de copie de copie ........................................"nom du fichier". C'est aun autre sujet que je ne comprends pas non plus, mais pour le moment c'est comme ça, si vous avez une idée du pourquoi merci d'avance de me dire d'où vient le problème (serveur ??). Merci pour votre aide.
Sinon lorsque qu'un autre utilisateur ouvre le fichier, il ne peut ouvrir qu'une copie en lecture seule, s'il l'enregistre, ce sera une copie de, et ensuite une copie de .. une copie de ... Donc une multitude de fichiers dont on ne sait pas lequel est le bon et très probablement aucun ne contiendra les modifications de tous les utilisateurs.
Dans le cas d'un fichier non partagé, l'emploi de la fonction ci-dessus permet de détecter si le fichier est ouvert ailleurs, d'afficher un message et de refermer la copie ouverte en lecture seule pour éviter la multiplication des copies.