Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Changing the format of text in a cell
Hi, can anyone advice how to change the format of a specific bit of text in a cell, I can set a whole cell to bold like Dim r As Word.Range cell = row.Cells(1) cell.Range.Text = "This is some text" r = cell.Range r.Font.Bold = True but when i try and use r.SetRange(cell.Range.Start, 4) to change the word this to bold I dont actually get the right text In anticipation thanks, for your help |
#2
|
|||
|
|||
richardC was telling us:
richardC nous racontait que : Hi, can anyone advice how to change the format of a specific bit of text in a cell, I can set a whole cell to bold like Dim r As Word.Range cell = row.Cells(1) cell.Range.Text = "This is some text" r = cell.Range r.Font.Bold = True but when i try and use r.SetRange(cell.Range.Start, 4) to change the word this to bold I dont actually get the right text In anticipation thanks, for your help r.Words(1).Font.... -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
#3
|
|||
|
|||
richardC wrote:
Hi, can anyone advice how to change the format of a specific bit of text in a cell, I can set a whole cell to bold like Dim r As Word.Range cell = row.Cells(1) cell.Range.Text = "This is some text" r = cell.Range r.Font.Bold = True but when i try and use r.SetRange(cell.Range.Start, 4) to change the word this to bold I dont actually get the right text In anticipation thanks, for your help The second parameter of the SetRange function shouldn't be a length (like 4); it should be the location of the end of the desired range *measured from the start of the document*. For instance, cell.Range.Start might be 1734, then the number after the comma would have to be 1738. In code, this would look like r.SetRange(cell.Range.Start, cell.Range.Start + 4) -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org |
#4
|
|||
|
|||
Thanks, that is very helpfull but what I am really trying to do is get a
range object as theremight be mutiple words that i need to change ie a cell mught have the following text which has been dynamicly assigned Company full Name Add1 Add2 PostCode Tel number Distance information I wish to just set theCompany name and distance info to bold hence using a range obj but the start position does not come back correctlry "Jean-Guy Marcil" wrote: richardC was telling us: richardC nous racontait que : Hi, can anyone advice how to change the format of a specific bit of text in a cell, I can set a whole cell to bold like Dim r As Word.Range cell = row.Cells(1) cell.Range.Text = "This is some text" r = cell.Range r.Font.Bold = True but when i try and use r.SetRange(cell.Range.Start, 4) to change the word this to bold I dont actually get the right text In anticipation thanks, for your help r.Words(1).Font.... -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP ISTOO Word MVP site: http://www.word.mvps.org |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Changing 'trace changes' to permanent text color? | Microsoft Word Help | |||
changing format in Word for a phrase changes entire document | Microsoft Word Help | |||
Automatically changing text when another text is changed | Microsoft Word Help | |||
Outline | Page Layout | |||
Created my own format on first page, want text to continue same. . | Microsoft Word Help |