selecting the last 5 sheets

Hi

I need help again. I would like to know how do i select the last 5 sheets.

for example I have sheet:

1 2 3 4 5 6 7 8

and i would like to only run a macro on the last 5 sheets.This macro is being run on a weekly basis. keeping in mind that the naming of the sheets may vary everytime i run the macro..so any help please?

try

Sub test()
Dim i As Integer, flg As Boolean
If Sheets.Count > 4 Then
    For i = Sheets.Count - 4 To Sheets.Count
        If Not flg Then
            Sheets(i).Select
            flg = True
        Else
            Sheets(i).Select False
        End If
    Next
End If
End Sub

Thanks your solution works great.

Helped me a lot.
I was busy with some other projects that i had really no time to come back to this project till now.

Thank YOU!~