Discussion :

[zoumzoum59]

Bonjour à tous

Avec un debut de code suivant:

Code :

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

1
2
3
4
5
6
7
8
9
 
Range("A2").CurrentRegion.Select
selection.Cut
 
Workbooks.Open "C:\Documents and Settings\Compaq_Propriétaire\Mes documents\Boulot\aze.xls"
Range("A65536").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
ActiveWorkbook.Save
ActiveWorkbook.Close

Je voudrais gérer l'enregistrement des données dans le fichier aze.xls qui va se trouver sur le reseau, mais comme deux personne peuvent utiliser la macro d'enregistrement en meme temps comment peut on faire attendre la deuxiéme personne qui lance la sauvegarde, le temps que la premiere termine la tienne et que le fichier soit fermé pour etre réouvert par le deuxieme.

J'espere avoir été clair, sinon je suis avotre disposition.

Merci d'avance

[AlainTech]

Un élément de réponse là:
http://www.developpez.net/forums/sho...41#post1255941
Une petite boucle d'attente et le tour est joué.

[zoumzoum59]

Merci AlainTech

c'est ok pour le lien, mais je suis desolé je suis aussi à la ramasse pour créer une boucle d'attente, j'ai fait des recherche sur le domaine et je n'ai rien trouvé.

Du moins que je puisse exploiter.

Alors si c'est possible d'avoir encore un coup de pouce.

Merci

[jmfmarques]

une boucle d'attente est une boucle pendant l'exécution de laquelle la main est rendue au système....

Regarde dans l'aide en ligne :
1) à quoi sert Doevents
2) comment utiliser la fonction Timer
3) ce qu'est une boucle et les différentes façons d'en faire une

Tout celà est simple, mais il faut commencer par bûcher un tout petit peu...

Reviens avec un bout de code résultant de cette toute petite étude, s'il te plait, si tu as encore des difficultés à mettre celà en oeuvre .

[zoumzoum59]

Ok jmfmarques

Je vais potasser ça et si j'arrive pas à ce que je cherche je reviens avec ce que j'ai reussi à faire.

Merci pour les infos.

[AlainTech]

Juste un boucle tant que le fichier est ReadOnly...