Home |
Search |
Today's Posts |
#1
|
|||
|
|||
ALT + enter or Char(13) in code
I am trying to manipulate strings dumped into Excel from
another system. I am combining strings from column G into a single cell in column H, which works well. However, I don't want the strings strung together in the cell. I would like to do the equivalent of the ALT + enter function after each string so that they are in their own "lines". I would think that this would be possible, but can't figure it out. A portion of my code is below. Thank you Dim ct As Integer ct = 0 test = 0 If ActiveCell.Value < "" Then loop1: ct = ct + 1 cmb = ActiveCell.Value If ActiveCell.Offset(ct, 0).Value = " " Then Do Until test = ct cmb = cmb & ActiveCell.Offset(test + 1, 0).Value 'need help here test = test + 1 Loop ActiveCell.Offset(0, 1).Value = cmb ActiveCell.Offset(ct + 1, 0).Select GoTo rs End If GoTo loop1 End If |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Make Change Case in Excel a format rather than formula | Excel Worksheet Functions | |||
Opening a file with code without a set file name | Excel Discussion (Misc queries) | |||
Opening a file with code without a set file name | Excel Discussion (Misc queries) | |||
Error trapped only while stepping through the code - Not triggered when run | Excel Discussion (Misc queries) | |||
How do I set up excel so you enter a stock code and it brings up . | Excel Discussion (Misc queries) |