Фильтрация по сдвоенному условию. Функция СЦЕПИТЬ
Аналогом функции Concatenate ООО в Экселе является функция сцепить. Она также может применяться для формирования сдвоенных условий для фильтрации, создания сложных уникальных ключей для постановки и фильтрации.
Sub Concat()
Worksheets(1).Range("L2").FormulaLocal = "=СЦЕПИТЬ(F2;G2)"
n = Sheets("Sheet1").Range("H1").CurrentRegion.Rows.Count
Worksheets(1).Range("L2").AutoFill Destination:=Worksheets(1).Range("H2:H" & n), Type:=xlFillDefault
Worksheets(1).Range("L1") = "Уникаль"
End Sub
Данный код является аналогом кода из поста ООО. Он сцепляется строки Название контрагента и Название типа операции в файле Реестр документов по МХ в отдельном столбце.
Sub Concat()
Worksheets(1).Range("L2").FormulaLocal = "=СЦЕПИТЬ(F2;G2)"
n = Sheets("Sheet1").Range("H1").CurrentRegion.Rows.Count
Worksheets(1).Range("L2").AutoFill Destination:=Worksheets(1).Range("H2:H" & n), Type:=xlFillDefault
Worksheets(1).Range("L1") = "Уникаль"
End Sub
Данный код является аналогом кода из поста ООО. Он сцепляется строки Название контрагента и Название типа операции в файле Реестр документов по МХ в отдельном столбце.
Комментарии
Отправить комментарий