1 и 2 столбик взаимосвязаны. Нужно чтобы второй столбик отсортировался соответственно значениям 3го. в 1 и 2 строк больше. В примере 2 листа, как было и как должно быть...
1 и 2 столбик взаимосвязаны. Нужно чтобы второй столбик отсортировался соответственно значениям 3го. в 1 и 2 строк больше. В примере 2 листа, как было и как должно быть...federal24
Sub Польз_сортировка() Dim strCustomOrder As String, lr As Long lr = Cells(Rows.Count, "C").End(xlUp).row strCustomOrder = Join(WorksheetFunction.Transpose(Range("C1:C" & lr).Value), ",") ActiveSheet.Sort.SortFields.Clear ActiveSheet.Sort.Header = xlNo ActiveSheet.Sort.SetRange Columns("A:B") ActiveSheet.Sort.SortFields.Add key:=Columns("B"), CustomOrder:=CStr(strCustomOrder) ActiveSheet.Sort.Apply Application.DeleteCustomList ListNum:=Application.CustomListCount + 1 ActiveSheet.Sort.SortFields.Clear End Sub
[/vba]
Вариант макросом:
[vba]
Код
Sub Польз_сортировка() Dim strCustomOrder As String, lr As Long lr = Cells(Rows.Count, "C").End(xlUp).row strCustomOrder = Join(WorksheetFunction.Transpose(Range("C1:C" & lr).Value), ",") ActiveSheet.Sort.SortFields.Clear ActiveSheet.Sort.Header = xlNo ActiveSheet.Sort.SetRange Columns("A:B") ActiveSheet.Sort.SortFields.Add key:=Columns("B"), CustomOrder:=CStr(strCustomOrder) ActiveSheet.Sort.Apply Application.DeleteCustomList ListNum:=Application.CustomListCount + 1 ActiveSheet.Sort.SortFields.Clear End Sub
Добрый день! подскажите как сравнить 2 столбца, и найти те значения из столбца А, что не присутствуют в столбце В , при условии, что в каждом столбце значения могут до 7 раз повторяться.... (Это инвентаризация платьев А - что имеется по базе данных, В - что присутствует реально на складе, нужно найти то, что нужно из базы данных удалить, или другими словами , что отсутствует на складе) Помогите, добрые люди! фаил прилагаю.
Стандартное сравнение я так поняла берет в расчет только уникальные значения...((
Добрый день! подскажите как сравнить 2 столбца, и найти те значения из столбца А, что не присутствуют в столбце В , при условии, что в каждом столбце значения могут до 7 раз повторяться.... (Это инвентаризация платьев А - что имеется по базе данных, В - что присутствует реально на складе, нужно найти то, что нужно из базы данных удалить, или другими словами , что отсутствует на складе) Помогите, добрые люди! фаил прилагаю.
Стандартное сравнение я так поняла берет в расчет только уникальные значения...((indy
indy, здравствуйте. Прочитайте Правила форума, создайте новую тему и приложите к ней файл (не более 100 кб), из которого видно что и с чем сравнивать. Если у Вашего вопроса есть кросс-посты (на других форумах по Excel), то укажите ссылки на кроссы.
indy, здравствуйте. Прочитайте Правила форума, создайте новую тему и приложите к ней файл (не более 100 кб), из которого видно что и с чем сравнивать. Если у Вашего вопроса есть кросс-посты (на других форумах по Excel), то укажите ссылки на кроссы.Che79
Делай нормально и будет нормально!
Сообщение отредактировал Che79 - Среда, 18.10.2017, 01:11
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
(Это инвентаризация платьев А - что имеется по базе данных, В - что присутствует реально на складе, нужно найти то, что нужно из базы данных удалить, или другими словами , что отсутствует на складе) Помогите, добрые люди! фаил прилагаю.
