VBA Excel中查找变量

Question

每个月我都会更新新的账龄余额，然后自动创建一个带有宏的新工作表，该宏将过滤客户。

这是我目前的工作表：

每个月，我都会通过在第10列添加评论来跟踪客户的付款。

在最新页面上，我想在第10列之后添加旧评论，因此在11,12,13列将有旧评论...因此，新列将与客户表一样多。 / p>

旧评论位于“ clients 2019-01-31”和“ clients 2019-02-28”表中 我想将它们添加到“客户端2019-03-30”中

为此，我认为使用Vlookup是最好的计划。但是看起来我变量太多，无法正常工作

  

错误1004。

我真的做了很多事情，例如在每个单元格之前声明工作表，在之前激活工作表。 工作表（Sheets.Count）。激活

我无法正常工作。如果不清楚，请告诉我，我会尽力解释。

Sub Macro1()

Dim nbCustomer ' Customer Number, this value is not fix in my whole program
nbCustomer = 244

Dim numCol ' Column Number
numCol = 11

Dim nbws ' Sheets number
nbws = Sheets.Count

nbws = nbws - 1 ' Because we don't need to lookup on the last page

     While (nbws > 1)

         Dim numL ' Line Number
         numL = 2


              While (numL <= nbCustomer)
              nbCustomer = nbCustomer + 10
              Worksheets(Sheets.Count).Cells(numL, numCol) = Application.VLookup(Cells(numL, 1), Sheets(nbws).Range(Cells(1, 1), Cells(nbCustomer, 10)), 10, False)
              numL = numL + 1
              nbCustomer = nbCustomer - 10
              Wend

         numCol = numCol + 1
         nbws = nbws - 1 ' we will look up our data on the previous sheet

     Wend

End Sub