How to repeat a cell depending on a value in another sheet

Hi,

I have the following data in the workbook as below

Sheet1
Airfare Tickets Provision
Basic Salary
Basic Salary Deduction
Car Insurance Loan Repayment
Car Loan Repayment
Cash Loan Repayment

Sheet2
ABCBC
BCDCD
CDEDE
DEFEF
EFGFG
FGHGH

I need the following result in another sheet as follows

Column A Column B
Airfare Tickets Provision ABCBC
Basic Salary ABCBC
Basic Salary Deduction ABCBC
Car Insurance Loan Repayment ABCBC
Car Loan Repayment ABCBC
Cash Loan Repayment ABCBC
Airfare Tickets Provision BCDCD
Basic Salary BCDCD
Basic Salary Deduction BCDCD
Car Insurance Loan Repayment BCDCD
Car Loan Repayment BCDCD
Cash Loan Repayment BCDCD
Airfare Tickets Provision CDEDE
Basic Salary CDEDE
Basic Salary Deduction CDEDE
Car Insurance Loan Repayment CDEDE
Car Loan Repayment CDEDE
Cash Loan Repayment CDEDE

Regards,
Barieq

Try the attachment

Thank you Patronus & Sixthsense.

Sorry for the late reply, I was out of office. Patronus code is working perfectly, but when I run Sixthsense code it's showing the error.

.Range("B" & n).Value = vCode(i)

Sorry I was unable to upload the file.

Regards,
Barieq

SS's code works too. You might have the sheet names mixed up.

Please Login or Register  to view this content.

Thanks, I have not noticed that.

Originally Posted by AB33

SS's code works too. You might have the sheet names mixed up.

Please Login or Register  to view this content.

Hi AB33,

I have changed the Sheet names as per your code but still the code displays error Subscript out of Range. Can you please check.

Regards,
Barieq

Yes, you will keep getting an error because the way the array loop is constructed. You need to loop through the range as Patronus's code used.

Here's my understanding.

Please Login or Register  to view this content.

Thanks jindon, Solved.