Code: Concatenate

[abuchan]

I have three columns (9, 10, & 11); text, currency, and text and I am trying to move them from seperate columns on Sheet2 to one column with forward slashes "/" between them on Sheet3. The attached code does this, however I lose the dollar sign and commas. I need help combining them AND maintaining the dollar sign and commas.

ws3.Cells(NR, 9) = (ws2.Cells(a, 9).Value & "/" & ws2.Cells(a, 10).Value & "/" & ws2.Cells(a, 11).Value)

Thanks.

[Richard Schollar]

You could just use the Text property of the currency (?) column to display the value as it appears in the cell:

ws3.Cells(NR, 9) = (ws2.Cells(a, 9).Value & "/" & ws2.Cells(a, 10).Text & "/" & ws2.Cells(a, 11).Value)

Richard

[Marcol]

This seems to work

    ws3.Cells(NR, 9) = (ws2.Cells(a, 9).Value & "/" & Format(ws2.Cells(a, 10).Value, "$#,##0.00") & "/" & ws2.Cells(a, 11).Value)

Dont know where the commas come in to it

[royUK]

Not sure why you need code to do this,try

ws3.Cells(NR, 9) = (ws2.Cells(a, 9).Value & "/" & Format(ws2.Cells(a, 10).Value, "currency") & "/" _
    & ws2.Cells(a, 11).Value)

[Marcol]

In case cell is not formatted.