View Single Post
 
Old 05-15-2012, 03:03 AM
gsrikanth gsrikanth is offline Windows XP Office XP
Competent Performer
 
Join Date: Dec 2011
Posts: 133
gsrikanth is on a distinguished road
Default

Quote:
Originally Posted by gsrikanth View Post
1) §´ýÖçµ

2) §Ó´ýÖçµ

i have two words in the column in one cell either first come or the second word

if first word come change that cell font to times new roman
if second word come change to arial font how?

only we have find "Ó" letter in cell change the font
=if(find("Ó",a1,1)>0,With ActiveCell.Characters(Start:=1, Length:=end).Font
.Name = "Times new roman"
End With, (else),With ActiveCell.Characters(Start:=1, Length:=end).Font
.Name = "arial")
Reply With Quote