
excel
VBASub AddUp()Dim lastRow As LongDim i As LonglastRow = Range("A:A").End(xlUp).RowFor i = 2 To lastRow If Target = Cells(1, 1) Then Cells(2, 1) = a + Target.Value End IfNext iEnd Sub4. 点击"文件"->"选项"->"高级"(仅适用于Office 365版)。5. 在弹出的对话框中,找到"编辑选项卡上载后是否保留VBA模块" 的选项,并选择"从不保留VBA模块"。6. 确认保存后,在excel窗口中再次进入开发者选项卡。7. 点击工具栏上的"插入",然后选择"模块"。在弹出的对话框中,找到之前保存的VBA模块,点击"插入"。8. 完成以上步骤后,关闭开发者选项卡,在excel窗口中按F5运行宏。通过上述步骤,您可以实现将数据累加在上一次结果上方的功能。Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号