
VBA
VBASub 做序()Dim ws As WorksheetFor Each ws In Sheets If ws.Name "Sheet1" Then ws.Cells(1, 1).Value = ws.Cells(Rows.Count, "B").End(xlUp).Value End IfNext ws点击运行按钮或按Ctrl+S保存并退出即可。这个宏会在所有工作表中查找B列中最大的值,并将其填入第一行第一个单元格。如果你想要填入其他列或者使用其他方式来查找最大值,可以根据需求进行修改。希望对您有所帮助!Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号