VBA Excel在另一个工作簿上查找最后一行索引

Question

这是我在VBA Excel下编写的代码的一部分

我想要做的是在另一个工作簿的工作表上创建一个循环但是最后一行索引代码行似乎不起作用

工作表上B列的最后一行索引＆＃34; AD CAPITAL＆＃34;已打开的工作簿＆＃34; Inventaire des OPCVM -AMMC.xls＆＃34;索引i上的循环需要，该行应该返回最后一行索引，但它返回错误说＆＃34;索引不属于选择＆＃34;

我希望通过您的互动找到解决方案

Sub Transpariser()

Workbooks("d05_MARCHE.xlsx").Sheets("Feuil1").Activate

Dim i, j, m, k, z, l As Integer
m = 0
i=0
j=0
k=0
z=0
l=0

Dim n As Worksheet
Set n = Sheets("Feuil1")

Dim v As Workbook
Set v = Workbooks("Inventaire des OPCVM -AMMC.xls")

n.Range("A1").Value = "Titres"

For j = 2 To 114

l = v.Sheets("AD CAPITAL").Cells(Rows.Count, 2).End(xlUp).Row    `***This is the line of code where it kept bugging*** `

For i = 1 To l

If v.Sheets("AD CAPITAL").Cells(i, 2).Value = Sheets("Feuil3").Cells(j, 1).Value Then
m = i
Set n = v.Sheets("AD CAPITAL")
End If
Next i
...