Tengo una secuencia de comandos que creé que crea una nueva hoja y una nueva pestaña en dicha hoja, antes de cambiar los nombres de dichas pestañas, quiero que sea así, de Hoja 1 a Hoja 4, todas están rojas.

With wbBK2.Sheets(wsWS1).Tab
    .Color = 255
End With

Ahora el código anterior funciona para pestañas individuales, pero me pregunto si hay alguna manera de cambiar las cuatro pestañas al mismo tiempo utilizando Excel VBA.

Gracias.