Nom dernière feuille visible

Bonjour et très bonne année 2025 à tous,

Après multiple recherche je ne trouve pas le code VBA pour avoir le nom de la dernière feuille visible d'un classeur.

J'utilise ce code

Sub NomDernièreFeuille()
df = Sheets(Sheets.Count).Name
MsgBox df
End Sub

Toutefois, quant la dernière feuille est masquée, la MsgBox me renvoi son nom et non la dernière feuille visible.

Merci à tous pour votre aide

Edit : mis code entre balises.

Bonjour,

Ceci:

Sub NomDernièreFeuilleVisible()
    Dim i As Long
    For i = Sheets.Count To 1 Step -1
        If Sheets(i).Visible = True Then
            MsgBox Sheets(i).Name
            Exit Sub
        End If
    Next i
End Sub

Cdlt

Salut Antoine,

ainsi, sans doute

For x = Sheets.Count To 1 Step -1
    If Sheets(x).Visible = True Then _
        MsgBox Sheets(x).Name: _
        Exit For
Next

A+

Merci à vous deux c'est Nickel.