Tom,

That's great, it wouldn't feel right if there wasn't a way. Thanks to both
you and Chip.

Nikos

"Tom Ogilvy" wrote in message
...
Look at Chip Pearson's page on Application.OnTime to run your macro

http://www.cpearson.com/excel/ontime.htm

--
Regards,
Tom Ogilvy

"Mark" wrote in message
...
I'd like know exactly moment increase amount files (2) in
folder.
Maybe vba don't have tools to do it or any tool very load
memory.
Regards
Mark

-----Original Message-----
Mark,

Try this piece of code:

Dim f, fs, fcount
fldr = "C:\Mytest"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.Getfolder(fldr)
fcount = f.Files.Count
If fcount 2 Then
MsgBox "There are more than 2 files in the folder"
End If

HTH,
Nikos

"Mark" wrote in message
...
I wonder if it possible write in VBA code(event) check
content some folder (all the time):
If amount files (different type files in c:\Mytest) is
greatest from 2 then msgbox "There is above 2 files in
folder".
I assume code should be in personal.xls and application
(Excel) opened continuously.

Can someone please suggest the best way to do this?

Regards
Mark


.