ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Range=Range как правильно сделать?
12 сообщений из 12, страница 1 из 1
Range=Range как правильно сделать?
    #34780318
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
udgeen69
Участник
Есть строки, необходимо отловить одинаковые, для этого надо проверить
Код: plaintext
WS.Range ("B" + Trim(str(k)) + ":M" + Trim(str(k)))=WS.Range("B" + Trim(str(i)) + ":M" + Trim(str(i)))


Как максимально просто и быстро (строк много) сравнить их? Как перебирать я напишу сам.
Спасибо
...
Рейтинг: 0 / 0
06.09.2007, 11:33:26
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780345
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
лучше воспользоваться метом find и findnext
...
Рейтинг: 0 / 0
06.09.2007, 11:36:47
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780363
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
Подстановка значений
...
Рейтинг: 0 / 0
06.09.2007, 11:39:47
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780901
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
udgeen69
Участник
А как выбрать из Range("A1:Z1") (входящий в функцию сравнения параметр) элемент номер Х (Для сравнения по номеру)? Ну например как взять оттуда Range("A1"), а потом сделать offset?
...
Рейтинг: 0 / 0
06.09.2007, 13:04:07
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780922
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
udgeen69
Участник
IRange.Cells(0, X)?
...
Рейтинг: 0 / 0
06.09.2007, 13:08:16
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780924
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Код: plaintext
1.
2.
3.
Public Function RngAndRng(Rng1 As Range, Rng2 As Range) As Boolean
On Error Resume Next
 RngAndRng = Evaluate("and(" & Rng1.Address(, , , True) & "=" & Rng2.Address(, , , True) & ")")
End Function
...
Рейтинг: 0 / 0
06.09.2007, 13:08:23
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780925
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
в таких случаях обычно, если ситуация позволяет, сортирую диапазон, если нужно, предварительно делаю составной ключ. Потом нужно просто сравнивать соседние ячейки.
...
Рейтинг: 0 / 0
06.09.2007, 13:08:29
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780951
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
udgeen69
Участник
Deggasad
Код: plaintext
1.
2.
3.
Public Function RngAndRng(Rng1 As Range, Rng2 As Range) As Boolean
On Error Resume Next
 RngAndRng = Evaluate("and(" & Rng1.Address(, , , True) & "=" & Rng2.Address(, , , True) & ")")
End Function


Спасибо!! Работает
*ушел читать про Evaluate
...
Рейтинг: 0 / 0
06.09.2007, 13:12:25
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34780992
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
udgeen69
Спасибо!! Работает
*ушел читать про Evaluate

Evaluate только позволяет формулу просчитать обычную без листа.
Читай про AND() или И() и про массивы
{=И(H22:H38=C22:C38)}
вводится через <Ctrl> + <Alt> + <Enter>
...
Рейтинг: 0 / 0
06.09.2007, 13:18:15
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34781282
Фотография udgeen69
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
udgeen69
Участник
Deggasad udgeen69
Спасибо!! Работает
*ушел читать про Evaluate

Evaluate только позволяет формулу просчитать обычную без листа.
Читай про AND() или И() и про массивы
{=И(H22:H38=C22:C38)}
вводится через <Ctrl> + <Alt> + <Enter>

а где массивы в этом примере? Всмысле, что если вводить через строку формул, то надо было бы как массив вводить?
...
Рейтинг: 0 / 0
06.09.2007, 14:07:20
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34781439
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
udgeen69 Deggasad udgeen69
Спасибо!! Работает
*ушел читать про Evaluate

Evaluate только позволяет формулу просчитать обычную без листа.
Читай про AND() или И() и про массивы
{=И(H22:H38=C22:C38)}
вводится через <Ctrl> + <Alt> + <Enter>

а где массивы в этом примере? Всмысле, что если вводить через строку формул, то надо было бы как массив вводить?

1) Если вводить в ячейку, то вводится через <Ctrl> + <Alt> + <Enter>, т.е. ответ да
2) Формула хоть где её не вводи обрабатывает массив.
...
Рейтинг: 0 / 0
06.09.2007, 14:29:02
| Ответить | Цитировать | Написать  
Range=Range как правильно сделать?
    #34782560
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
udgeen69А как выбрать из Range("A1:Z1") (входящий в функцию сравнения параметр) элемент номер Х (Для сравнения по номеру)? Ну например как взять оттуда Range("A1"), а потом сделать offset?вот, читай здесь: http://sql.ru/forum/actualthread.aspx?tid=409876#3930377
...
Рейтинг: 0 / 0
06.09.2007, 18:47:19
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Range=Range как правильно сделать?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34780924&tid=2182324]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 40ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 2ms
others: 196ms
total:  326ms
созд. / загр.: 326ms
x
x
Закрыть


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