Identifying MSOFFICE docs without extension

  • I am interested in identifying various MSOFFICE documents uniquely.


    I have a few word/excel/ppt documents (without extensions). Is there a way to read the file contents and classify them?


    I tried reading the file hearder but it is the same for all MSOFFICE documents!!!

  • Hi and welcome to the board :)


    Following sample shows which property You may check.


    You can use it to loop through a folder and print all files file-association, i e application name for each file.


    Sub Property_App()
    Dim stApp As String


    stApp = ThisWorkbook.BuiltinDocumentProperties("Application name")


    MsgBox stApp


    End Sub

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!