[VB/VBA] Boucler sur les Excel ouverts

tipiou -  
Bonjour,

Je souhaite faire la liste de tous les fichiers ouverts dans Excel.
Je peux avoir plusieurs applis Excel ouvertes.
Le code :

Set EExcel = GetObject(,"Excel.Application")
Forall fen In EExcel.Windows
print fen.Caption
End Forall

récupère uniquement le premier Excel ouvert.
Comment puis je boucler sur les autres, svp ?

merci.

1 réponse

  1. byakhlefncr
    Salut,

    Je n'ai pas VB Installé sur mon PC mais j'ai utilisé VBA en Excel et ce code marche bien.

    Set EExcel = GetObject(,"Excel.Application")
    For iCpt = 1 To EExcel.Windows.Count
    MsgBox EExcel.Windows(iCpt).Caption
    Next iCpt

    Bonne chance
    0

    Discussions similaires

    Excel : afficher toutes les lignes et colonnes masquées
    livlarsen

    27 réponses