Selectionner plusiers feuille excel VBA

Ldopa19 -  
Bonjour,
Je ne suit aps un expert en VBA loin s'en faut.
Je voudrais selectionner plusieurs feuilles dans un tableau excel. les feuilles 1 à 4 ne doivent pas êtres selectionnées, et le nombre total de feuilles peut varié, il est pour le moment de 39, soit 4 non sélectionnables et 35 sélectionnables.
Merci d'avance de votre aide.

3 réponses

  1.  Patrice33740
    Bonjour,

    Sélectionner n'est pas une finalité en soi, sélectionner dans quel but ?

    Cordialement
    Patrice
    0
    1. Ldopa19 Auteur
      Bonjour Patrice
      Très bonne question.
      Il est vrai que je n'ai pas expliquer le pourquoi de la demande.
      Je voudrais créer un fichier pour gérer des coureurs.
      Chaque feuille contient les informations concernant chaque coureurs nom prénom etc. ...
      Je voudrais pouvoir supprimer une ou plusieurs feuilles, quand en début de saison il y a des départs et des arrivées.
      Merci d'avance pour ton aide.
      0
      1. Patrice33740
        Exemple pour supprimer plusieurs feuilles simultanément : 
        Sub test()
Dim noms As Variant
  noms = Array("Feuil2", "Feuil3")
  Application.DisplayAlerts = False
  Worksheets(noms).Delete
  Application.DisplayAlerts = False
End Sub
        0
      2. Ldopa19
        @Patrice33740Merci pour ton aide
        La solution me parait bonne, mais comment faire pour changer de feuille sans entrer dans le code ,
        Merci d'avance
        A te relire.
        0
      3. Patrice33740
        Re,

        Simplement en allant chercher le nom des feuilles là où il se trouve !!!

        Par exemple : 
        Sub test()
Dim plage As Range
Dim noms As Variant
  Set plage = ActiveSheet.Range("A1:A2")
  noms = Application.Transpose(plage.Value)
  Application.DisplayAlerts = False
  Worksheets(noms).Delete
  Application.DisplayAlerts = False
End Sub


        Voici un excellent cours VBA pour débutants (gratuit) :
        ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf

        cdlt
        Patrice
        0
      4. Ldopa19
        @Patrice33740Bonjour Patrice
        J'ai testé ta deuxième proposition, mais elle bloque à la ligne 7.
        J'avoue que je patine complètement..
        0
      5. Patrice33740
        @Ldopa19Ce n'est qu'un exemple, il faut mettre le nom des deux feuilles à supprimer en A1 et A2 de la feuille de calcul Excel
        0