franksirvent
Programmer
Hi there
I have a db which I convert to an Excel spreadsheet.
the thing is that one of the fields is a Memo field and can have many lines (separated by carriage returns/line feeds).
When the information gets transfered to Excel sheet, each line from the memo field has a vertical line at the end, obviously related to the carriage return/line feed.
I tried to to take it out like this:
txtfromemofield = Forms![Quotes]![memofield]
For l = 1 To Len(txtfrommemofield)
If Asc(Mid(txtfrommemofield, l, 1)) = 10 Then
Mid(txtfrommemofield, l, 1) = ""
End If
Next l
but it doesn´t work. I´ve also tried asc=13 and nothing happens...
Any ideas ?
thanks in advance
I have a db which I convert to an Excel spreadsheet.
the thing is that one of the fields is a Memo field and can have many lines (separated by carriage returns/line feeds).
When the information gets transfered to Excel sheet, each line from the memo field has a vertical line at the end, obviously related to the carriage return/line feed.
I tried to to take it out like this:
txtfromemofield = Forms![Quotes]![memofield]
For l = 1 To Len(txtfrommemofield)
If Asc(Mid(txtfrommemofield, l, 1)) = 10 Then
Mid(txtfrommemofield, l, 1) = ""
End If
Next l
but it doesn´t work. I´ve also tried asc=13 and nothing happens...
Any ideas ?
thanks in advance