Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 17
Default Format Part of Text Cell using VBA

Using Excel 2000 - it is manually possible to create a cell, where the
first line of text is in italics and the remainder of the text in the
cell is normally formatted.

Can you part-format a cell using excel 2k?

If not can you achieve this on any other versions of excel.

TIA

Vlad

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default Format Part of Text Cell using VBA

If the value in the cell is a number or the results of a formula, then you can't
do this kind of formatting.

But if the value in the cell is text, then
you can select the cell
highlight the characters (in the formula bar) that you want to give a special
format

and format|Cells
(or click the icons on the formatting toolbar)

Vlad wrote:

Using Excel 2000 - it is manually possible to create a cell, where the
first line of text is in italics and the remainder of the text in the
cell is normally formatted.

Can you part-format a cell using excel 2k?

If not can you achieve this on any other versions of excel.

TIA

Vlad


--

Dave Peterson
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 17
Default Format Part of Text Cell using VBA


Dave Peterson wrote:
If the value in the cell is a number or the results of a formula, then you can't
do this kind of formatting.

But if the value in the cell is text, then
you can select the cell
highlight the characters (in the formula bar) that you want to give a special
format

and format|Cells
(or click the icons on the formatting toolbar)



Sorry Dave - I meant can I do this using VBA

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 17
Default Format Part of Text Cell using VBA

I have now managed to find a solution:-

Sub EditFont()
'To format font color for 12 digits to 4 black, 5 red, 3 black:
123456789012
'First, format digits to be treated as characters
ActiveCell.Value = "'" & ActiveCell.Value
'Format all characters for black
With ActiveCell
..Font.ColorIndex = 3
'Format characters 5 thru 12 as red
..Characters(1, ActiveCell.Characters.Count - 8).Font.ColorIndex = 1
'Reformat characters 10 thru 12 back to black
..Characters(10, ActiveCell.Characters.Count - 3).Font.ColorIndex = 1
End With

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How do I format part of a text cell, but not the whole thing? Nicole Excel Discussion (Misc queries) 2 July 4th 08 12:40 AM
format color of text in part of a cell b4nature Excel Discussion (Misc queries) 3 January 4th 07 05:09 PM
Text as part of Cell Format evan Excel Discussion (Misc queries) 1 November 3rd 06 05:48 PM
format part of text in a cell? Yawrood Excel Discussion (Misc queries) 8 June 2nd 06 12:58 AM
How do I format text that is part of a formula? TJ Excel Discussion (Misc queries) 5 December 29th 05 07:54 PM


All times are GMT +1. The time now is 10:35 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"