How to insert a symbol into a Word text through the VBA code ?

P

Peter

I'd like to use such a formula:

'If txtzak1.Value = "" Then txtzak1.Value = symbol sign

where symbol sign = infinity sign'



How to make it ?

Who could help me ?

Thanks

Peter
 
P

Peter

OK, but I have this sign in Times New Roman font so it isn't a infinity sign
but something like A.
Maybe a new procedure to find all this signs (like A) and change them into
infinity sign (it'll be sufficient to change a font to Symbol).
Please help, beacause I wasted all day for this.
Very thanks
Peter
 
J

JB

Peter said:
I'd like to use such a formula:

'If txtzak1.Value = "" Then txtzak1.Value = symbol sign

where symbol sign = infinity sign'



How to make it ?

Who could help me ?

Thanks

Peter
Click to expand...

HI Try this,
If txtzak1.Value = "" Then txtzak1.Value = Chr$(236)
 
Top