This code will put your saved details in each sheet except Sheet3 - which I've used to illustrate how to skip sheets.
Dim sht As Worksheet
Application.ScreenUpdating = False
For Each sht In ThisWorkbook.Worksheets
If sht.Name <> "Sheet3" Then
Range("B2").Value = "Updated: " & FileDateTime(ThisWorkbook.FullName)
Application.ScreenUpdating = True