Set Arr = CreateObject("Scripting.Dictionary") BgnRow = 2 EndRow = .Cells(Rows.Count, "A").End(xlUp).Row For i = BgnRow To EndRow If .Cells(i, "D").Value = "V" Then Arr(i) = .Cells(i, "A").Value End If Next i
请教如何设置一个全工作簿的变数，在其他工作表可以取其值？ 一起帮忙解决难题，拯救 ...
