Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Cambiar de nombre de Archivo

04/09/2003 - 18:59 por osalazarg | Informe spam
Ayuda Hacer una pregunta
Buenos dias, tengo un pequeño problema como puedo ir Cambiando de nombre
de un archivo, el nombre de este archivo va cambiando dependiendo de la
fecha del Archivo por medio de una macro. Ejemplo:

Tengo el archivo llamado BCON1_20030904_196.DAT y tengo que renombrarlo
diario como BCON1.TXT

Alguien me podria ayudar por favor.

Les agradesco por adelantado su ayuda.

Gracias.






Mensaje enviado desde http://grupos.buscadoc.org

email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
06/09/2003 - 11:24 | Informe spam
Hola, O. Salazar G. !

... como puedo ir cambiando de nombre ... un archivo ... va cambiando dependiendo de la fecha [...]
... Ejemplo: ... el archivo llamado BCON1_20030904_196.DAT ... renombrarlo diario como BCON1.TXT



==> El siguiente codigo "toma" la fecha del sistema para buscar el archivo "*_196.DAT" y lo "renombra"
OJO: BORRA el ".txt" [si existe] y el archivo ".dat" lo "reemplazara" <> Modifica la "Ruta" por la "real" (o agrega OTRA si son distintas) :)) <=Sub Renombrar_Archivo()
Dim Ruta As String, Bueno As String, Malo As String
Ruta = "C:\Mis documentos\"
Bueno = "BCon1"
Malo = Bueno & "_" & Format(Date, "yyyymmdd") & "_196"
If Dir(Ruta & Malo & ".dat") <> "" Then
If Dir(Ruta & Bueno & ".txt") <> "" Then Kill Ruta & Bueno & ".txt"
Name Ruta & Malo & ".dat" As Ruta & Bueno & ".txt"
End If
End Sub
_______
Saludos,
Héctor.
MS-MVP

Preguntas similares

 

Busqueda sugerida :