Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Как выделить определенные строки в excel.
 
#1
20.01.2011 13:20:14
Как выделить определенные строки в excel  
Например,с 1000 до 2000 позиции
 
 
 
#2
20.01.2011 13:28:28
1. Выделить строку № 1000, зажать Shift, прокрутить до строки № 2000 и клацнуть по ней..  
2. Выполнить макрос:  
Sub SelectRows()  
Rows("1000:2000").Select  
End Sub
 
 
 
#3
20.01.2011 13:29:39
например напечатать в окне адреса(что слева в строке формулы) "1000:2000"
Живи и дай жить..
 
 
 
#4
20.01.2011 13:37:02
или выделить ячейку А1, зажать Shift+стрелка вправо до нужной ячейки а потом Shift+стрелка вниз :)
 
 
 
#5
20.01.2011 13:37:43
А1000
 
 
 
#6
20.01.2011 13:39:51
А вправо зачем?
 
 
 
#7
20.01.2011 13:45:18
как зачем?)  
если только вниз, то выделим только диапазон А1000:А2000 :)
 
 
 
#8
20.01.2011 13:52:41
Так ведь просят СТРОКИ. Вы собираетесь прокручивать до последнего столбца? Клик по кнопке строки...
 
 
 
#9
20.01.2011 14:04:54
{quote}{login=Юрий М}{date=20.01.2011 01:28}{thema=}{post}1. Выделить строку № 1000, зажать Shift, прокрутить до строки № 2000 и клацнуть по ней..  
2. Выполнить макрос:  
Sub SelectRows()  
Rows("1000:2000").Select  
End Sub{/post}{/quote}  
А можно ли усовершенствовать макрос, что бы "1000" и "2000" можна было вводить, допустим, Поле (ActiveX)?
I love 1C. I love CS 1.6 :)      
 
 
 
#10
20.01.2011 14:06:17
Юрий, я всего лишь написал вариант как МОЖНО выделить :)  
так можно? можно)
 
 
 
#11
20.01.2011 14:11:07
{quote}{login=Димон}{date=20.01.2011 02:06}{thema=}{post}Юрий, я всего лишь написал вариант как МОЖНО выделить :) так можно? можно){/post}{/quote}  
Димон, так ведь можно и поочерёдно, удерживая Ctrl, выделить каждую ячейку строки до последнего столбца... Так можно? Можно. Другое дело - продуктивно это или нет. Зачем же советовать такое?
 
 
 
#12
20.01.2011 14:13:07
"А можно ли усовершенствовать макрос, что бы "1000" и "2000" можна было вводить, допустим, Поле (ActiveX)"  
Можно. А чем не нравится совет Слэна? Ведь простой очень вариант.
 
 
 
#13
20.01.2011 14:13:49
Sub SelectRows()  
Dim x1 As Integer, x2 As Integer  
x1 = TextBox1.Value  
x2 = TextBox2.Value  
Rows(x1 & ":" & x2).Select  
End Sub  
 
вроде так)
 
 
 
#14
20.01.2011 14:21:02
{quote}{login=Юрий М}{date=20.01.2011 02:11}{thema=Re: }{post}  
Димон, так ведь можно и поочерёдно, удерживая Ctrl, выделить каждую ячейку строки до последнего столбца... Так можно? Можно. Другое дело - продуктивно это или нет. Зачем же советовать такое?{/post}{/quote}  
 
Юрий, это была всего лишь шутка)  
можно многими способами)  
 
вариант слэна действительно простой, а если надо выделить допустим строки 1000:1500 и 1700:2000 - можно просто через точку с запятой перечислить.
 
 
 
#15
20.01.2011 14:21:54
Sub SelectRows()  
Dim x As Long, y As Long  
x = Application.InputBox(Prompt:="Укажите номер первой строки", Title:="Выбираем стартовую строку", Type:=1)  
y = Application.InputBox(Prompt:="Укажите номер последней строки", Title:="Выбираем конечную строку", Type:=1)  
Rows(x & ":" & y).Select  
End Sub
 
 
 
#16
20.01.2011 14:29:39
ИМХО лучше один раз запросить:  
 
Sub SelectRows()  
Dim x  
x = InputBox("Укажите номер первой и последней строки через пробел", "Выбираем диапазон строк", ActiveCell.Row & " ")  
x = Split(x)  
Range(x(0) & ":" & x(1)).Select  
End Sub
 
 
 
#17
20.01.2011 14:33:54
Ага, а если клавиша "пробел" не работает, или не там нажали? :-)
 
 
 
#18
20.01.2011 14:37:49
{quote}{login=Юрий М}{date=20.01.2011 02:13}{thema=Re: Re: }{post}"А можно ли усовершенствовать макрос, что бы "1000" и "2000" можна было вводить, допустим, Поле (ActiveX)"  
Можно. А чем не нравится совет Слэна? Ведь простой очень вариант.{/post}{/quote}  
Можно как-то и к формуле прикрутить :)  
спасибо :)
I love 1C. I love CS 1.6 :)      
 
 
 
#19
20.01.2011 14:48:25
DJ_Serega  
> Можно как-то и к формуле прикрутить :)  
 
Объясните, что Вы хотите. Моих телепатических способностей не хватает ;)  
 
Юрий М  
> Ага, а если клавиша "пробел" не работает, или не там нажали? :-)  
 
Ни одно животное не пострадает :) В твоем коде тоже защиты от дурака нет :)
 
 
 
#20
20.01.2011 14:51:47
Гы, ну хоть животины не пострадают - и то хорошо :-)
 
 
 
#21
20.01.2011 15:02:20
но по сути, все эти макросы почти то же, что и совет слэна, только иначе чуть ввод строк)
 
 
 
#22
20.01.2011 15:05:03
Та я и сам пока не знаю куда применить :)  
Но придумаю точно, и если загнусь, попрошу у Вас помощи :)
I love 1C. I love CS 1.6 :)      
 
 
 
Страницы: 1
Читают тему
Наверх