Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

Save Office 07 Quick Access Toolbar settings

Posted on 2008-06-18
4
Medium Priority
?
1,631 Views
Last Modified: 2012-08-13
We're preparing to roll-out MS Office 2007 Enterprise in the next month or so, and most issues are down pat.

To help with the new ribbon interface - I've added a number of icons to the Quick Access Toolbar. Since there's no Save/Restore settings wizard in Office 07, how do I 'save' the QAT settings from each program (Word, Excel, etc) so that it can be rolled out with the installation. Is there a registry key that can be exported?

I've also worked out that after upgrading from Office 03 to 07, PolicyMaker causes a number of computer to BSOD with c000021 at log-on. Are there any upgrade patches that fix this or other solutions?

Thanks
0
Comment
Question by:Ryan_R
  • 3
4 Comments
 
LVL 8

Accepted Solution

by:
Seth_zin earned 2000 total points
ID: 21826162
0
 
LVL 15

Author Comment

by:Ryan_R
ID: 21826849
Thansk Seth
0
 
LVL 15

Author Comment

by:Ryan_R
ID: 21852482
You wouldn't happen to know how to setup the Office install package (or at least a batch file) that will copy those 3 .qat files from the share where Office is located to the C:\Docs & Settings\<username>\Local Settings\Application Data\Microsoft\Office folder?

Also, if an admin user installs Office 07 on a PC, is there a way to get those files put into the appropriate folder for each user on the PC that's not currently logged in? A script would be an ok alternative if it can't be used in the MSP file
0
 
LVL 15

Author Comment

by:Ryan_R
ID: 21882490
I wrote my own script the other day - posting below if anyone else needs it
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\Documents and Settings")
Set colSubfolders = objFolder.Subfolders
For Each objSubfolder in colSubfolders
    If objSubfolder.Name = "NetworkService" Or objSubfolder.Name = "LocalService" Or objSubfolder.Name = "All Users" Then
	'Do Nothing
    Else 
	'MsgBox objSubfolder.Name
	On Error Resume Next
	If objFSO.FolderExists("C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data\Microsoft") Then
	    If objFSO.FolderExists("C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data\Microsoft\Office") Then
		'Copy .QAT Files - code below
	    Else
		'Create 'Office' Folder
            	ParentFolder = "C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data\Microsoft"
            	set objShell = CreateObject("Shell.Application")
    	    	set objFolder2 = objShell.NameSpace(ParentFolder) 
    	 	objFolder2.NewFolder "Office"
	    End If
	Else
	    'Create 'Microsoft' Folder
            ParentFolder = "C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data"
            set objShell = CreateObject("Shell.Application")
    	    set objFolder2 = objShell.NameSpace(ParentFolder) 
    	    objFolder2.NewFolder "Microsoft"
 
	    'Create 'Office' Folder
	    ParentFolder = "C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data\Microsoft"
            set objShell = CreateObject("Shell.Application")
    	    set objFolder2 = objShell.NameSpace(ParentFolder) 
    	    objFolder2.NewFolder "Office"   
	End If
	'Copy .QAT Files - don't overwrite existing files.
	objFSO.CopyFile "\\server\share\Office 2007 Enterprise\Updates\*.qat", "C:\Documents and Settings\" & objSubFolder.Name & "\Local Settings\Application Data\Microsoft\Office\", False
	
         '''You must alter the above line to show where you have saved the source .qat files - don't change the destination path.
 
    End If
Next
'MsgBox "Operation Completed Successfully"

Open in new window

0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Excel can be a tricky bit of software to get your head around. Whilst you’ll be able to eventually get to grips with the basic understanding of how to get by, there are a few Excel tips that not everybody will even know about let alone know how to d…
MS Outlook undoubtedly is the most widely used email client.Its user-friendliness, cost effectiveness, and availability with Microsoft Office Suite make it the most popular email application.  Its compatibility with Microsoft applications like Exch…
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…
The Relationships Diagram is a good way to get an overall view of what a database is keeping track of. It is also where relationships are defined. A relationship specifies how two tables connect to each other. As you build tables in Microsoft Ac…

580 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question