I have several macros that need to be run on each new sheet created.
Maybe I'm thinking too simple, but tried this and not working....

Private Sub Workbook_NewSheet(ByVal sh As Object)
Application.Run "apples"
Application.Run "oranges"
End Sub