Access Runtime 2013 Spell Check (1 Viewer)

epiek

Registered User.
Local time
Today, 03:36
Joined
Jul 25, 2011
Messages
35
This is a possible solution to make sure that the spell checker works on Access Runtime 2013:

Office 2010 and earlier installed the Proofing tools which included the spell checker automatically if selected.

Office 2013 runs its proofing tools through SharePoint. Thus if no SharePoint software is present, you have a problem!

A developer tool has been created that can be downloaded from the Microsoft Office website:
Access - Sharepoint designer Office 2013 32 bit
sharepointdesigner_32bit.exe

I downloaded the 32bit version and it also works on a 64 bit system.

If you install this Sharepoint designer software on each PC, it simulates the sharepoint features, if sharepoint software is not present.

It is a great work around in smaller offices or for a home PC.
 

epiek

Registered User.
Local time
Today, 03:36
Joined
Jul 25, 2011
Messages
35
I must mention that I am not using the Spell Check icon on the toolbar, but rather the ON LOST FOCUS event on my control to check spelling when moving from one field to another.

If you press F7 for the spell check it will not work, but this coding works if you use the sharepoint designer Office 2013 tool with Access runtime 2013.

I got this bit of coding from browsing on the internet


Private Sub ReviewComment_LostFocus()
Rem
http://www.access-programmers.co.uk/forums/showthread.php?t=157586&highlight=acCmdSpelling
Rem If the textbox contains data run the
Rem Spell Checker after data is entered.
DoCmd.SetWarnings False
With Me!ReviewComment
.SetFocus
.SelStart = 0
.SelLength = Nz(Len(Me.ReviewComment), 0)
If Nz(Len(Me!ReviewComment), 0) > 0 Then Me!ReviewComment.SetFocus: DoCmd.RunCommand acCmdSpelling
End With
DoCmd.SetWarnings True
End Sub


OR for the entire form:

'---------------------------------------------------------------------
'---------------------------------------------------------------------
' Alternative code to check every textbox control on form
'---------------------------------------------------------------------
'---------------------------------------------------------------------

Set frm = Screen.ActiveForm

DoCmd.SetWarnings False

' Step through Controls collection
For Each ctlSpell In frm.Controls

If TypeOf ctlSpell Is TextBox Then 'Only check textbox controls
With ctlSpell
If Len(Trim(ctlSpell & vbNullString)) = 0 Then 'Only check if there is data in control

ElseIf .Locked = True Then 'Don't Spell check if control is locked

ElseIf .Enabled = False Then 'Don't check if control is not enabled

ElseIf InStr(1, Nz(.Tag), "Spellcheck", vbTextCompare) = 0 Then
'Don't check if control is not marked to be checked

Else 'passed all the tests, so spell check

.SetFocus
.SelStart = 0
.SelLength = Len(ctlSpell)

DoCmd.RunCommand acCmdSpelling

End If 'test control for problems
End With 'ctlSpell
End If 'textbox
Next 'Check the next control




or to move between fields something like:
 

Users who are viewing this thread

Top Bottom