Приветствую! Такая проблема. помогите найти ошибку.  
есть форма и таблица Excel, нужно данные из столбца таблицы связать с ListBoox_ом,  
в одной форме в ListBox1 работает, вот код...  
 
Private Sub UserForm_Activate()  
Worksheets.Item("Лист1").Activate  
Dim КолВагон As Range  
Set КолВагон = Range("A6:A14")  
Dim vars As Variant  
For Each vars In КолВагон  
UserForm1.ListBox1.AddItem (vars)  
Next vars  
End Sub  
 
... а вот тоже самое с другим таким ListBoox2 не работает, делаю вот так...  
 
Private Sub UserForm_Activate()  
Worksheets.Item("Лист1").Activate  
Dim КолВагон As Range  
Set КолВагон = Range("C6:C14")  
Dim vars As Variant  
For Each vars In КолВагон  
UserForm1.ListBox2.AddItem (vars)  
Next vars  
End Sub  
 
просто переписал код поменял строку в таблице и номер листбокса, выдает ошибку -    
Compile error:  
Ambiguous name detected: UserForm_Activate  
...  
 
Помогите найти ошибку