![]() |
|
#1
|
||||
|
||||
![]()
I'd suggest:
Code:
Set Rng = Tbl.Cell(i, 3).Range With Rng .End = .End - 1 .Collapse wdCollapseEnd .Text = vbCr & "Abstract: " .Font.Bold = True .Collapse wdCollapseEnd .Text = StrTxt .Font.Bold = False End With
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#2
|
||||
|
||||
![]()
This is what I wanted
I tried but as .Collapse wdCollapseEnd was not came in my mind, Every text was getting normal instead of what desired. |
![]() |
Tags |
wordvba |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
footer-assistance | Word | 1 | 06-29-2015 03:49 AM |
![]() |
caboy | Word VBA | 2 | 04-01-2015 07:00 AM |
![]() |
mescaL | Word VBA | 3 | 11-03-2014 10:51 PM |
Linking: Insert > Pictures to a specific folder location | hockfam | PowerPoint | 0 | 11-08-2012 08:09 PM |
Create Hyperlinks from Word to specific location in PDF | sukanyae | Word | 0 | 02-25-2010 04:08 PM |