Hi
I have been doing this task for last few weeks.
If you can give me some solution to do this using VBA will be a great.

I have 2 worksheet one is JE_Input and other one Is called RawData.
JE_Input is like below where user key-in all the data

LINE_DES CURR ACCT DEPT DEBIT CREDIT ACCT-DATE
------- --- ---- ---- ---- -------
Cash Mang USD 0102 0010 951.74 14-Jun-07
Cash Mang USD 0102 0012 6,825.00 15-JUL-07
Cash Mana USD 0104 0010 1,127.04 25-MaY-07
Cash Mang USD 0104 0012 2,950.00 05-AUG-07
Cash Mang USD 0125 0010 9,368.05
Cash Mang USD 0125 0012 3,675.00
Cash Mang USD 0131 0012 24,950.00

I am rewriting data from JE_Input to RawData in this format below.
That way I can import data into other database.

`Cash Mangt`| `USD`|`10`|`0102`|`0010`| |4150951.74|14-JUN-07
`Cash Mangt`| `USD`|`10`|`0102`|`0012`|6825| | 15-JUN-07
`Cash Mant`| `USD`|`10`|`0104`| `0012`|1,127.04| |25-MAY-07
`Cash Mant`| `USD`|`10`|`0125`| `0010`| |9338368.05|
`Cash Mant`| `USD`|`10`|`0125`| `0012`| 3675|
`Cash Mant`| `USD`|`10`|`0131`| `0012`| 24950|
`Cash Mant`| `USD`|`10`| `0135`| `0012`| 750|

User key in data in JE_Input worksheet which currently transferring to other worksheet (RawData) using formula like below

=IF(NOT(ISBLANK(JE_Input!$G3 )),CONCATENATE("`",JE_Input!G3,"`","|"),M2)
=IF(NOT(ISBLANK(JE_Input!$A3 )),CONCATENATE("`","10","`","|"),"")
=IF(NOT(ISBLANK(JE_Input!$I3 )),CONCATENATE("`",JE_Input!I3,"`","|")," ")
=IF(NOT(ISBLANK(JE_Input!K3)),CONCATENATE(JE_Input !K3,"|"),"")
etc-----
It kind of pipe delimited and I like....`USD`| `10`| if number then 6825| 127.04| no ``(Quote)
If no data in the cell I want to see only |

On more thing when user enter ACC_DATE the automatically`10`| appears in that row column.
Thanks...