Почему показывает ошибку z%=

Question

Private Sub Form_Load() 
 Dim ErrorTries As Integer 
 ErrorTries = 0 
 On Error GoTo errorhandler 
 
 z% = Shell("C:\Program Files\Microsoft Office\Office12\EXCEL SOURCE.XLS", 1) 
 
 DoEvents 
 Text1.LinkMode = NONE

Text1.LinkTopic = "Excel|source.xls" 
 
 Text1.LinkTopic = "Excel|C:\VB3\[SOURCE.XLS]Sheet1" 
 
 Text1.LinkItem = "R1C1" 
 Text1.LinkMode = MANUAL 
 ManualLink.Value = True 
 Exit Sub

End Sub

Kirk Masaloff · Accepted Answer

Не знаю на каком языке вы пишите. Если % - оператора деления с остатком, то возможно функция Shell возвращает не число?

Олег Наумов · Answer

А какую ошибку мы должны сами угадать ? :-) 
 
Или результат в Integer не влазит или кто то забыл указать путь к SOURCE.XLS ?