FileExists syntax

If Dir("C:\Portatil Copies de Seguritat\Fra Sala-Escars\Outlook\*.*") <> "" Then MsgBox ("Fylt") Else MsgBox ("ikke fylt")

det var min måde ;-))

selvom directory  den er fyldt eller tom, melder ikke fylt

undskyld, den var min fejl
Tak

til kabbak:
den nedenstående rutine virker hvis der er en eller flere filer, men hvis der er en eller flere mapper virker den ikke.
har du nogen komentar?
Enric
If Dir("C:\Portatil Copies de Seguritat\Fra Sala-Escars\Outlook\*.*") <> "" Then MsgBox ("Fylt") Else MsgBox ("ikke fylt")

så blev den noget længere:

Dim Noget As Boolean
Noget = False
MyName = Dir("C:\Portatil Copies de Seguritat\Fra Sala-Escars\Outlook\*.*", vbDirectory)  ' Retrieve the first entry.
Do While MyName <> ""  ' Start the loop.
  ' Ignore the current directory .
  If MyName <> "." And MyName <> ".." Then
      ' Use bitwise comparison to make sure MyName is a directory.
        Debug.Print MyName  ' Display entry only if it
    Noget = True
    Exit Do
  End If
  MyName = Dir  ' Get next entry.
Loop
If Noget Then MsgBox ("Fylt") Else MsgBox ("ikke fylt")

jeg kikker imorgen

det virker
Tak kabbak
Jeg kikkede idag, jeg kunne ikke lad være
der var fin
Enric