Excel VBA une variable apres Sheets ?

Résolu
kriKri51 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -  
kriKri51 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


Est il possible de remplacer : Sheets ("Feuille1") par sheets ("Feuille..... et une variable a la place du 1.
Si oui .....comment ???

D'avance
MERCI



A voir également:

4 réponses

Réponse 1 / 4
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonsoir,

i=1
Sheets ("Feuille" & i)
0
kriKri51 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention  
 
Merci de cette reponse aussi rapide, mais est il possible de faire la meme chose avec :
Sub Feuille1 ()
0
Réponse 2 / 4
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Non, mais tu peux passer une variable à une macro lors de l'appel.
ex:
Sub test()
feuille (1)
End Sub

Sub feuille(numFeuille)
MsgBox numFeuille
End Sub
0
Réponse 3 / 4
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Une petite mise en pratique ?... 
Sub NomFeuille()
Dim F As Integer
    For F = 1 To Sheets.Count
        Sheets(1).Cells(F, 1) = Sheets(F).Name
    Next
End Sub

A+
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Salut lermite,

Aussi oui, mais je précise pour krikri que si on utilise l'index, il varie en fonction de la position de la feuille.
Donc si toutes les feuilles ne doivent pas être traitées il faut contrôler leur nom.
A+
eric
0
Réponse 4 / 4
kriKri51 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention  
 
Un grand merci a vous deux.
avec ca je devrais me debrouiller..... enfin j'espere

A bientot ...peut etre...surement
0