Rich text field odd behavior

[Gina Maylone]

Hello everyone and a Happy New Year to you all!

I have a really strange problem that's been giving me fits for over a year. I have an estimating application that includes 3 Long Text fields, and the fields ARE LONG. Client wants them in bulleted format and wants to be able to edit as necessary. 2 of the fields "Inclusions and HVAC exclusions" work just fine. "General Exclusions" does not. It just runs on. I have everything set to Rich Text (backend tables and forms). I have tried setting the default value (in table and form) to the required formatted/bulleted text, I've tried making it an unbound field on the form, and just copying and pasting the necessary formatted text, I've bound it and tried copy/paste as well. And I have to add that it is an intermittent problem. Some estimates will print out just fine. Am I missing something obvious?



Thank you in advance for any insite.
Gina

[Micron]

Maybe the problem is not the formatting of the table/form whatever, but it's the input. You could use code to insert a bullet by using a specific key, but keypress events can slow things down to the point where it becomes a problem.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
On Error GoTo errHandler

If KeyCode =  vbKeyF# 'substitute a number you want to use
  ClipBoard_SetText Chr(149) & Chr(32)
  DoCmd.RunCommand acCmdPaste
  KeyCode = 0
End If
exitHere:
Exit Sub

errHandler:
MsgBox Err.Number & ": " & Err.Description, , "messagebox title here"
Resume exitHere

End Sub

You shouldn't have to import rtf files as data, but that is another way.