Уважаемые формучане, появилась ошибка 400 при работе макроса. Макрос делит один большой файл с кучей информации на много(14) файлов по необходимым параметрам и сохраняет в указанную папку. Прдеположительно, на втором шаге происходит ошибка. Но вроде все там в порядке. С чем может быть свзяана ошибка? Гугл фактически не дал ответа((

П.С Второй шаг прилагается
Step2:

Set wb3 = Workbooks.Add
For i = 2 To k
Branch(i) = wb1.Sheets(1).Cells(i, 3).Value
Channel(i) = wb1.Sheets(1).Cells(i, 4).Value
wb2.Sheets(1).Activate
wb2.Sheets(1).Range("A1:BR50000" .Select
Selection.AutoFilter Field:=bran_fil, Criteria1:=("*" & Branch(i) & "*"
Selection.AutoFilter Field:=chan_fil, Criteria1:=("*" & Channel(i) & "*"

If i = 2 Then
Range("A1:BR50000" .Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
wb3.Sheets(1).Activate
Range("a1" .Select
Selection.PasteSpecial (-4104)
Selection.AutoFilter
Selection.EntireColumn.AutoFit
ActiveWindow.Zoom = 85
With Range("1:1" .Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark2
.TintAndShade = -0.249977111117893
.PatternTintAndShade = 0
End With
Else
Range("A2:BR50000" .Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
wb3.Sheets(1).Activate
For m = 2 To 50000
If Cells(m, 1) = "" Then
f = m
GoTo Step3
End If
Next m

Добрый вечер, формучане)

Давно и результативно пользуюсь этим сайтом и форумом. Многие приемы взял на заметку. За это сайту огромное СПАСИБО.

На днях столкнулся со следующим вопросом. Есть очень большая база клиентов компании, которые в течение года приобретали товар у компании. Товар поделен на категории и у каждого продукта есть некий код. Также в этой таблице есть суммы покупок, даты покупки, даты доставки и прочая информация.

Задача состоит в следующем. Есть некий список клиентов(все ФИО уникальны) и мне нужно "вытащить" все покупки клиента за год. Мне не нужно считать сумму или количество покупок. Необходимо в ячейке получить перечисление кодов покупок. Помогите, пожалуйста, с идеями как это сделать. И возможно ли такое?

P.S Если нужен эксель пример, то позже смогу его разместить