Loop based on frequncy in cells

**arbeg** · 11-29-2010, 06:39 AM

Hi,

I have a list in column A with data. In column B is frequency of data that i will have in column D. I try to make a VBA code which will copy value from A1 and paste it in D1,D2,D3 based od value in B1. So if I have:

(A1) AAA (B1) 3
(A2) BBB (B2) 2
(A3) CCC (B3) 3

I would like to have another column (D) with data

(D1) AAA
(D2) AAA
(D3) AAA
(D4) BBB
(D5) BBB
(D6) CCC
(D7) CCC
(D8) CCC

Copy value in A and paste it in D based od Frequency given in column B.

Thanks

**TMS** · 11-29-2010, 08:11 AM

Ae you hoping for a formula solution or VBA?

Regards

**Marcol** · 11-29-2010, 08:18 AM

Try this

Please Login or Register  to view this content.

Hope this helps

**arbeg** · 12-06-2010, 06:08 AM

Thanks, it works

I solve it by myself same day, but your code looks better then my. I have bunch of variables and i have to define rows. I have learned myself something new from your post. Thanks again. Here is my solution which works but looks horrible

Please Login or Register  to view this content.

**Marcol** · 12-06-2010, 06:27 AM

Better you try understanding the code I offered.
You should not then need to change variable values if the column lengths change.

Also there is no need to copy the cell then paste to a new location.
Select > Copy > Paste is inefficient and slows the code down considerably, just assign the values directly.