Dim ArchOrigen, ArchDestino
ArchOrigen = "ARCHORIG" ' Se define el nombre del archivo de origen.
ArchDestino = "ARCHDEST" ' Se define el nombre del archivo destino.
FileCopy ArchOrigen, ArchDestino ' Se copia el archivo de origen en el archivo de destino.