Writing documents with technical terms

[oneone]

Hello,

When writing a Word Doc with many technical terms I find the process of
having to right click each red-underlined "mis-spelling" very time
consuming.

I click each one and either say "Add" or "Ignore All". I don't want to
turn off automatic spell checking for the entire document. If there a
way to highlight a bunch of text with spelling errors and "Add" them
all at once? Or is there a keyboard shortcut to add the most recently
red-underlined word?

Thanks.

 

[Charles Kenyon]

What would be handy would be a macro that would compile a separate list of
the spelling "errors" that could then be edited and added manually to the
custom dictionary. I wouldn't have a clue as to how to go about writing such
a macro, though.
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

 

[Berend Veldkamp]

Hello,

When writing a Word Doc with many technical terms I find the process of
having to right click each red-underlined "mis-spelling" very time
consuming.

I click each one and either say "Add" or "Ignore All". I don't want to
turn off automatic spell checking for the entire document. If there a
way to highlight a bunch of text with spelling errors and "Add" them
all at once? Or is there a keyboard shortcut to add the most recently
red-underlined word?

Thanks.

You could add these words manually to the file custom.dic, which (on XP)
is in "C:\Documents and Settings\<your login name>\Application
Data\Microsoft\Proof". It's a simple text file with one word per line,
best to edit it in Notepad, not Word (or in Word: Save As "Text Only").

HTH, Berend

 

[Suzanne S. Barnhill]

Recent versions of Word make direct access to Custom.dic very easy, through
the Spelling & Grammar tab of Tools | Options.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[JulieD]

Hi

here's a macro that will list your spelling errors at the end of the
document

----
Sub print_sp_errors()
Set myErrors = ActiveDocument.Range.SpellingErrors
If myErrors.Count = 0 Then
MsgBox "No spelling errors found."
Else
Selection.EndKey Unit:=wdStory
Selection.TypeParagraph
Selection.TypeText "Spelling Errors"
Selection.TypeParagraph
For Each myErr In myErrors
Selection.TypeText myErr.Text
Selection.TypeParagraph
Next
End If
End Sub
---

not sure of the code to automatically add the references to the custom
dictionary - maybe some else has an idea

Cheers
JulieD

 

[Charles Kenyon]

Ask and you shall receive!

Thank you.

I tested it in Word 2003 and it should be helpful. Might even be a proper
subject for a FAQ page on the MVP FAQ.

It repeated words, though. Don't know why, don't really care because it is
still much easier than going through and manually adding words to the custom
dictionary. I can take the list generated, sort it alphabetically, cull out
the duplicates, and add it to the custom dictionary relatively easily.

Again, thank you.
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

 

[JulieD]

Hi Charles

you're welcome - but here's version 2 .... the resulting list is now sorted
and duplicates removed
------
Sub print_sp_errors()

Dim TheArray() As String

Set myerrors = ActiveDocument.Range.SpellingErrors
If myerrors.Count = 0 Then
MsgBox "No spelling errors found."
Else
ReDim TheArray(myerrors.Count)

Selection.EndKey Unit:=wdStory
Selection.TypeParagraph
Selection.TypeText "Spelling Errors"
Selection.TypeParagraph
i = 1
For Each myErr In myerrors
TheArray(i) = myErr
i = i + 1
Next
BubbleSort TheArray
For i = 1 To UBound(TheArray)
If Len(TheArray(i)) >= 1 Then
Selection.TypeText TheArray(i)
Selection.TypeParagraph
End If
Next i


End If

End Sub

Function BubbleSort(TempArray As Variant)
'http://support.microsoft.com/kb/q213818/
Dim Temp As Variant
Dim i As Integer
Dim NoExchanges As Integer

' Loop until no more "exchanges" are made.
Do
NoExchanges = True

' Loop through each element in the array.
For i = 1 To UBound(TempArray) - 1

' If the element is greater than the element
' following it, exchange the two elements.
If TempArray(i) > TempArray(i + 1) Then
NoExchanges = False
Temp = TempArray(i)
TempArray(i) = TempArray(i + 1)
TempArray(i + 1) = Temp
ElseIf TempArray(i) = TempArray(i + 1) Then 'added GD
TempArray(i) = "" 'added GD
End If
Next i
Loop While Not (NoExchanges)

End Function
-------

not sure if there's an easier way to sort arrays in Word, i pinched this
method from the web address listed which relates to Excel but seems to work
in my tests

Cheers
JulieD

 

[Charles Kenyon]

Thank you, again. Definitely a keeper!
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://www.mvps.org/word which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

 

[Beege]

oneone,

someone may have already compiled a custom dictionary for you to use. Google
it. One example I came up with is on

http://home.comcast.net/~wildlifebio/c_dic.htm

Could save you some work...

Beege