Como pausar una macro que esta en ejecución

Tengo una macro que lo he creado en un userform, funciona correctamente pero quiero agregar un botón que pueda pausar o parar la ejecución y adicional mente quiero que me agregue en un textbox del nombre de la foto que esta ejecutándose y que lo tengo en una hoja del libro allí dejo macro que estoy usando.

Private Sub UserForm()
Sheets("FORMULA").Select
Dim Celda As Range
Dim UltimaFila As Long
Dim Ruta$
Let UltimaFila = Cells(Rows.Count, 5).End(xlUp).Row
Let Ruta = ThisWorkbook.Path & "\Foto\"
For Each Celda In Range("C1:C" & UltimaFila)
Application.ScreenUpdating = False
Me.Image1.Picture = LoadPicture(Ruta & Celda.Value)
Application.Wait Now + 1 / (24 * 60 * 60# * 2)
DoEvents
Next Celda

End Sub

Añade tu respuesta

Haz clic para o