I have started this basic code that attempts to give me the max value throughout all worksheets, but have not defined a range (should be column A across all worksheets). An alert appears on each sheet, and I'd like it to add the largest value into an array and only output the max value from all worksheets once in a single alert, after having reached the last worksheet.

[VBA]
Sub ListMaxValuesFromSheet()
For Each ws In ActiveWorkbook.Worksheets
With ws
MsgBox WorksheetFunction.Max(.UsedRange), vbExclamation
ActiveSheet.Next.Select
End With
Next
End Sub
[/VBA]

The idea is to find the last assigned bug tracker ID across all worksheets and have it displayed so the user knows where they left off.