2013-09-30 4 views

ответ

0

Я думаю, вы поставили их под неправильное место.

Private Sub Workbook_NewSheet(ByVal Sh as Object) 
    Call Macro1 
End Sub 

должен быть поставлен под ThisWorkbook в то время как

Sub Macro1() 
    ... 
    ... 
End Sub 

должны быть поставлены под модули

+0

Спасибо большое! FYI, выражение NewSheet является .NewSheet (Sh). Я нашел это с microsoft.com, когда мой код не работал. Ниже приведен пример с сайта: –

+0

Спасибо большое! FYI, выражение NewSheet является .NewSheet (Sh). Я нашел это с microsoft.com, когда мой код не работал. Пожалуйста, перейдите по ссылке: [Ссылка] (http://msdn.microsoft.com/en-us/library/office/ff821246.aspx) –

+0

Да, я знаю .. Я просто скопирую ваш код: P Я обычно выберите событие из выпадающего списка – sam092

Смежные вопросы