Controle en VBA fichier ouvert a sauvegarder ou non

bonjour

j'ai des macros en fonctionnement qui appellent souvent plusieurs fichiers

je veux controler s'ils sont ouverts et modifié ou non pour les sauvegarder ou non (sans message)

s'ils ne sont pas ouverts les ouvrir

dans une macro

le nom du fichier en variable

Dim nomfichier As ???

nomfichier="x:\chemin\nomfichier.xls"

je souhaite tester si un "x:\chemin\nomfichier.xls" est dejà ouvert

s'il a besoin d'être sauvegarder car modifié le sauvegarder sans mise a jour des liens et sans message

s'il n'a pas ete modifié terminer

s'il n'est pas ouvert l'ouvrir sans message de mise a jour des liens et sans message

j'ai un debut mais probleme de fonctionnement et sans variable

merci a tous

Sub a_0_test_ouverture_fichier_2internet()

'le nom du fichier en variable

'Dim nomfichier As ???

' nomfichier="x:\chemin\nomfichier.xls"

'ActiveWorkbook.Save

On Error GoTo 0

estouvert = True

'si non ouvert ouverture

ouvre:

If estouvert = False Then Workbooks.Open FileName:=.........., updatelinks:=0

'====

End Sub

merci a tous