Mover un archivo

3 envíos / 0 nuevos
Último envío
argacha
Imagen de argacha
Offline
última acción: Hace 1 año 7 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntos
alta: 10/01/2007 - 08:28
Puntos: 1982
Mover un archivo

Para asegurarme que ya he importado los datos de un archivo, ¿cómo puedo moverlo a otro directorio?

Lo tengo abierto. Puedo "guardarlo com" y borrar el original. 

NO sé qué es lo mejor y tampoco sé se cóm hacerlo

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 1 día 6 horas
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
Re: Mover un archivo

para borrar un archivo, puedes emplear KILL

Kill rutacompletaatuarchivo

 

Para mover un archivo existente, puedes emplear un objeto FileSystemObject, este objeto tiene un método movefile

Te dejo un procedimiento de ejemplo que mueve un archivo de un sitio a otro:

 

Sub MoverArchivo(rutaoriginal As String, rutafinal As String)

    Dim miobjetoFS As Object

    Set miobjetoFS = CreateObject("Scripting.FileSystemObject")

    miobjetoFS.MoveFile rutaoriginal, rutafinal

    Set miobjetoFS = Nothing

End Sub

 

 

------
Ya sé Excel, pero necesito más.

argacha
Imagen de argacha
Offline
última acción: Hace 1 año 7 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntos
alta: 10/01/2007 - 08:28
Puntos: 1982
Re: Mover un archivo

OK

Así lo he hecho y funciona perfectamente.