Hi,

I have 5 TextBoxes embedded within a worksheet with the code below to allow the user to 'tab' through them.

Sub BPL_LeaveType_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = 9 Then
BPL_Comments.Activate
End If

End Sub

Unfortunately when the workbook is shared the procedure shows the following error:

Activate method of OLEObject class failed

Does anyone know of a work around for this within a shared document?

Cheers,

Stefan