Здравствуйте!  
 
Есть два макроса на одном листе - один автоматически добавляет время в определенный диапазон на второй лист, второй служит для обнуления зависимого списка.  
Вставил оба макроса на лист, но почему-то они вместе не работают. По отдельности все работает, вместе ни в какую.  
Макросы:  
 
Private Sub Worksheet_Change(ByVal Target As Range)  
   If Target.Cells.Count > 1 Then Exit Sub  
   If Intersect(Target, Range("B2:B2000")) Is Nothing Then Exit Sub  
   On Error GoTo Exit_  
   With Sheets("Table_MSSQL")  
       If .Cells(Target.Row, "E") <> "" Then  
           Application.EnableEvents = False  
           .Cells(Target.Row, "C").Value = Now  
           .Cells(Target.Row, "C").EntireColumn.AutoFit  
       Else  
           .Cells(Target.Row, "C").Value = Empty  
       End If  
   End With  
Exit_:  
   Application.EnableEvents = True  
 End If  
End Sub  
Private Sub Worksheet_Change(ByVal Target As Range)  
If Target.Address = [Ãîðîä].Address Then
   [Ðàéîí] = ""
  End If  
End Sub  
 
Что не так?

Здравствуйте!  
 
Как задать последовательность/порядок ввода номера дома/строения в ячейку? Порядок таков, разрешено: до четырех цифр, затем буква (русский алфавит "а-я"), далее правый слэш "/", затем три цифры и одна буква (так же "а-я") - "1111а/111б".

Здравствуйте!  
 
Столкнулся со следующей проблемой. Имеется многоуровневый список районов и населенных пунктов. В нескольких районах присутствуют населенные пункты с одинаковыми названиями, но разными идентификаторами. Необходимо по названию населенного пункта из определенного района найти в таблице его идентификатор. В диапазоне приведены районы, населенные пункты и их идентификаторы.    
Полагаю, надо ввести функцию, которая будет находить искомый населенный пункт в указанном  диапазоне, находить его идентификатор, при этом сравнивая на принадлежность тому или иному району.  
Прошу помочь с решением задачи (см. прикрепленный файл)