count files in specific folder and display the number into 1 cel [closed]

by

Try below code :

Assign the path of the folder to variable FolderPath before running the below code.

Sub sample()

    Dim FolderPath As String, path As String, count As Integer
    FolderPath = "C:\Documents and Settings\Santosh\Desktop"

    path = FolderPath & "\*.xls"

    Filename = Dir(path)

    Do While Filename <> ""
       count = count + 1
        Filename = Dir()
    Loop

    Range("Q8").Value = count
    'MsgBox count & " : files found in folder"
End Sub

More Related Contents:

  1. Why should text files end with a newline?
  2. Batch files: How to read a file?
  3. How to force Logstash to reparse a file?
  4. Ant task to run an Ant target only if a file exists?
  5. Changing Vim indentation behavior by file type
  6. Symfony2 file upload step by step
  7. Batch: Remove file extension
  8. Script to associate an extension to a program
  9. Trying to copy file from one XP PC to another using WMI, since RPC and UNC are not available
  10. How do I find files that do not contain a given string pattern?
  11. How to read/write from/to a file using Go
  12. How can I find encoding of a file via a script on Linux?
  13. How to limit the number of dropzone.js files uploaded?
  14. Powershell: Check if a file is locked
  15. batch file: list rar file in specific folder and write result into text file
  16. How do I move files in node.js?
  17. Has Windows 7 Fixed the 255 Character File Path Limit?
  18. character showing up in files. How to remove them?
  19. Convert DOS/Windows line endings to Linux line endings in Vim
  20. How to find the largest file in a directory and its subdirectories?
  21. Is the MIME type ‘image/jpg’ the same as ‘image/jpeg’?
  22. File Uri Scheme and Relative Files
  23. Download file from url, save to phones storage
  24. How do I find the current directory of a batch file, and then use it for the path?
  25. How to check if a file exists in Go?
  26. Printing the last column of a line in a file
  27. Log4Net config in external file does not work
  28. Reading a .pdb file
  29. Whats the default path for static files in Angular2?
  30. Comparing folders and content with PowerShell

Leave a Comment