Question nom des feuilles

Bjr a tous,

J'ai remarquer que sur vusial basic, le nom des feuilles aparaissait a gauche sous la forme "Feuil1(Nom de la feuille)"

Je voudrais savoir si c'était possible d'utiliser le Feuil1 dans une macro, plutot que le nom de la feuille? Cela me simplifirais la tache.

Merci

Bonjour,

Utilise la notation suivante avec index pour les feuilles 1,2 :

Sheets(1) , Sheets(2)

etc.

Donc, si je comprend bien, sheets(1), ca sera ma feuil1, donc je n'est pas besoin d'utiliser le mot en lui même "Feuiil1", parce que je m'explique, j'ai un code qui marche, mais il utilise le nom des feuilles en tant que "Feuil1", "Feuil2" ...

Aujourd'hui ils vont changer de nom, donc je voulais garder le Feuil1, feuil2.. pour ne pas avoir a tout recommencer mon code est-ce possible?

Dim ligne, ligne1, ligne2 As Integer
Dim cell As Range
For i = 1 To 23
ligne = Sheets(2)("Feuil" & i).Range("A65536").End(xlUp).Row
   For Each cell In Worksheets("Feuil" & i).Range("B2:B" & ligne)
        If cell > 90 And cell < 99 Then
            ligne1 = cell.Row
            ligne2 = Sheets(1)("Synthèse").Range("A65536").End(xlUp).Row + 1
            Worksheets("Feuil" & i).Range("A" & ligne1).Copy Worksheets("Synthèse").Range("A" & ligne2)
            Worksheets("Feuil" & i).Range("B" & ligne1).Copy Worksheets("Synthèse").Range("B" & ligne2)
            Worksheets("Feuil" & i).Range("C" & ligne1).Copy Worksheets("Synthèse").Range("C" & ligne2)
            Worksheets("Feuil" & i).Range("D" & ligne1).Copy Worksheets("Synthèse").Range("D" & ligne2)
            Range("E" & ligne2) = Sheets("Feuil" & i).Name
        End If
    Next cell
Next i