![]() |
#1
|
||||
|
||||
![]()
Hello everyone,
I am from Germany and only have my good old school English. So please forgive any grammars (if any)!!! Two days ago, I created a Thread in the Microsoft forum called How To Delete Entries in 'Recently Used Fonts' and unfortunately did not receive any replies. I still have the Office LTSC Pro Package. Ok, here's the translated Thread in your language... 1. Right-click in the “Recently Used Fonts” window. Result: No success! 2. In the registry under “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\16.0\ Common\Fonts,” I added a DWORD value named “NoFontMRUList” and set it to “1” to disable the display of recently used fonts in the font selection box. Value “1”: “Recently used fonts” entry is disabled. Value “0”: “Recently used fonts” entry is enabled. Result: No success! 3. In the registry under “HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\ Word\Options” I added a “New String” => ‘NoFontMRUList’ and set it to the value “1”. Result: No success! Note: The numbers in the registry (11.0 12.0 13.0 14.0 15.0 16.0) may vary depending on the version of Word! The folder 16.0 in the registry stands for Office 2016, 2019, 2021, and LTSC! 4. Then I created Macro with content as follows... HTML Code:
Sub ClearRecentFonts() ' Löscht Einträge der Zuletzt verwendeten Schriften Dim i As Integer Dim F As Font For i = 1 To 100 ' Delete entries in FontMRU On Error Resume Next F = ActiveDocument.Fonts(i) If F.Name <> "" Then F.Delete On Error GoTo 0 Next i MsgBox "List of recently used fonts has been successfully deleted!", vbInformation, "Success" End Sub Result: No success! 5. And again: A macro written for direct deletion of the registry... HTML Code:
Private Declare PtrSafe Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal lpSubKey As String) As Long Sub ClearRecentFonts() ' Löscht Einträge der Zuletzt verwendeten Schriften Const HKEY_CURRENT_USER = &H80000001 Dim RetVal As Long RetVal = RegDeleteKey(HKEY_CURRENT_USER, "Software\Microsoft\Office\16.0\Word\Font MRU") If RetVal = 0 Then MsgBox "List of recently used fonts has been successfully deleted!", vbInformation, "Success" Else MsgBox "An error has occurred! Make sure you have closed all Word applications.", vbCritical, "Error" End If End Sub I'm slowly running out of ideas. Let someone say I haven't tried everything! What a crap ![]() Does anyone have any ideas on how I can delete this list? The crazy thing is that with every other font I use, this list keeps getting longer and longer, and fonts that I've removed from the system still appear. That's not normal!!! Microsoft should have at least included an option for this in the settings... but as always... Thank you in advance for your help.... Regards from Cologne, Germany... Mike ![]() Below is a picture (framed in red) so you can see about what I'm talking about. |
#2
|
|||
|
|||
![]()
Simply typing "microsoft word remove fonts mru" into your preferred search engine would have given you the answer.
The correct registry entry you need to edit is: HKEY_CURRENT_USER\Software\Policies\Microsoft\Offi ce\16.0\Word\Options Create a new String Value under Options called NoFontMRUList and set the value to 1 |
#3
|
||||
|
||||
![]()
I tried it but it don't work...
Registry branch: Computer\HKEY_CURRENT_USER\SOFTWARE\Policies\Micro soft\Office\16.0\Common New value => DWord Entry "NoFontMRUList" => Value "1". After I restarted my PC and started Word and I see that all Font entries were in. Too bad that it won't work. I will continue to look for a solution! Thanks anyway... Mike ![]() |
#4
|
|||
|
|||
![]() Quote:
If you use the exact registry entry I posted earlier you'll get better results. Simply making up registry entries in the hope that they might work won't get you anywhere. |
#5
|
||||
|
||||
![]()
Italophile
I see a few different Registry paths have been listed in this thread. The one you listed didn't work for me initially but I tried a few times and think I may have erred before hitting the right combination. Code:
Computer\HKEY_CURRENT_USER\Software\Policies\Microsoft\Office\16.0\Word\Options Value: 1 I'm thinking that perhaps when I first created the key, the name included a space after the NoFontMRUList Then I also think, trying a few different formats for the key remained an issue. DWord didn't work for me but String Value did I also found this path from a Youtube video - kudos to OnlineComputerTips https://www.youtube.com/watch?v=ACVerhMHzJY
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#6
|
|||
|
|||
![]() Quote:
The video you mention was one of the search results I looked at. I still tested it before posting though, just to be certain it worked. |
#7
|
||||
|
||||
![]()
OMG that did the trick!!! Thank you soo much You made my day
![]() To Reiterate The correct branch is: Code:
HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Office 2. Create a new Key below Office called 16 or whatever your Office Version you have [*] 3. Create a new Key below 16 called "Word" 4. Create a new Key below Word called "Options" Your Registry Path should looke like: Code:
[HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Office\16.0\Word\Options 6. Double click on this entry and enter a value of 1 Meaning: Value 1 = Enable | Value 0 Disable [*] The numbers in the Registry (11.0 12.0 13.0 14.0 15.0 16.0) may vary depending on the version of Word! The folder 16.0 in the registry stands for Office 2016, 2019, 2021, and LTSC Version! A brief guide as a thank you for the kind and professional assistance! ![]() Mike |
#8
|
|||
|
|||
![]()
EDIT: following is mistaken. Oops! See following post from Italophile.
=========================================== Sorry, no. [HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Offi ce\16.0\Word\OptionsShould exist on any Windows computer which has had a version of Word after Word 2013 installed. You do not need to create these keys. They should exist already. I am glad this worked for you. Last edited by Charles Kenyon; 08-31-2025 at 09:41 PM. |
#9
|
|||
|
|||
![]() Quote:
|
#10
|
||||
|
||||
![]()
Some interesting news for you:
As you can read in this thread, the correction in the registry under... Code:
[HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Office\16.0\Word\Option The problem now is that when a new font type is selected, the “Recently Used Fonts” entry is no longer added. Even deactivating or deleting the “NoFontMRUList” entry does not work. I have no idea why. So I started the System Recovery and it works again. My advice: It's best to "Stay Away From This One!" Sometimes we have to collect some experiences and I think Microsoft did this for a reason. Just for your information ![]() |
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Where is "Recently Used Fonts"? | gogreen | Word | 4 | 04-25-2018 03:28 AM |
![]() |
shmu | Word | 5 | 08-01-2016 11:15 PM |
![]() |
redzan | Word VBA | 3 | 11-04-2013 08:19 PM |
![]() |
cmengenie | Word | 3 | 03-18-2012 02:49 PM |
![]() |
dudeabides | Office | 1 | 07-04-2011 02:49 AM |