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!