我需要 for next 循环中单元格的值。到目前为止我有这个:
'Sub getcellvalue()
Dim Man_Rows As Integer
Man_Rows = Sheets("Managers").Cells(Rows.Count, "A").End(xlUp).Row
Dim Man_Name As Variant
Dim Man_cell As Variant
For Each Man_cell In Sheets("Managers").Range("A1:A" & Man_Rows)
Man_Name = Sheets("Managers").Range("A" & Man_cell).Value
' do stuff here
Next Man_cell
End Sub'
我打破了“Man_Name = Sheets(“Managers”).Range(“A”& Man_cell).Value”
请帮忙 谢谢
我想通了。 我替换了“Man_Name = Sheets(“Managers”).Range(“A”& Man_cell).Value” 与 Man_Name = Man_cell.Value