Cuestión : buscar el archivo con nombre completo exacto en VBA

El estimado experto,

I tiene xls de un archivo llamados “advancedata2010” en mi carpeta, y quiero al create
one nuevo el otro archivo llamado “data2010” sin la palabra de “avanzado”. El código es el as
follows. ¿Pero no creará el archivo de data2010, y entonces solucioné el
by del problema retitulo el archivo conocido similar de “advanceddata2010” al “advacnedata”, programa del
the del reestreno, y entonces el archivo de “data2010” es aparecido y el created

So mi pregunta está cómo al filesearch el nombre del eaxct del archivo en VBA? wkdir principal del
Dim del

Sub del advise
Duncan del

Please () como datafilename de String
Dim como String
wkdir =
datafilename = “data2010
'Test del
Sub DoesWorkBookExist (wkdir " del
Call DoesWorkBookExist (wkdir, datafilename) como secuencia, datafilename como secuencia) para ver si un exists
Dim i del libro de trabajo como Integer
With Application.FileSearch
.LookIn = el wkdir
'* representa el characters
.Filename = el datafilename
If. Ejecutar > 0 entonces “exists
” Debug.Print “del libro de trabajo allí es un libro de trabajo. el “
“allí no es un Workbook
” Debug.Print “que no existe el libro de trabajo " wkdir de Workbooks.Add
Workbooks.Add.SaveAs del
'y extremo With

End Sub de If

del final del datafilename
ActiveWorkbook.Close False
class= del

Respuesta : buscar el archivo con nombre completo exacto en VBA

Es un placeholder.

El intentar otra vez…

exigir - el fósforo:

Si "" de Dir (“d:\excel\somefile.xls <> ") entonces
   el 'código para el archivo existe

   el 'código para el archivo no existe
Terminar si

fósforo parcial:

Si Dir (“"" de d:\excel\ <> *somefile*.xls*") entonces
   'cifrar por lo menos 1 fósforo

   'código para ningunos fósforos
Terminar si