Thanks Andrew
I did the correction. and now clear on Bookmark
As further i move on with few trials and tests. What i observed was that
another document with total nos paras. were 244 but some ridiculous returned value
of font size
Format(.Range.Font.Size, "##")
Font size should display its size in 2 digits but here few paras. showed the .range.font.size as 9999999
Font name is Times New Roman and size were displayed as 18,12,11... and 9999999
How can the size be retained to 2 digit
Code:
If stkThru = True Then
StrData = StrData & stkThru & Space(18) & Format(.Range.Font.Size, "##") & Space(18)
Else
StrData = StrData & stkThru & Space(18) & Format(.Range.Font.Size, "##") & Space(18)
End If
SamD