Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
как выделить ряды, которым принадлежат не соседние ячейки?
 
#1
22.09.2010 11:07:20
Понимаю, что вопрос чайника...  
Задачка: выделено сотни две НЕ СОСЕДНИХ ячеек в столбце; как выделить ряды, которым эти ячейки принадлежат?  
Ctrl + мышь на каждом ряду не подходит, по понятной причине.
 
 
 
#2
22.09.2010 11:43:25
Sub tt()  
Dim oRNG As Range, cc As Range  
 
For Each cc In Selection.Cells  
If oRNG Is Nothing Then Set oRNG = Rows(cc.Row).EntireRow Else Set oRNG = Union(oRNG, Rows(cc.Row))  
Next  
oRNG.Select  
 
End Sub
 
 
 
#3
22.09.2010 11:51:23
Sub ttt()  
Selection.EntireRow.Select  
End Sub  
 
 
:)
 
 
 
#4
22.09.2010 12:02:03
Так чуток короче :-)
 
 
 
Страницы: 1
Читают тему
Наверх