Simultaneously add sheets to multiple workbooks

I have 3 different workbooks: MonthlyTracking.xls, MonthlySEMReport.xls, and MonthlyTrackingStatsCanReport.xls
Each of these workbooks have sheets named for each month (Mar 2012)
I want to use my NewMonth macro in MonthlyTracking.xls to call the similar functions in the other workbooks so they will all have a new sheet added to them at the same time.

This is the code that I thought would do it:

'other code above this creates a sheet in MonthlyTracking.xls
Application.Run "MonthlySEMReport.xls!NewMonthSEM"
Application.Run "MonthlyTrackingStatsCanReport.xls!NewMonthSC"

But it just adds 3 sheets to MonthlyTracking.xls
Is there a way I can do this?

Turns out I was changing the ActiveSheet.name before calling "sSheetName = ActiveSheet.name"
So I moved this line to before the name change and it works now.