I have a program that transfers data from Access97 into word97.  The
user is entering something like this:
1. Information:
     a.sub info
     b)sub info

However, once transported to word, the information displays like so:
1. Information a.sub info b)sub info

How do I figure out what char is coming before the a.,b),etc... and
then how do I replace that char with a tab?

I'm rather new at VBA and have been thrown into the water with this
one.  Any help would be greatly appreciated.

Sunshine

P.S. Are there any other good websites with info on VBA functions that
I could reference?

It's quite rare for Access 97 text or memo fields to contain tabs,
because the standard textbox used for displaying them doesn't accept
or interpret tab characters (it just displays them as square boxes).

To find out what character is actually coming across into Word where
you want there to be a tab (actually, it looks from your sample as if
you need a paragraph mark and a tab:

1) select (highlight) one of these characters
2) go to the Immediate pane of the VB editor and type
        ? Asc(Selection). The code for a tab character is 9.

John Nurick [Access MVP]

Please do not respond by email, but to the newgroup.

Hi Sunshine

~~~~~~
How do I figure out what char is coming before the
a.,b),etc
~~~~~~
Select the character and run the line Msgbox Asc
(Selection.Text)

~~~~~~
then how do I replace that char with a tab?
~~~~~~
Do a find and replace, replacing ^(character number) with
^t.

~~~~~~
Are there any other good websites with info on VBA
functions that I could reference?
~~~~~~
http://www.mvps.org/word/

Especially under FAQs, on the Macros/VBA tab. Also under
Tutorials. And if in doubt, try the Search page.

Regards

Dave

12/13/2001 7:11:56 AM

I have a program that transfers data from Access97 into
word97.  The
user is entering something like this:
1. Information:
     a.sub info
     b)sub info

However, once transported to word, the information
displays like so:
1. Information a.sub info b)sub info

How do I figure out what char is coming before the
a.,b),etc... and
then how do I replace that char with a tab?

I'm rather new at VBA and have been thrown into the water
with this
one.  Any help would be greatly appreciated.

Sunshine

P.S. Are there any other good websites with info on VBA
functions that I could reference?

Thanks so much John!

What I did:
   I used the immediate window like you said, and found a Chr(13)
followed by a Chr(10) coming in where a tab was entered in Access.  I
changed the Chr(13) position in the string to = vbCrLf and the Chr(10)
position to = vbTab and it works perfectly!  Thanks again for you
help!!!

Sunshine