Can one save Autocorrect settings?

E

ex4ed

I have had the need to reformat my hard disk several times, and
reinstall Office.

Every time I do that I loose my Autocorrect settings!

Is there a way to save - say to a floppy - my settings so I don't have
to try to remember what terms I used before?
 
D

Debra Dalgleish

Dana DeLouis wrote a couple of macros to transfer AutoCorrect entries.

The first one dumps them onto a worksheet. You can check them there.
Copy the workbook to the other machine, and run the second macro to add
the entries to the AutoCorrect file on that machine. It doesn't remove
any existing entries, but adds any new ones.

'************************
Sub AutoCorrectEntries_Display()
'by Dana DeLouis
'dumps all AutoCorrect entries onto worksheet
Dim ACE
Dim r As Long

ACE = Application.AutoCorrect.ReplacementList

For r = 1 To UBound(ACE)
Cells(r, 1) = ACE(r, 1)
Cells(r, 2) = ACE(r, 2)
Next

Columns("A:B").AutoFit
End Sub
' = = = = = = =

Sub AutoCorrectEntries_Add()
'by Dana DeLouis
'adds all AutoCorrect entries from worksheet
Dim Cell As Range
With Application.AutoCorrect
For Each Cell In Columns(1).SpecialCells(xlConstants, xlTextValues)
.AddReplacement Cell, Cell.Offset(0, 1)
Next
End With
End Sub
' = = = = = = =
'*********************************
 
D

Dale Hymel

Create a Workbook and save with two Macros, One to download the list, the
other to update the list

The following sub will download your list to a worksheet.

Note: Sheet1 Cell A1 is named Start
On my slow computer, it took a couple of minutes to run, (Excel97). So
there is some room for tweeking to make run faster.


Public Sub DisplayAutoCorrectList()
repl = Application.AutoCorrect.ReplacementList
For x = 1 To UBound(repl)
Range("Start").Offset(x, 0) = repl(x, 1)
Range("Start").Offset(x, 1) = repl(x, 2)
Next x
End Sub

To restore the list, try playing around with
UNTESTED
repl = Application.AutoCorrect.ReplacementList
For x = 1 To
repl(x, 1) = range("start").offset(x,0)
repl(x, 2) = range("start").offset(x,1)
Next
 
G

Gord Dibben

Do a search for *.ACL files. Copy them and overwrite the ones that the
re-install of Office produces.

Gord Dibben XL2002
 
D

David McRitchie

There are additional files that you might want to backup for Excel

Backup your files, always take backups
http://www.mvps.org/dmcritchie/excel/backup.htm

What files should be backed up in Excel (#xlfiles)
http://www.mvps.org/dmcritchie/excel/backup.htm#xlfiles
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

Do a search for *.ACL files. Copy them and overwrite the ones that the
re-install of Office produces.

Gord Dibben XL2002
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top