Pergunta : Lógica de VBA

Eu preciso uma parte de código de fazer o seguinte….o
Look no qry_DocumentRegister_Redundant na coluna Filename
Check para considerar se cada um dos nomes de arquivo existe em algum 5 do
If que do
c:\xyz\e do
c:\xyz\d do
c:\xyz\c do
c:\xyz\b do specified
c:\xyz\a dos diretórios movem então as limas para o
Else do directory
c:\abc\a fazem o nothing

One o outro problema, o nome de arquivo na pergunta não inclui um tipo de lima término somente o nome de arquivo próprio e nas limas no diretório poderia ser todo o filetype.

Thanks

class= do

Resposta : Lógica de VBA

Soa como o nome de arquivo que é armazenado em sua tabela já contem o período (.) qual ajusta o fora da extensão de lima, ou aquele o nome de arquivo armazenado em sua tabela não está completo.  Tentativa:

strFileName = Dir (“f:\Test Directory\Live\” & FName & “*.*") este não trabalham

A razão está encontrando que a mesma lima é todas as vezes que você não está removendo a lima que você apenas encontrou, você a está copiando.  Em seu borne original você disse: “Se movem então as limas para o diretório”.  Mas o comando de FileCopy não move a lima, ele apenas copia-a.  Que I porque em meu código mais recente você verá que eu rebatizei a lima, que o move realmente para o diretório novo.

Nomear “C:\Access\test\Source\” & o strFileName como “C:\Access\test\Destination\” & o strFileName

Também, se você usa a função de Dir () e lhe passa um foldername cada vez, retornará a primeira lima no dobrador, todas as vezes.  Se você quer realmente indicar todas as limas em um dobrador, você teria que usar algo como:

strFileName = Dir (“f:\Test Directory\Live ")
strFileName de debug.print
Fazer
    strFileName = Dir ()
    strFileName de debug.print
Dar laços quando Len (strFileName) > 0

Também, o código que você se está usando não procurarará por uma segunda ou terceira lima com a mesma extensão de lima.  Apenas contorneará aqueles.  Se aquela não é uma edição então então deixar a seu código a maneira que é.  Se aquela poderia ser uma edição então você necessidade de olhar meu segmento de código mais recente e de copiar essa lógica.
Outras soluções  
 
programming4us programming4us