Test Excel macros , XLM , (Excel 4 Macros)

[DocAElstein]

_____ Workbook: Extract missing dates for each person d Transpose.xlsm ( Using Excel 2007 32 bit )

Row\Col	A	B	C	D	E	F	G	H	I	J	K
1	5465 Apples$50 Twenty	=FIND("$",A1)	=LEFT(A1,B1)	=FIND(" ",C1)	=RIGHT(C1,LEN(C1)-D1)	=RIGHT(A1,LEN(A1)-B1)	=FIND(" ",F1)	=LEFT(F1,G1-1)	=E1&H1		=RIGHT(LEFT(A1,FIND("$",A1)),LEN(LEFT(A1,FIND("$",A1)))-FIND(" ",LEFT(A1,FIND("$",A1))))&LEFT(RIGHT(A1,LEN(A1)-FIND("$",A1)),FIND(" ",RIGHT(A1,LEN(A1)-FIND("$",A1)))-1)
2	5687 Grapes$597 Three	=FIND("$",A2)	=LEFT(A2,B2)	=FIND(" ",C2)	=RIGHT(C2,LEN(C2)-D2)	=RIGHT(A2,LEN(A2)-B2)	=FIND(" ",F2)	=LEFT(F2,G2-1)	=E2&H2		=RIGHT(LEFT(A2,FIND("$",A2)),LEN(LEFT(A2,FIND("$",A2)))-FIND(" ",LEFT(A2,FIND("$",A2))))&LEFT(RIGHT(A2,LEN(A2)-FIND("$",A2)),FIND(" ",RIGHT(A2,LEN(A2)-FIND("$",A2)))-1)

Worksheet: Sheet2