Добрый день!  
 
Возникла небольшая трудность с обработкой события Chаnge. При удалении данных в ячейке выполняется соответствующий программный код и все нормально. Но если выделить диапазон ячеек, то код выполняется только для одной ячейки.  
 
Как заставить Excel выполнять этот код для каждой ячейки при обработке события Change?

Добрый день!  
 
В Excel ползунок горизонтальной прокрутки листа ориентируется на количество заполненный колонок.  
 
Столкнулся с такой проблемой. После удаления большого количества колонок, ползунок горизонтальной прокрутки не изменил диапазон прокрутки "по умолчанию".  
 
Как можно это исправить?

Подскажите почему моя процедура выдает такую ошибку:  
1004: "Method 'GetOpenFileName' of object '_Application' failed"  
 
Sub SupplementDatabase()  
 
Dim strFileDataSource As String  
Dim strFilter As String  
Dim strTitle As String  
 
strFilter = "Файл БД, *,xlsb"  
strTitle = "Выбор БД"  
strFileDataSource = Application.GetOpenFilename(FileFilter:=strFilter, _  
Title:=strTitle, MultiSelect:=False)  
 
End Sub

Добрый день!  
Подскажите каким образом в VBA можно задать условие для сравнения текста в ячейке одного листа с названием другого?  
Текст в ячейке - 56-43 АА АЕ гр  
Название листа - 56-43  
 
Также встречаються варианты:  
Текст в ячейке - 256-43 АА гр  
Название листа - 256-43  
 
Это условие мне нужно использовать в конструкции IF - THEN  
 
Зарание спасибо