[VBA Excel] Macro sur plusieurs classeurs

Résolu
Arn's Messages postés 25 Statut Membre -  
Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour à tous,

D'abord merci pour tout ce que vous faites.

Voilà ma question :
Je souhaite créer une macro qui exécute les instructions suivantes :

Ouvrir une fenêtre similaire à celle qui apparaît quand on veut ouvrir un classeur (ou quand on clique sur un bouton "parcourir"), dans laquelle on puisse faire une sélection multiple des classeurs sur lesquels on veut travailler.

Puis exécuter une macro qui s'applique seulement sur tous les classeurs que j'ai sélectionnés, et pas sur le classeur actuel (celui qui contient la macro).

Comment procéder ?

Merci d'avance pour vos réponses.

4 réponses

  1. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    Concernant la boîte de dialogue:
    Sub UseFileDialogOpen()
    Dim lngCount As Long
    ' *** ouvre la boîte de dialogue de fichiers
    With Application.FileDialog(msoFileDialogOpen)
    .AllowMultiSelect = True
    .Show
    ' *** affiche le chemin de chaque fichier
    For lngCount = 1 To .SelectedItems.Count
    MsgBox .SelectedItems(lngCount)
    Next lngCount
    End With
    End Sub
    2
    1. membre
       
      Où est-ce que tu insères le code que tu veux exécuter pour ces fichiers ?
      0
    2. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
       
      Bonjour,
      En principe on commence par un petit bonjour sans oublier une salutation.
      Sans savoir ce que vous cherchez à réaliser, pas de réponse possible ou alors du n'importe quoi.....!
      Salutations
      Le Pingou
      0
  2. Arn's Messages postés 25 Statut Membre 7
     
    Superbe, génial !
    Un grand merci, M. Le Pingou !
    0
  3. Le Pingou Messages postés 12276 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    Merci.
    Au passage, vous avez remarqué que le contenu de [SelectedItems] vous permet de résoudre la deuxième partie de votre demande.
    0
  4. Arn's Messages postés 25 Statut Membre 7
     
    Effectivement.
    0