VBA For循环仅显示最后的数据_Vba_For Loop

VBA For循环仅显示最后的数据

vba for-loop

VBA For循环仅显示最后的数据,vba,for-loop,Vba,For Loop,我试图将整列的“U”和“AC”相乘，并在“AE”处显示它们。但是，输出仅显示所有“AE”列的最后一个乘法结果 e、 g。 145.49 145.49 145.49 谁能告诉我这段代码有什么问题吗您最后一次的值是多少？您可以为循环替换，只需使用范围（“AE2:AE”&last）。公式=“=$U2”和“*$AC2”即可在整个范围内输入公式，只要输入上述完整代码？我运行了你的代码，效果很好。@ShaiRado我得到了last的最后一行数字，即826。你的代码对我来说很好，但我能知道为什么for

我试图将整列的“U”和“AC”相乘，并在“AE”处显示它们。但是，输出仅显示所有“AE”列的最后一个乘法结果

e、 g。 145.49 145.49 145.49

谁能告诉我这段代码有什么问题吗

您最后一次的

值是多少？您可以为

循环替换

，只需使用范围（“AE2:AE”&last）。公式=“=$U2”和“*$AC2”
即可在整个范围内输入公式，只要输入上述完整代码？我运行了你的代码，效果很好。@ShaiRado我得到了last
的最后一行数字，即826。你的代码对我来说很好，但我能知道为什么for循环不能工作吗？@WayneG.Dunn它可以工作，但不是我想要的结果。整个“AE”列的输出是否都相同？当ActiveSheet.UsedRange.Rows.Count>32767
时，代码将失败，并出现溢出
错误。将变量声明为Long
，并使用有意义的名称l
在视觉上与1太相似，对您未来的自我或替代者没有任何意义。
Dim l As Integer
Dim last As Integer

last = ActiveSheet.UsedRange.Rows.Count 

Range("AE1").Select
Selection.Value = "Open RPR $"

For l = 2 To last
    Range("AE" & l).Formula = "=$U$" & l & "*$AC$" & l
Next l
ActiveCell.Clear