Auto Correct -unique to a spreadsheet?

[Steve DeLillo]

Is there a way to make an autocorrect abbreviation that is
unique to a spreadsheet/template. Meaning it would only
appear in that template and no other spreadsheets. Can it
be saved with the template and distributed to other PCs
just by using the template?

Thnaks,
Steve

[J.E. McGimpsey]

AFAIK, no - Autocorrect is an Office function, not just XL (i.e, an
Autocorrect entry you make in XL also applies to Word). The data is
stored in a common file, not a workbook/template.

In article <00d801c2e8b6$176593a0$a101...@phx.gbl>, Steve DeLillo

[Dave Peterson]

Maybe you could add the corrections when you open the workbook and then delete
the corrections when you close it. As long as you're entries are unique, I
would think it would work.

Dana DeLouis posted these two routines that you might like:

Option Explicit

Sub AutoCorrectEntries_Display()
'// Dana DeLouis
'// Backup AutoCorrect to Worksheet
Dim ACE
ACE = Application.AutoCorrect.ReplacementList
Range(Cells(1), Cells(UBound(ACE), 2)) = ACE
Columns("A:B").AutoFit
End Sub

Sub AutoCorrectEntries_Add()
'// Dana DeLouis
'// Add AutoCorrect entries.
'// Column A -> Wrong Word
'// Column B -> Correct Word
Dim rng As Range
With Application.AutoCorrect
For Each rng In Columns(1) _
.SpecialCells(xlConstants, xlTextValues).Cells
.AddReplacement rng, rng.Offset(0, 1)
Next
End With
End Sub

And this would be the one that cleans up.

Sub AutoCorrectEntries_Delete()
Dim rng As Range
With Application.AutoCorrect
For Each rng In Columns(1) _
.SpecialCells(xlConstants, xlTextValues).Cells
.DeleteReplacement rng
Next
End With
End Sub

You could have auto_open or workbook_open call the AutoCorrectEntries_Add sub
and the auto_close or workbook_beforeclose call the delete sub.

Be careful.

You may want to back up your autocorrect file. Look for *.acl in Windows
Start|Find|Files or folders.

(just in case!)

--

Dave Peterson
ec3...@msn.com

[J.E. McGimpsey]

I'd think you'd definitely want to back up the file, since the Add
function will overwrite an existing autocorrect entry. Or you could
identify duplicates and save them somewhere to be added back later.

Of course, that will get very messy when you open two workbooks that
both change the autocorrect file. You'd also have problems if they both
had different replacements for the same abbreviation, of course.

In article <3E700CB5...@msn.com>, Dave Peterson <ec3...@msn.com>
wrote: