Incluir una macro en todas las hojas de excel

Necesito cambiar el formato de ciertas celdas en todas las hojas de un libro, deseo hacerlo con una macro porque son varios libros que tienen las mismas funciones, entonces tengo:

Sub CambiarFormato()
 For Each Worksheet In Worksheets
    Range("AC13:AC24").Select
    Selection.ClearContents
    Selection.NumberFormat = "General"
 Next Worksheet
End Sub

Pero cuando ejecuto la orden sólo lo hace en la hoja activa y no entiendo que debo hacer.