Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.02.2012, 19:41   #1
Gadvain
Новичок
Джуниор
 
Регистрация: 27.02.2012
Сообщений: 4
По умолчанию Сравнивание строк

Доброе время суток.
Подскажите пожалуйста, как в Excel сравнивать строки?

У меня такая задача, к примеру есть 5 столбцов и 30 строчек. В каждой ячейке занесено рандомное не повторяющиеся число в диапазоне от 1 до 50. Каждая строка в отдельности отсортирована по возрастанию. как можно проверить строки на предмет полного совпадение?
Надеюсь доступно объяснил.
Спасибо.
Gadvain вне форума Ответить с цитированием
Старый 27.02.2012, 20:00   #2
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Может вот это?
Извлечение уникальных строк из таблицы по нескольким столбцам
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума Ответить с цитированием
Старый 27.02.2012, 21:08   #3
Gadvain
Новичок
Джуниор
 
Регистрация: 27.02.2012
Сообщений: 4
По умолчанию

Спасибо!!! То что надо!!!
Gadvain вне форума Ответить с цитированием
Старый 27.02.2012, 23:47   #4
Gadvain
Новичок
Джуниор
 
Регистрация: 27.02.2012
Сообщений: 4
По умолчанию

А еще такой вопрос, есть ли макрос, который сортировал бы отдельно каждую СТРОКУ по возрастанию. Просто приходиться самому выделять пять ячеек, следом заходить "Данные -- Сортировка -- и т.д.", когда строк штук 30-50 то еще ладно, можно мин 5 посидеть да отсортировать, а вот когда будет 150-250, уже просто так не посидишь. Или может не макрос нужен, вообщем я не силен в Excel.
Gadvain вне форума Ответить с цитированием
Старый 28.02.2012, 01:06   #5
motorway
Участник клуба
 
Регистрация: 28.06.2009
Сообщений: 1,950
По умолчанию

Вот макрос для сортировки чисел в 5 столбцах для строк от 1 до 100:
Код:
Sub Макрос1()
'
' Макрос1 Макрос
'

'

For i = 1 To 100
    Range("A" & i & ":E" & i).Select
    ActiveWorkbook.Worksheets("Лист1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Лист1").Sort.SortFields.Add Key:=Range("A" & i & ":E" & i), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Лист1").Sort
        .SetRange Range("A" & i & ":E" & i)
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlLeftToRight
        .SortMethod = xlPinYin
        .Apply
    End With
    
    Next i
End Sub
motorway вне форума Ответить с цитированием
Старый 28.02.2012, 01:15   #6
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Сортировка по-строчно (сортировка строк):

Код:
Sub Макрос2()
Dim c As Range
For Each c In Selection.CurrentRegion.Rows
c.Sort Key1:=c.Cells(1), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight
Next
End Sub
Курсор поставить внутрь сортируемого диапазона, пустых строк/столбцов быть не должно (сортируется только Selection.CurrentRegion).
Но это можно конечно изменить.
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 28.02.2012 в 01:19.
Hugo121 вне форума Ответить с цитированием
Старый 28.02.2012, 12:11   #7
Gadvain
Новичок
Джуниор
 
Регистрация: 27.02.2012
Сообщений: 4
По умолчанию

Ребята, всем спасибо большое, все работает, очень благодарен всем!!
Еще разок спасибо!!
Gadvain вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сравнивание таблиц и выявление несоответствий irinka2706 Microsoft Office Excel 4 22.02.2012 09:04
Сравнивание картинок Lemo Помощь студентам 1 18.01.2011 14:03
Клиент - Сервер : Сравнивание DLL jONNY[ReWIRE] Общие вопросы C/C++ 3 15.08.2010 06:48
Сравнивание ячеек двух таблиц Rainkhz Общие вопросы Delphi 2 29.05.2010 19:16
Сравнивание цветов Zeraim Общие вопросы Delphi 7 26.04.2008 12:49