Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Эксель - выделить строку по фильтру / 11 сообщений из 11, страница 1 из 1
08.10.2004, 10:20
    #32729249
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Программно по некоторым критериям фильтруются данные табл. Но далее необходимо выделить строку данных, отобранных по фильтру.
КАК енто сделать ??? (пятница - и я уже не соображу), подскажите,плз.
Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 10:23
    #32729261
Алексей2003
Алексей2003
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
как выделить та хоть?
может проверять на видимость строки, если она видима... то выделять как нужно?

для спящего время бодрствования равносильно сну
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 10:27
    #32729276
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Нада выделить для последующего копирования...
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 10:49
    #32729352
Алексей2003
Алексей2003
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
если с использованием автофильтра, тогда в лоб... выделяешь строки с по и копируешь, при вставке вставятся только видимые строки... во всяком случае макрос показывает только это...


для спящего время бодрствования равносильно сну
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 10:54
    #32729365
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
    Set sh=ActiveSheet
    Set Goal = GetLastCell(sh)
    Dim ie As Long, je As Long
    ie = Goal.Row: je = Goal.Column
    sh.Range(sh.Cells( 13 ,  1 ), sh.Cells(ie, je)).AutoFilter _
            Field:= 2 , Criteria1:=">=" & Format(dbToPrint, "0"), _
            Operator:=xlAnd, Criteria2:="<=" & Format(deToPrint, "0")
    
    Set Goal = sh.AutoFilter.Range
    If Goal.Rows.Count >  1  Then
        Worksheets.Add After:=Worksheets("Печать")
        Set shX = Worksheets(Worksheets.Count)
        shX.Name = "ForStepler"
        sh.Activate
        Goal.Select
        Selection.Copy Destination:=shX.Range("A1")
P.S.
Это, естественно, фрагмент ;-)))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 10:58
    #32729379
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Алексей2003если с использованием автофильтра, тогда в лоб... выделяешь строки с по и копируешь, при вставке вставятся только видимые строки... во всяком случае макрос показывает только это...


для спящего время бодрствования равносильно сну
Круто!!!
Тока я говорю : Каки строки-то выделять, если енто всё не ручками, а программно ??? Как объяснить, каку строку? Ведь после фильтра активизация (выделение строки/ячейки не происходит). Мона через поиск определенного значения по данным фильтра (при ентом ячейка результата поиска становится активной), но мине так не нравится...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 11:25
    #32729486
Алексей2003
Алексей2003
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
так?
Код: plaintext
  ws.Rows("2:50").Copy

для спящего время бодрствования равносильно сну
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 12:01
    #32729620
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Алексей2003так?
Код: plaintext
  ws.Rows(" 2:50 ").Copy

для спящего время бодрствования равносильно сну
Господи !!!
Как мне узнать это красное ???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 12:12
    #32729648
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
Всё, хоть и пятница - сделал (примитив!!!)
ActiveCell.EntireRow.Select
Всём спасибо, тема закрыта...
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 12:52
    #32729785
Алексей2003
Алексей2003
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
еще раз... если делается фильтрация с помощью автофильтра, и остается только одна строка, тогда достаточно знать общее количество строк (с какой по какую), выбираете ВСЕ, в итоге когда вы вставите, вставится только одна строка (отфильтрованная) или не одна, если их было больше.

для спящего время бодрствования равносильно сну
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 14:37
    #32730114
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эксель - выделить строку по фильтру
To Stepler

Алексей2003еще раз... если делается фильтрация с помощью автофильтра, ... выбираете ВСЕ, в итоге когда вы вставите, вставится только одна строка (отфильтрованная) или не одна, если их было больше.В приведенном фрагменте кода строка
Код: plaintext
    Set Goal = sh.AutoFilter.Range
как раз и объединяет (возможно, разрозненные) строки, выделенные рамкой "бегущие муравьи", в один непрерывный диапазон.
Который, будучи выделенным (Goal.Select), копируется как единое целое.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Эксель - выделить строку по фильтру / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 468ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2186524]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 38ms
get topic data:
 9ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 343ms
total:  468ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]