Selectionner plusiers feuille excel VBA

Ldopa19 Messages postés 2 Statut Membre -  
Patrice33740 Messages postés 8930 Statut Membre -
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.


A voir également:

3 réponses

Réponse 1 / 3
Patrice33740 Messages postés 8930 Statut Membre 1 781
 
Bonjour,

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

Cordialement
Patrice
0
Réponse 2 / 3
Ldopa19 Messages postés 2 Statut Membre
 
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
Patrice33740 Messages postés 8930 Statut Membre 1 781
 
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
Ldopa19 > Patrice33740 Messages postés 8930 Statut Membre
 
Merci 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
Patrice33740 Messages postés 8930 Statut Membre 1 781
 
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
Ldopa19 > Patrice33740 Messages postés 8930 Statut Membre
 
Bonjour Patrice
J'ai testé ta deuxième proposition, mais elle bloque à la ligne 7.
J'avoue que je patine complètement..
0
Patrice33740 Messages postés 8930 Statut Membre 1 781 > Ldopa19
 
Ce 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
Réponse 3 / 3
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

Tu peux t'inspirer de ceci en vba en l'adaptant:

https://forums.commentcamarche.net/forum/affich-34915454-automatiser-les-sauvegardes-lorsque-je-renseigne-marche2017?page=2#37
0

Discussions similaires

Feuille de score belote
nulleeninfo -
brucine -

7 réponses