Я должен сделать 2 листа Excel.Один для всех учетных записей определенного клиента, один без.К сожалению, из-за способа указания имени клиента, я вынужден искать этих клиентов, используя подстановочный знак.
Макрос только для клиента работает нормально, но макрос для исключения клиента - нет.
Рабочий макрос:
Sheets("AR Aging").Range("A:J").AutoFilter Field:=2, Criteria1:=Array( _
"*COMPANY*"), Operator:=xlFilterValues
Range("A:J").Copy
Sheets.Add After:=Sheets(7)
ActiveSheet.Paste
Sheets(8).Select
Sheets(8).Name = "XYZ"
Sheets("AR Aging").AutoFilterMode = False
Sheets("AR Aging").Activate
Application.CutCopyMode = False
Единственное отличие заключается в нерабочем макросе,
Criteria1:=Array( "*COMPANY*")
был изменен на
Criteria1:=Array( "<>*COMPANY*")
и номера листов были изменены.