Contourner les conflits dans un dossier partagé ?

Bonsoir,

Encore un souci avec mon dossier statistiques.

J'ai donc crée un dossier partagé avec différentes feuilles sur lesquelles plusieurs employés peuvent travailler.

La limite du dossier partagé, c'est que si plusieurs personnes travaillent simultanément sur la même feuille, il y a conflit qui ne s'exprime qu'au moment d'enregistrer le document. Chacun doit donc répondre à la question de savoir quel enregistrement il conserve et bien évidemment il choisit le sien, écrasant par le fait les saisies des autres.

Au bout de 3 jours, j'ai un vrai bazard dans mes stats et une levée de bouclier des employés qui ne veulent pas reprendre leurs saisies (on peut les comprendre !)

Ma question :

Peut-on imaginer une programmation qui permette de déplacer les saisie dans la premiière ligne vide lors qu'il y a message signalant le conflit ?

Ainsi chacun serait assuré de conserver son travail quel que soit le nombre de personnes travaillant sur la même feuille au même moment.

Bonsoir,

Un fichier partagé, comme tu le dis, "appartient" au dernier qui enregistre....

C'est comme ça.....

Une idée : Un fichier par employé?

Et une synthèse, ensuite?

Juste une idée......

Bonjour Chat noir, Felix et le forum.

Le code qui suit n'est pas de moi:

Attribute VB_Name = "ClasseurPartageOuvert"

'tester si un classeur partagé sur le réseau est déjà ouvert ou non
'permet d'éviter le message d'avertissement d'Excel lors d'une tentative
'd'ouverture d'un classeur partagé déjà ouvert, l'ouverture en lecture seule
'*et* le message de notification lorsque le classeur est devenu disponible

'=======================
' This function checks to see if a file is open or not. If the file is
' already open, it returns True. If the file is not open, it returns
' False. Otherwise, a run-time error will occur because there is
' some other problem accessing the file.

Function IsFileOpen(filename As String)
' (code Microsoft :
' http://support.microsoft.com/default.aspx?scid=kb;EN-US;q138621)
Dim filenum As Integer, errnum As Integer

  On Error Resume Next   ' Turn error checking off.
  filenum = FreeFile()   ' Get a free file number.
  ' Attempt to open the file and lock it.
  Open filename For Input Lock Read As #filenum
  Close filenum          ' Close the file.
  errnum = Err           ' Save the error number that occurred.
  On Error GoTo 0        ' Turn error checking back on.

  ' Check to see which error occurred.
  Select Case errnum

    ' No error occurred.
    ' File is NOT already open by another user.
    Case 0
      IsFileOpen = False

    ' Error number for "Permission Denied."
    ' File is already opened by another user.
    Case 70
      IsFileOpen = True

    ' Another error occurred, file is being queried.
    Case Else
      Error errnum
  End Select

End Function

salut à tous , y a t il une solution à cet probléme ?

Merci !

bonjour

qui a teste ce code merci de la reponse

Bonjour à tous,

Chat Noir est-il felix le chat ?

comment contourner les conflits dans un dossier partagé ? peut-être en évitant d'passer sous une échelle ?

non, non : malgré les apparences, j'suis pas du tout superstitieux ! (j'touche du bois + patte de lapin)

on peut dire qu'en 2012, rghanmi a déterré un vieux sujet de 2009 ! mais pas d'réponse !

puis maint'nant, flexi2202 a de nouveau déterré le même sujet ! qui pourra lui répondre ?

dhany

Bonjour,

dis leur de prendre l'habitude d'enregistrer avant de saisir.

Ca forcera une mise à jour du classeur et réduira considérablement les collisions.

A la limite tu peux mettre une boite de rappel à l'ouverture pendant quelques temps.

Ou bien chacun un classeur, et tu en fais un général pour compiler l'ensemble.

eric

1. Une solution très simple que j'utilise, c'est d'ouvrir, dans ta macro, le fichier contenant la base de données, au moment de l'enregistrement. De transférer les données à la prochaine ligne libre puis de sauvegarder et refermer cette base de données.

2. Une autre dans la même ligne que Ériiiic, est de; toujours dans ta macro:

• conserver les données de ta fiche;
• les effacer;
• Sauvegarder le fichier de données, ce qui affichera les données des autres utilisateurs;
• trouver la prochaine ligne libre;
• y inscrire tes données;
• sauvegarder de nouveau.