Создание макроса, который запускается из последней строки, из которой он был закрыт - PullRequest
0 голосов
/ 21 февраля 2020

Я пытаюсь создать макрос, который находит столбец и копирует значения столбца под ним. Обеспечивается индексация столбцов, с помощью которой макрос находит столбец на другом листе. Макрос работает нормально, когда я запускаю его в первый раз, но во второй раз, когда я перезапускаю макрос, я хочу, чтобы макрос исключал столбцы, которые я сделал в первый раз, и делаю то же самое снова. Код указан ниже:

For i = 2 to 18 Step 2 'i is the the column index from which it will paste the info in the next sheet according to the column index
 For j = 3 to 39 'j is the rows
  Windows("Tracker Macro.xlsm").Activate
  ActiveSheet.AutoFilterMode = False
  Worksheets("Allowance").Activate
  x = Cells(j,i).Value
  y = Cells(1,i).Value
  wb.Activate
  ActiveSheet.AutoFilterMode = False
  LR = Cells(Rows.Count, x).End(xlUp).Row
  LC = Cells(1, Columns.Count).End(xlToLeft).Column
  Range(Cells(2,1), Cells(LR, LC)).AutoFilter Field:x, Criteria1:="="
   For Each Cell In Range(Cells(3, x), Cells(LR, x)).SpecialCells(xlCellTypeVisible)
    wb.Activate
    s = Cell.Row + 2
     If s <> 4 then
      wb1.Activate
      Worksheets("Sheet1").Activate
      Cells(s,y) = "x"
     End If
   Next Cell
 ActiveSheet.AutoFilterMode = False
 Next j
Next i

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...