by Juanito Dado Jr (4 Submissions)
Category: Files/File Controls/Input/Output
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: 
(2 Votes)
This is a complete word counter that counts ANY FORMAT like word, excel, txt, csv, xls etc. It counts for Char with or without spaces, word count and linecount. It pretty easy and it counts without the use of Split() function. It uses the word object from the microsoft word 11.0 object library so need referencing. I haven't included exporting but you can at least copy to the line count. The good thing with this one, is that you can simultaneously count up to 500 files plus. I really don't know the maximum limit but it'll depend on the system memory i think. This is good for the transcriptionist industry. Hope this helps to some!!! If you have any suggestions on how I can improve this, just let me know.
API DeclarationsOption Explicit
'progress bar in status bar
Private Declare Function SetParent Lib "user32" _
(ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
VBcoders
