Code to insert a coma

  • Thread starter Thread starter Howard
  • Start date Start date
Where does the data come from? Is it already in a 3 col worksheet?



--

Garry



Free usenet access at http://www.eternal-september.org

Classic VB Users Regroup!

comp.lang.basic.visual.misc

microsoft.public.vb.general.discussion
Click to expand...

The OP offered it up as an example of what he was dealing with and what theresults should look like. How it came to his worksheet is unknown to me. I sorta get the feeling it is some kind of data dump to his worksheet thatincludes a lot of other merchendise "stuff" and the T-Shirts are the troublesome part for the OP. He offered up three columns and I just took it from there.

No screen shot, just three columns of t-shirt info and a munually typed in result he hoped to achieve.

Howard
 
Where does the data come from? Is it already in a 3 col worksheet?



--

Garry



Free usenet access at http://www.eternal-september.org

Classic VB Users Regroup!

comp.lang.basic.visual.misc

microsoft.public.vb.general.discussion
Click to expand...

Garry, Here is the complete OP query.

==========
Multiple text cells merged into single cell

Hi everybody- this is my first time, and I hope it's an easy solution.

I have multiple cells they need to be combined into one cell. I have read all of the threads here, and I just can't match it up. I don't need a proof solution, just a way to get started.

My cells are based on sales of products. The number of cells received change every time a sale is made. The difficult ones are the T-shirts, as while there ID remain the same, they are different based on size. So, I need to merge together the cells shown below. In result is a receipt that I can sendto them.

ID Size Quantity
SMSFTS1 Large 1
SMSFTS1 Medium 1
SMSFTS1 Small 2
SMSFTS1 X Large 1
SMSFTS1 XX Large 1
SMSFTS2 Large 1
SMSFTS2 Medium 1
SMSFTS2 Small 1
SMSFTS2 X Large 1

Here is an example of what I need it to look.

SMSFTS1 Large 1, Medium 1, Small 2, X Large 1, XX Large 1
SMSFTS2 Large 1, Medium 1, Small 1, X Large

As I'm sure you understand, this constantly changes.

I have tried to use CONCATENATE, I think it has to be manual.

If you can give me any guidance I would surely appreciate it.[/QUOTE]
==========

Howard
 
Hi Howard,

Am Mon, 14 Jan 2013 11:06:37 -0800 (PST) schrieb Howard:
ID Size Quantity
SMSFTS1 Large 1
SMSFTS1 Medium 1
SMSFTS1 Small 2
SMSFTS1 X Large 1
SMSFTS1 XX Large 1
SMSFTS2 Large 1
SMSFTS2 Medium 1
SMSFTS2 Small 1
SMSFTS2 X Large 1

Here is an example of what I need it to look.

SMSFTS1 Large 1, Medium 1, Small 2, X Large 1, XX Large 1
SMSFTS2 Large 1, Medium 1, Small 1, X Large
Click to expand...

why don't you try a PivotTable?
Another look but you see all important things with one look


Regards
Claus Busch
 
Hi Howard,

Am Mon, 14 Jan 2013 11:06:37 -0800 (PST) schrieb Howard:
ID Size Quantity
SMSFTS1 Large 1
SMSFTS1 Medium 1
SMSFTS1 Small 2
SMSFTS1 X Large 1
SMSFTS1 XX Large 1
SMSFTS2 Large 1
SMSFTS2 Medium 1
SMSFTS2 Small 1
SMSFTS2 X Large 1

Here is an example of what I need it to look.

SMSFTS1 Large 1, Medium 1, Small 2, X Large 1, XX Large 1
SMSFTS2 Large 1, Medium 1, Small 1, X Large
Click to expand...

please download the workbook "Howard" from:
https://skydrive.live.com/#cid=9378AAB6121822A3&id=9378AAB6121822A3!191
There is a solution with PivotTable with dynamic range name and a
solution with VBA


Regards
Claus Busch
 
Ok, so if the list is 3 cols that need to be consolidated by product
ID, then SMSFTS1 occupies A1:A5 and so what do you want to do with
D2:D5? Same for the next ID and so on...

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion
 
GS explained on 14/01/2013 :
Ok, so if the list is 3 cols that need to be consolidated by product ID, then
SMSFTS1 occupies A1:A5 and so what do you want to do with D2:D5? Same for the
next ID and so on...
Click to expand...

Sorry.., I forgot there were headers and so increment rows by 1!

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion
 
Back
Top