FileCopy - Automatically TRY AGAIN whenever an unexpected error occurs (0X8007003B)

I searched for hours but cannot find a solution. Hoping I can get the answer here.

I am doing a FileCopy through VBA and wants the code to automatically Try Again whenever an "unexpected network error has occurred" error happens. Can this be done via VBA?

Note that I have access to the network folder, the error is just common due to VPN connectivity issues.

    file_ext = "*.xlsx"

    FSO.CopyFile Source:=dummy_source_path & "\" & file_ext, _
    Destination:=dummy_path