Я работаю над макросом с фиксированной шириной в CSV. Макрос работает как положено, макрос проверяет длины полей по сравнению со вторичным файлом, в котором хранятся длины для проверки. Предполагается поместить слово «Pass» или «Fail» под длинами полей в строке Excel для каждого поля. Проблема в том, что он проверяет только первую ячейку на соответствие второй ячейке, а оставшиеся значения автоматически заполняются на основе количества полей в данном файле.
Необходимо иметь возможность проверять каждое значение ячейки по длине поля по сравнению с проверкой вторичного файла с именем "input_layout"
Range("B2").Select
Selection.AutoFill Destination:=Range(Cells(2, 2), Cells(2, col_count)), Type:=xlFillDefault
Range(Cells(2, 1), Cells(2, col_count)).Interior.ColorIndex = 6
ActiveSheet.Cells(3, 2).Formula = "=IF(B$1=B$2,""Pass"",""Fail"")"
Range("B3").Select
Selection.AutoFill Destination:=Range(Cells(3, 2), Cells(3, col_count)), Type:=xlFillDefault
Range(Cells(3, 1), Cells(3, col_count)).Interior.ColorIndex = 28
Range(Cells(1, 1), Cells(1, col_count)).Interior.ColorIndex = 39