Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell formatting in formula bar but not in cell
***This is a repost from yesterday***
I am at my wits end here. I have code from Access that dumps data to an Excel spreadsheet. Several values in one of my columns are pieces of text with Chr(10) between them so that each piece of text falls on a separate line within the cell. The text gets dumped, but the separate lines do not show on the sheet in the cell ( Chr(10) shows in the cell as a little box). However, they do show in the formula bar as separate lines and if I click in the formula bar or double-click the cell everything falls into place. I just cant get this to happen automatically from code. Here is the code that sets the value that gets dumped to my sheet. Im cycling through a record set in Access, doing a replacement of ";" by Chr(10) and then setting the cells formula value to the new value. I use a semicolon as a placeholder to tell my code where I want new lines to start. The separated parts of text are long strings and separating them to different lines makes it much easier for my users to read. NewValue = rs.Fields(iFieldNum - 1) NewValue = Replace(NewValue, ";", Chr(10)) .Cells(I, iFieldNum).Formula = NewValue Ive tried many options to get this to work. Any suggestions would be greatly appreciated. Thanks, Clint |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell formatting in formula bar but not in cell
NewValue = rs.Fields(iFieldNum - 1)
NewValue = Replace(NewValue, ";", Chr(10)) With .Cells(I, iFieldNum) .Formula = NewValue .WrapText = True end with -- Regards, Tom Ogilvy "cherman" wrote in message ... ***This is a repost from yesterday*** I am at my wits end here. I have code from Access that dumps data to an Excel spreadsheet. Several values in one of my columns are pieces of text with Chr(10) between them so that each piece of text falls on a separate line within the cell. The text gets dumped, but the separate lines do not show on the sheet in the cell ( Chr(10) shows in the cell as a little box). However, they do show in the formula bar as separate lines and if I click in the formula bar or double-click the cell everything falls into place. I just can't get this to happen automatically from code. Here is the code that sets the value that gets dumped to my sheet. I'm cycling through a record set in Access, doing a replacement of ";" by Chr(10) and then setting the cells formula value to the new value. I use a semicolon as a placeholder to tell my code where I want new lines to start. The separated parts of text are long strings and separating them to different lines makes it much easier for my users to read. NewValue = rs.Fields(iFieldNum - 1) NewValue = Replace(NewValue, ";", Chr(10)) .Cells(I, iFieldNum).Formula = NewValue I've tried many options to get this to work. Any suggestions would be greatly appreciated. Thanks, Clint |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Formatting a cell with a formula | Excel Discussion (Misc queries) | |||
Formatting Cell that Contains If/Then Formula | Excel Discussion (Misc queries) | |||
cell formula or formatting | Excel Worksheet Functions | |||
Cell formatting shows in formula bar but not in cell | Excel Programming | |||
Formatting a formula within a cell | Excel Discussion (Misc queries) |