почему скрипт в модуле работает, а в листе нет?

[gramp]

уважаемые, осваиваю vba
вот код

Sub timer11()
Application.Run "timer10"
End Sub
Sub timer10()
Dim flagrun As Integer
flagrun = Worksheets("1").Range("A11").Value
If flagrun = 1 Then
Application.Run "messag11"
End If
If flagrun = 0 Then
MsgBox "закончено"
Exit Sub
End If
Application.OnTime Now + TimeValue("00:00:05"), "timer11"
End Sub
Sub messag11()
Dim MySecond As Integer
MySecond = Second(Time)
MsgBox "MySecond= " & MySecond
End Sub

почему, когда я его размещаю в модуле, то он работает, а когда в листе (конечно же, с другими именами процедур) то не работает?

второй вопрос - предположим, что messag11 расположен в листе "1", а timer10 и timer11 - в модуле, как вот эту команду Application.Run "messag11" написать так, чтобы она запустила messag11, код которого находится на листе "1"?

[doober]

Sub timer10()
Dim flagrun As Integer
flagrun = Worksheets("1").Range("A11").Value
If flagrun = 1 Then
Application.Run "Лист1.messag11"
End If
If flagrun = 0 Then
MsgBox "çàêîí÷åíî"
Exit Sub
End If
Application.OnTime Now + TimeValue("00:00:05"), "Лист.messag11"
End Sub

[Djeki]

Макросы модуля листа являются приват, независимо от их обьявления публик , и вызвать их из другого модуля нельзя никак !!!

[Hugo121]

Разве?
В листе Sheet1

Sub tt()
MsgBox 1
End Sub

В модуле

Sub ttt()
Sheet1.tt
End Sub

Прекрасно себе работает...
Причём не только из основного модуля, но и из модуля другого листа.

[doober]

проверить бы не мешало
Заменил вложение,выгрузил не тот файл

[Djeki]

Сообщение от Hugo121

Разве?
В листе Sheet1

Sub tt()
MsgBox 1
End Sub

В модуле

Sub ttt()
Sheet1.tt
End Sub

Прекрасно себе работает...
Причём не только из основного модуля, но и из модуля другого листа.

Вы правы. Но порядок вызова отличается от обычного..
Sheet1.tt

[gramp]

спасибо большое)

[SAS888]

Сообщение от Djeki

...вызвать их из другого модуля нельзя никак !!!

Кто Вам такое сказал? Какие проблемы вызвать private макрос из другого модуля? Я часто так делаю. Например, если требуется запускать макрос по нажатию кнопки на рабочем листе, то я этому макросу устанавливаю статус private. В результате, его не видно в списке макросов. Во-первых, это ни к чему. Во-вторых, исключается возможность запуска макроса при другом активном листе.
А запустить private макрос (например, с именем "Main") из другого модуля очень просто, используя

Run "Main"

[gramp]

подниму тему - к сожалению, при размещении кода в листе, а не в модуле, вот так не работает: Application.Run "Лист1.messag11"
офис 2010
есть ли способ запустить процедуры в листе?
код в первом посте.