Solved

How to standardise the fonts in office 2007 via group policy

Posted on 2008-10-09
9
1,340 Views
Last Modified: 2011-10-03
Hi,

I would like to standardise all the users fonts in Office 2007 to Arial, 11.  I cannot seem to find a way to do this with the Office 2007 ADM files.  Is it possible and how can i do it?

I would like mainly outlook and word to be standardised but if excel could aswell that would be great.

Also i would like to lock the signatures so that users cannot edit these once they have been set by me manually on the user pc.
0
Comment
Question by:healthfoundation
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 5
  • 4
9 Comments
 
LVL 7

Expert Comment

by:enzogoy
ID: 22783389
It's on the template file.  With Word, it's gonna be Normal.dotm while outlook will have NormalEmail.dotm (I think).  Both file locate under user profile in the local drive.  I use start up script to copy it to that location.  

I scratch my head to find a better solution but no luck.

enz
0
 

Author Comment

by:healthfoundation
ID: 22812971
Thanks enzogoy, could you post the script you use for me please?

Thanks!
0
 
LVL 7

Expert Comment

by:enzogoy
ID: 22817120
Here is how to create your template.  You have to create this two files first (Normal.dotm and NormalEmail.dotm), put them on the network location and then put the command into your login script (I assume you used batch file).
http://blogs.msdn.com/templates/archive/2008/04/08/creating-and-sharing-word-2007-templates.aspx

Put the following line in your batch file.
Use this if your users are using Microsoft templates at the moment and you want your new template to overwrite it.  
copy "\\Network location\folder\Normal.dotm" "%userprofile%\Application Data\Microsoft\Templates\"

If your users already have their own template and you don't want to overwrite it then:
xcopy "\\Network location\folder\Normal.dotm" "%userprofile%\Application Data\Microsoft\Templates\" /d

*** the xcopy command will check if the file exist then it will do nothing, else it will copy the file over.

For outlook, you only change the file name in the script to NormalEmail.dotm.  
If you have a folder which only have these two template file then you can replace the file name in command with *.* .

for example:
copy "\\Network location\folder\*.*" "%userprofile%\Application Data\Microsoft\Templates\"

0
PeopleSoft Has Never Been Easier

PeopleSoft Adoption Made Smooth & Simple!

On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool.  Claim Your Free WalkMe Account Now

 

Author Comment

by:healthfoundation
ID: 22820171
Hi,  thanks for this.

We use VB script but i think i can knock something up to do this.
0
 
LVL 7

Expert Comment

by:enzogoy
ID: 22826623
Please let me know if you in trouble with VB script.

enz
0
 

Author Comment

by:healthfoundation
ID: 22831606
I'm currently setting up one bit at a time in a test script

This is what I currently have in the login script.
***************************************************************

'Copy Word 2007 Normal Template to the Local Hard Disk
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CopyFile "\\"SERVERNAME"\NETLOGON\Normal.dotm", "C:\Documents and Settings\"USERNAME"\Application Data\Microsoft\Templates\"

***************************************************************

With server name and user name replaced with the right words.  Now that script above works but obviously this is no good for serperate users as "USERNAME" is not a vaiable.  i have tried using "%userprofile%\Application Data\Microsoft\Templates\" but i get a 800A004C error on the VBscript saying cannot find path.

Can you help?

0
 

Author Comment

by:healthfoundation
ID: 22902918
Can anyone help with my post above???
0
 
LVL 7

Expert Comment

by:enzogoy
ID: 22918241
Could you please try this one:

****************************
'Copy Word 2007 Normal Template to the Local Hard Disk
Dim FSO, strDirectory, strUserProfile, objFolder
Set FSO = CreateObject("Scripting.FileSystemObject")
Set oShell = CreateObject( "WScript.Shell" )
strUserProfile = oshell.ExpandEnvironmentStrings("%userprofile%")
strDirectory = strUserProfile & "\Application Data\Microsoft\Templates\"
If FSO.FolderExists(strDirectory) Then
  FSO.CopyFile "\\SERVERNAME\NETLOGON\Normal.dotm", strUserProfile & "\Application Data\Microsoft\Templates\"
Else
  Set objFolder = FSO.createFolder(strDirectory)
  FSO.CopyFile "\\SERVERNAME\NETLOGON\Normal.dotm", strUserProfile & "\Application Data\Microsoft\Templates\"
End if
***********************************

Replace your SERVERNAME to the real server name, everything else keep the same.

enz
0
 
LVL 7

Accepted Solution

by:
enzogoy earned 500 total points
ID: 22918994
This one is even better:

*************************************
'Copy Word 2007 Normal Template to the Local Hard Disk
Dim FSO, strDirectory, strUserProfile, objFolder
Set FSO = CreateObject("Scripting.FileSystemObject")
Set oShell = CreateObject( "WScript.Shell" )
strUserProfile = oshell.ExpandEnvironmentStrings("%userprofile%")
strDirectory = strUserProfile & "\Application Data\Microsoft\Templates\"
If FSO.FolderExists(strDirectory) Then
  If FSO.FileExists(StrDirectory & "\Normal.dotm") then
     FSO.Deletefile(StrDirectory & "\Normal.dotm")
     FSO.CopyFile "\\"SERVERNAME"\NETLOGON\Normal.dotm", strDirectory
  Else    
     FSO.CopyFile "\\"SERVERNAME"\NETLOGON\Normal.dotm",  strDirectory
  End if
Else
  Set objFolder = FSO.createFolder(strDirectory)
  FSO.CopyFile "\\"SERVERNAME"\NETLOGON\Normal.dotm",  strDirectory
End if
*************************************
0

Featured Post

Office 365 Training for Admins - 7 Day Trial

Learn how to provision tenants, synchronize on-premise Active Directory, implement Single Sign-On, customize Office deployment, and protect your organization with eDiscovery and DLP policies.  Only from Platform Scholar.

Question has a verified solution.

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

While rebooting windows server 2003 server , it's showing "active directory rebuilding indices please wait" at startup. It took a little while for this process to complete and once we logged on not all the services were started so another reboot is …
Outlook for dependable use in a very small business   This article is about using the Outlook application (part of Microsoft Office) in a very small business, or for homeowners where dependability and reliability are critical requirements. This …
The viewer will learn how to use the =DISCRINV command to create a discrete random variable, use this command to model a set of probabilities and outcomes in a Monte Carlo simulation, and learn how to find the standard deviation of a set of probabil…
The viewer will learn how to create two correlated normally distributed random variables in Excel, use a normal distribution to simulate the return on different levels of investment in each of the two funds over a period of ten years, and, create a …

729 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