2 questions (ouverture fichier en vba ; copie sur une plage de cellule)

[Jacques25]

Bonjour à tous,

J'aurais 2 petites questions pour pouvoir finaliser mon programme :

1 - vérifier qu'un fichier est ouvert ou déjà utilisé avant de l'ouvrir :

J'ai un code qui commence par l'ouverture d'un fichier comme ceci :

ChDir _
"Y:\A\B\C\D\E"
Workbooks.Open Filename:= _
"Y:\A\B\C\D\E\F.xls"
Sheets("Adresse Fournisseurs").Select

Qd il est déjà ouvert j'ai le message "le fichier est déjà ouvert......"
Comment puis vérifier
a - qu'il est déjà ouvert est lancé une biote de dialogue
b - que personne n'est entrain de l'utiliser et lancer cette même boite de dialogue (fichier sur réseau) je ne souhaite pas l'ouvrir en lecture seule.

2 - je souhaite inscrire des 0 dans une plage de cellule aux dimensions variables j'imagine qu'il faut utiliser une boucle mais j'ai beaucoup de mal avec :

Voila ce que j'ai fait mais la syntaxe n'est pas bonne et les bouckes c'est loin d'être mon fort...
'Range("L1").Copy
'Windows("G.xls").Activate
'Range("A" & dl3:"A"&dl4).Select
'ActiveSheet.Paste
'Windows("RéclamatiF.xls").Activate

Merci d'avance pour votre aide précieuse.

Bonne journée

Jacques