Excel VBA une variable apres Sheets ?

Résolu
kriKri51 Messages postés 19 Statut Membre -  
kriKri51 Messages postés 19 Statut Membre -
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 25847 Statut Contributeur 7 279
 
Bonsoir,

i=1
Sheets ("Feuille" & i)
0
kriKri51 Messages postés 19 Statut Membre
 
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 25847 Statut Contributeur 7 279
 
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 9042 Statut Contributeur 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 25847 Statut Contributeur 7 279
 
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 19 Statut Membre
 
Un grand merci a vous deux.
avec ca je devrais me debrouiller..... enfin j'espere

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