We help IT Professionals succeed at work.

excel author

tubst
tubst asked
on
hi;

In my project I have more than 1000 excel files. I want to know property 'Author' of each files.
I am wondering how I can get 'Author' property value WITHOUT open excel files. 'Author' is one of properties of Excel Data model. Using VBA of api and automation it should be a way to do that.

But how????


tubst
Comment
Watch Question

Commented:
Dim myXl as new Excel.Application
dim myWkBk as Excel.Workbook
Dim myFiles(1 to 1000) as string
dim i as integer

'' since i don't know your directory structure or where
'' you are getting the files from i'll use an array for
'' my example

'' load files into array here
for i = 1 to 1000
     myFiles(i) = "<path>"
next

'' get author from each file
for i = 1 to 1000
     set myWkBk = myXL.Workbooks.Open(strPath)
     msgbox myWkBk.BuiltinDocumentProperties(7)
     
     '' close workbook
     myWkBk.Close
     Set myWkBk = Nothing
next        
   
'' close xl
myXL.Quit
Set myXL = Nothing

'' if you want other properties, instead of 7, use:  
Type: Application name 9
 wdPropertyAppName
Size: Number of bytes 22
 wdPropertyBytes
Created: (see Statistics tab) Creation date 11
 wdPropertyTimeCreated
Template: Template 6
 wdPropertyTemplate
Created: (see General tab) Creation date 11
 wdPropertyTimeCreated
Modified: Last save time 12
 wdPropertyTimeLastSaved
Printed: Last print date 10
 wdPropertyTimeLastPrinted
Last saved by: Last author 7
 wdPropertyLastAuthor
Revision number: Revision number 8
 wdPropertyRevision
Total editing time: Total editing time 13
 wdPropertyVBATotalEdit
Pages: Number of pages 14
 wdPropertyPages
Paragraphs: Number of paragraphs 24
 wdPropertyParas
Lines: Number of lines 23
 wdPropertyLines
Words: Number of words 15
 wdPropertyWords
Characters: Number of characters 16
 wdPropertyCharacters
Characters (with spaces) Number of characters (with spaces) 30
 wdPropertyCharsWSpaces
Richie_SimonettiIT Operations
CERTIFIED EXPERT

Commented:
You could see this link. It is german, but not the code :)
http://mypage.bluewin.ch/reprobst/WordFAQ/DokEigen.htm#DokEige4 

Author

Commented:
great but 7 is not Author Property, that is 'Last Saved by:' Property.

Commented:
use .BuiltinDocumentProperties("Author") instead.
Mike McCrackenSenior Consultant
CERTIFIED EXPERT
Most Valuable Expert 2011
Top Expert 2013

Commented:
listening

Commented:
did any of the above suggestions work for you?

Commented:
Any resolution to the question tubst?
Richie_SimonettiIT Operations
CERTIFIED EXPERT

Commented:
At german link, there is a little piece of code:
msgbox ActiveDocument.BuiltInDocumentProperties(wdPropertyAuthor).Value
But in any case, this appears as an abandoned question.
ADMINISTRATION WILL BE CONTACTING YOU SHORTLY.  Moderators Computer101 or Netminder will return to finalize these if still open in seven days.  Please post closing recommendations before that time.

Question(s) below appears to have been abandoned. Your options are:
 
1. Accept a Comment As Answer (use the button next to the Expert's name).
2. Close the question if the information was not useful to you, but may help others. You must tell the participants why you wish to do this, and allow for Expert response.  This choice will include a refund to you, and will move this question to our PAQ (Previously Asked Question) database.  If you found information outside this question thread, please add it.
3. Ask Community Support to help split points between participating experts, or just comment here with details and we'll respond with the process.
4. Delete the question (if it has no potential value for others).
   --> Post comments for expert of your intention to delete and why
   --> You cannot delete a question with comments, special handling by a Moderator is required.

For special handling needs, please post a zero point question in the link below and include the URL (question QID/link) that it regards with details.
http://www.experts-exchange.com/jsp/qList.jsp?ta=commspt
 
Please click the Help Desk link on the left for Member Guidelines, Member Agreement and the Question/Answer process for further information, if needed.  http://www.experts-exchange.com/jsp/cmtyHelpDesk.jsp

Click you Member Profile to view your question history and keep them all current with updates as the collaboration effort continues, to track all your open and locked questions at this site.  If you are an EE Pro user, use the Power Search option to find them.  Anytime you have questions which are LOCKED with a Proposed Answer but does not serve your needs, please reject it and add comments as to why.  In addition, when you do grade the question, if the grade is less than an A, please add a comment as to why.  This helps all involved, as well as future persons who may access this item in the future to seek help.

To view your open questions, please click the following link(s) and keep them all current with updates.
http://www.experts-exchange.com/questions/Q.20219901.html
http://www.experts-exchange.com/questions/Q.20214946.html
http://www.experts-exchange.com/questions/Q.20229513.html
http://www.experts-exchange.com/questions/Q.20242728.html
http://www.experts-exchange.com/questions/Q.20244630.html
http://www.experts-exchange.com/questions/Q.20253146.html
http://www.experts-exchange.com/questions/Q.20261037.html
http://www.experts-exchange.com/questions/Q.20272030.html


To view your locked questions, please click the following link(s) and evaluate the proposed answer.
http://www.experts-exchange.com/questions/Q.20220107.html

PLEASE DO NOT AWARD THE POINTS TO ME.  
 
------------>  EXPERTS:  Please leave any comments regarding your closing recommendations if this item remains inactive another seven (7) days.  Also, if you are interested in the cleanup effort, please click this link http://www.experts-exchange.com/jsp/qManageQuestion.jsp?ta=commspt&qid=20274643

Moderators will finalize this question if still open in 7 days, by either moving this to the PAQ (Previously Asked Questions) at zero points, deleting it or awarding expert(s) when recommendations are made, or an independent determination can be made.  Expert input is always appreciated to determine the fair outcome.
 
Thank you everyone.
 
Moondancer
Moderator @ Experts Exchange

Commented:
i've tested the above code that i provided and believe that it is the solution to this problem.

specifically: .BuiltinDocumentProperties("Author")
Thank you, I finalized this today.
Moondancer - EE Moderator

Explore More ContentExplore courses, solutions, and other research materials related to this topic.