If anyone else is like me and what to try and make sure you remove hidden data such as your real name, company, etc., this thread is for you. ![Smile :) :)](data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7)
Microsoft has attempted to address the issue with several features. In 2003, it was a downloadable add-in. For 2007 and 2010, you can use the Document Inspector.
With the latter, it takes several annoying button clicks to get to where I want, and it also gives the option to removing hidden rows/columns/comments, which are things that I often want Excel to leave as is. I'm mostly worries about the document properties and stuff.
That said, I also tend to upload a lot of examples for people, and so create this macro and put it in my Personal workbook. I then put a button on my Quick Access Toolbar (QAT) so I could quickly clean and prepare my documents.
Here's the macro:
Obviously, you should change the myName constant to suit yourself. There's other document properties you can modify (look at the VB help properties for BuiltinDocumentProperties), but I felt these were sufficient.
If anyone else has addtional information about preparing documents for sharing, please let me know.![Smile :) :)](data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7)
Microsoft has attempted to address the issue with several features. In 2003, it was a downloadable add-in. For 2007 and 2010, you can use the Document Inspector.
With the latter, it takes several annoying button clicks to get to where I want, and it also gives the option to removing hidden rows/columns/comments, which are things that I often want Excel to leave as is. I'm mostly worries about the document properties and stuff.
That said, I also tend to upload a lot of examples for people, and so create this macro and put it in my Personal workbook. I then put a button on my Quick Access Toolbar (QAT) so I could quickly clean and prepare my documents.
Here's the macro:
Code:
Sub PrepChandoo()
'What is your screen name?
Const myName = "Luke M"
Dim props As DocumentProperties
With ActiveWorkbook
'Clear any previous values
On Error Resume Next
For i = 1 To .BuiltinDocumentProperties.Count
.BuiltinDocumentProperties(i).Value = ""
Next
On Error GoTo 0
'Setup the values for Chandoo
'Customize as desired
.BuiltinDocumentProperties("Title") = "Chandoo example file"
.BuiltinDocumentProperties("Subject") = "Example file"
.BuiltinDocumentProperties("Author") = myName
.BuiltinDocumentProperties("Company") = "http://chandoo.org/forum/"
'Puts a date Stamp
.BuiltinDocumentProperties("Comments") = "This file created by " & myName & " for the Chandoo community on " & Format(Date, "dd-mmm-yyyy")
End With
End Sub
Obviously, you should change the myName constant to suit yourself. There's other document properties you can modify (look at the VB help properties for BuiltinDocumentProperties), but I felt these were sufficient.
If anyone else has addtional information about preparing documents for sharing, please let me know.