Have to repeat list [Closed]

Question

Have to repeat list [Closed]

Report

kashif.aali

Posts: 1
Registration date: Tuesday May 16, 2017
Status: Member
Last seen: May 16, 2017

- May 16, 2017 at 02:17 AM
TrowaD

Posts: 2717
Registration date: Sunday September 12, 2010
Status: Moderator
Last seen: April 1, 2021

- May 16, 2017 at 11:12 AM

Dear all Please help out
have to repeat two list in one list.

Query:
List A List B
A 1
B 2
C 3
D

Results
List C
A 1
A 2
A 3
B 1
B 2
B 3

Thanks in advance

Have to repeat list
How to make a list on snapchat - How-To - Snapchat
Facebook 6 digit confirmation code list 2020 - Forum - Facebook
Facebook 6 digit confirmation code list ✓ - Forum - Facebook
Could not contact master game server to retrieve server list ✓ - Forum - Video Games
Unable to get 6 digit code for login ✓ - Forum - Facebook

1 reply

Ask a question

TrowaD · Answer 1 · 2017-05-16T11:12:11-0400

Answer 1 / 1

TrowaD

Posts: 2717
Registration date: Sunday September 12, 2010
Status: Moderator
Last seen: April 1, 2021

459
May 16, 2017 at 11:12 AM

Hi Kashif.aali,

Give the following code a try:

Sub RunMe()
Dim x, y, z As Integer

x = 1
y = 1
z = 1

Do
    Cells(x, "C").Value = Cells(y, "A") & " " & Cells(z, "B")
    x = x + 1
    z = z + 1
    
    If z > 3 Then
        y = y + 1
        z = 1
    End If
    
Loop Until IsEmpty(Cells(y, "A"))
End Sub

Best regards,
Trowa

Have to repeat list [Closed]

1 reply

Your reply

Subscribe To Our Newsletter!