|
-
Nov 27th, 2011, 08:00 AM
#1
Thread Starter
Addicted Member
Office 2010 favour request
G'day. I was hoping someone could please do me a small favour. I have Office 2007 and I need some info from Office 2010.
What I need is for someone with Office 2010 to open a new file in Excel, insert a module, go to Tools > References and add references to Microsoft Outlook 13.0 Object Library, Microsoft Scripting Runtime and Microsoft Word 13.0 Object Library then paste the following code in the module and run it and upload the file to me after the code has been run.
Code:
Sub CheckReferences()
Dim n As Integer
Sheets("Sheet1").Select
On Error Resume Next
Cells(1, 1) = "Name"
Cells(1, 2) = "Description"
Cells(1, 3) = "GUID"
Cells(1, 4) = "Major"
Cells(1, 5) = "Minor"
Cells(1, 6) = "fullpath"
Cells(1, 7) = Application.Version
For n = 1 To ActiveWorkbook.VBProject.References.Count
Cells(n + 1, 1) = ActiveWorkbook.VBProject.References.Item(n).Name
Cells(n + 1, 2) = ActiveWorkbook.VBProject.References.Item(n).Description
Cells(n + 1, 3) = ActiveWorkbook.VBProject.References.Item(n).GUID
Cells(n + 1, 4) = ActiveWorkbook.VBProject.References.Item(n).Major
Cells(n + 1, 5) = ActiveWorkbook.VBProject.References.Item(n).Minor
Cells(n + 1, 6) = ActiveWorkbook.VBProject.References.Item(n).fullpath
Next n
End Sub
(I didn't write this code, the original is to be found at: http://www.ozgrid.com/forum/showthread.php?t=22483 ).
Also, does Word 2010 automatically treat the Enter key as starting a new paragraph the way Word 2007 does, or has it gone back to treating the Enter key as starting a new line, the way Word 2003 does?
Thank you
The Dragon
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|