'Display Loading Gif While Macro Is Running

enter image description hereI want display loading macro gif while macro runs behind the problem is the loading GIF doesn't move during macro execution As of now this is all I got from the internet

Private Sub btnFetchFiles_Click ()    
iRow = 14
fPath = Sheet1.txtPath.Text    
UserForm3.Show
'vbModeless
UserForm3.Caption = "LOADING"
UserForm3.Repaint
DoEvents
'vbModeless

'macro located here

   Unload UserForm3    
End Sub


Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source