Código [Seleccionar]
Private Sub s4_Click()
Dim ruta As String
Dim destino As String
ruta = App.Path & "/software/DCRPAL/wii-dcr_v2.1_PAL.Elf"
destino = Dir1.Path & s4.Name
FileCopy ruta, destino
End Subpues yo creo que donde tienes s4.name cambiarlo por el nombre k kieras .name no?
saludos

XD, pero descubri un poco tarde ya que el timer solo le puedes poner un min o almenos yo no e sabido ponerlo a mas, estoy seguro que hay la manera pero no se me ocurre, gracias