RENOMEAR DE NOVO !!!

USUARIO.EXCLUIDOS 23/05/2007 16:17:42
#217961
iai galera ontem eu fiz uma perdunta aki q era como fazer para renomear um arquiovo !!!

me falaram q eh

name "C:    este
omearq" as "C:    este
omenovoarq" 'até ai de boa
soh q agora to querendo saber como faz pra renomear com a data e hora


ex.;

name "C:    este
omearq" as "C:    este\dia e hora" !!!

espero ajuda

vlw
VBAPRENDE 23/05/2007 16:20:29
#217963
como data e hora? colocar a data e hora no nome do arquivo ou mudar data de cricacao do arquivo?
USUARIO.EXCLUIDOS 23/05/2007 16:21:56
#217965
colocar a data e hora no nome do arquivo !!!

galera me ajuda ai !!
USUARIO.EXCLUIDOS 23/05/2007 16:22:08
#217966 Resposta escolhida
name "C:    este
omearq" as "C:    este\" & date & "_" & time
USUARIO.EXCLUIDOS 23/05/2007 16:27:43
#217968
owww amigao naum deu certo naum !!!!
USUARIO.EXCLUIDOS 23/05/2007 16:37:47
#217969
name "C:    este
omearq" as "C:    este
omearq" & date & time
VBAPRENDE 23/05/2007 16:38:59
#217970
amigo para resolver seu problema eu faria assim:

'ArqOri - é o arquivo de origem que já existe
'ArqDes - é o arquivo de destino que vai ser criado apartir do de origem
'Ai vai dar tudo certo vai ficar a data e hora de cricao atual.
ArqOri = "C:    este\meuarquivo.doc"
ArqDes = "C:    este
ovo_nome.doc"
FileCopy ArqOri, ArqDes
Kill ArqOri


ve se da certo
USUARIO.EXCLUIDOS 23/05/2007 16:41:18
#217973
mais simples ainda
NomeArq = Format(Date, "DD-MM-YY") & "_" & Format(Time, "HH-MM-SS")
Name "C:    exte.txt" As "C:\" & NomeArq
VBAPRENDE 23/05/2007 16:43:38
#217976
Citação:

mais simples ainda
NomeArq = Format(Date, "DD-MM-YY") & "_" & Format(Time, "HH-MM-SS")
Name "C:    exte.txt" As "C:\" & NomeArq


Ele não qué colocar a data e hora no nome do arquivo ele qué mudar a data e hora de criação do arquivo.

Entendeu amigo.
USUARIO.EXCLUIDOS 23/05/2007 16:45:53
#217979
Citação:

THIAGO_METALICA escreveu:
colocar a data e hora no nome do arquivo !!!

galera me ajuda ai !!


le bem.....
USUARIO.EXCLUIDOS 23/05/2007 16:49:05
#217981
'faz assim que da certinho,

Name "c:    este.txt" As "c:    este1" & Format(Date, "ddmmyyyy") & Format(Time, "hhmmss") & ".txt"
Página 1 de 2 [13 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar