VBA - Lykke til kopiering af data fra forskellige ark til et ark

Er gået i stå - er der mon nogen som kan hjælpe?

Min workbook består af en række ark:  X, Y, Z, Forside, KPI, Tidsreg, og mange flere. Ark X, Y, og Z kan hedde noget forskelligt fra gang til gang.

Jeg vil gerne kopiere celle "R23" fra ark X, Y og Z (husk de ændrer navn - men står altid først og der kan enten værre flere eller færre ark foran arket "Forside" fra gang til gang.

Så jeg har brug for en lykke som kun læser alle de ark som står til venstre for arket "Forside" og returnerer dem til arket "Tidsreg".

Indtil videre ser min kode således ud:

Sub SummurizeSheets()
    Dim ws As Worksheet
    Application.ScreenUpdating = False
    Sheets("Tidsreg").Activate
    For Each ws In Worksheets
        If ws.Name <> "Tidsreg" Then
          ws.Range("R23").Copy
            Worksheets("Tidsreg").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial (xlPasteValues)
        End If
    Next ws
End Sub

På forhånd 1000 tak
Henrik