Delay the MsgBox pop up time

[Akw47]

Hello I have this code currently

Sub Check ()
If Cells (i, 8).EntireRow.Font.ColorIndex = 54 then MsgBox "item has been scan"
End If
End sub

However, whenever my other code, that causes the colorindex to change, the MsgBox pops out immediately (too fast). Is there a way to slow it down?

 

[6StringJazzer]

The message box will appear when you call Check. It does not happen automatically when the color changes. However, you have not shown us where Check is called, and that is the code we need to examine to answer your question.

Please show all of your code.