URGENT! HOW to Insert specific row and copy/ paste some REQUIRED data?

michellejames

New Member
Joined
Aug 16, 2013
Messages
27
Hi there,


Greeting! I have very big and serious problem. I am doing the work manually and it take long time like 2-3 days. I want some function/macro whatever your solution.


Problem: I would like to formula/macro look the value in front of "count" mention cell (i.e B14) and insert double blank row below B14 with paste color and size values with item number. Please check my problem sheet of "BEFORE" & "AFTER" tab for more detail.

Before FILE
before_zps635234e0.jpg



AFTER FILE

afterfile_zps49133d6d.jpg



Please check and resolved my headache.
If you want to my file, then please send me your email address so i will forward you.


Regards,
james
 

Excel Facts

How to show all formulas in Excel?
Press Ctrl+` to show all formulas. Press it again to toggle back to numbers. The grave accent is often under the tilde on US keyboards.
Try:
Code:
Sub InsertRows()
    Application.ScreenUpdating = False
    Dim bottomA As Integer
    bottomA = Range("A" & Rows.Count).End(xlUp).Row
    Dim counter As Long
    Dim x As Long
    For x = bottomA To 2 Step -1
        If Cells(x, "A") Like "*Count*" Then
            For counter = 1 To Cells(x, "B").Value
                Rows(x + 1).Insert shift:=xlDown
            Next counter
        End If
    Next x
    Application.ScreenUpdating = True
End Sub
 
Upvote 0
Hi There,

Greeting! Thanks for your reply. The macro is working fine. But I want to insert double blank row which is mention in-front of "count" row i.e. 24 rows. Please let me know that can we call values of color, size, item as i have paste manually in before image?

Regards,
 
Last edited:
Upvote 0
Try this code:
Code:
Sub InsertRows()
    Application.ScreenUpdating = False
    Dim bottomA As Integer
    bottomA = Range("A" & Rows.Count).End(xlUp).Row
    Dim counter As Long
    Dim x As Long
    For x = bottomA To 2 Step -1
        If Cells(x, "A") Like "*Count*" Then
            For counter = 1 To Cells(x, "B").Value
                Rows(x + 1).Insert shift:=xlDown
                Rows(x + 1).Insert shift:=xlDown
            Next counter
        End If
    Next x
    Application.ScreenUpdating = True
End Sub

I'm not sure what you mean when you say:
can we call values of color, size, item as i have paste manually in before image?
Can you please clarify what you would like to do using some examples from your data?
 
Upvote 0
Hi There,

Greeting! Thanks for your reply. The macro is working fine. Regarding the color,size, item. after inserting the row, I have paste my item list two time, for 1 time i have mentioned size keyword in column H and item list mention in column "F" and size values mention in column G. Same thing I am doing for color on second time Can you send me you email so i will send my sheet?

Before file
[TABLE="width: 844"]
<colgroup><col><col><col><col><col></colgroup><tbody>[TR]
[TD]Series[/TD]
[TD]Name[/TD]
[TD]Color[/TD]
[TD]Size[/TD]
[TD]Item[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]13[/TD]
[TD]BANJI-BCGP-13[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]1[/TD]
[TD]BANJI-BCGP-1[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]4[/TD]
[TD]BANJI-BCGP-4[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]5[/TD]
[TD]BANJI-BCGP-5[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]13[/TD]
[TD]BANJI-RCGM-13[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]1[/TD]
[TD]BANJI-RCGM-1[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]4[/TD]
[TD]BANJI-RCGM-4[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]5[/TD]
[TD]BANJI-RCGM-5[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]13[/TD]
[TD]BANJI-SCGM-13[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]1[/TD]
[TD]BANJI-SCGM-1[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]4[/TD]
[TD]BANJI-SCGM-4[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]5[/TD]
[TD]BANJI-SCGM-5[/TD]
[/TR]
[TR]
[TD]BANJI Count[/TD]
[TD="align: right"]12[/TD]
[TD] [/TD]
[TD] [/TD]
[TD]BANJI[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]7[/TD]
[TD]BANJI-T-BCGP-7[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]8[/TD]
[TD]BANJI-T-BCGP-8[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]9[/TD]
[TD]BANJI-T-BCGP-9[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]10[/TD]
[TD]BANJI-T-BCGP-10[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]11[/TD]
[TD]BANJI-T-BCGP-11[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]12[/TD]
[TD]BANJI-T-BCGP-12[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]7[/TD]
[TD]BANJI-T-RCGM-7[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]8[/TD]
[TD]BANJI-T-RCGM-8[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]9[/TD]
[TD]BANJI-T-RCGM-9[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]10[/TD]
[TD]BANJI-T-RCGM-10[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]11[/TD]
[TD]BANJI-T-RCGM-11[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]12[/TD]
[TD]BANJI-T-RCGM-12[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]7[/TD]
[TD]BANJI-T-SCGM-7[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]8[/TD]
[TD]BANJI-T-SCGM-8[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]9[/TD]
[TD]BANJI-T-SCGM-9[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]10[/TD]
[TD]BANJI-T-SCGM-10[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]11[/TD]
[TD]BANJI-T-SCGM-11[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]12[/TD]
[TD]BANJI-T-SCGM-12[/TD]
[/TR]
[TR]
[TD]BANJI T Count[/TD]
[TD="align: right"]18[/TD]
[TD] [/TD]
[TD] [/TD]
[TD]BANJI-T[/TD]
[/TR]
</tbody>[/TABLE]


After file

[TABLE="width: 1206"]
<colgroup><col><col><col><col><col><col><col><col></colgroup><tbody>[TR]
[TD]Series[/TD]
[TD]Name[/TD]
[TD]Color[/TD]
[TD]Size[/TD]
[TD]Item[/TD]
[TD]F[/TD]
[TD]G[/TD]
[TD]H[/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]13[/TD]
[TD]BANJI-BCGP-13[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]1[/TD]
[TD]BANJI-BCGP-1[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]4[/TD]
[TD]BANJI-BCGP-4[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]5[/TD]
[TD]BANJI-BCGP-5[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]13[/TD]
[TD]BANJI-RCGM-13[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]1[/TD]
[TD]BANJI-RCGM-1[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]4[/TD]
[TD]BANJI-RCGM-4[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]5[/TD]
[TD]BANJI-RCGM-5[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]13[/TD]
[TD]BANJI-SCGM-13[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]1[/TD]
[TD]BANJI-SCGM-1[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]4[/TD]
[TD]BANJI-SCGM-4[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI[/TD]
[TD]Nina Banji[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]5[/TD]
[TD]BANJI-SCGM-5[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI Count[/TD]
[TD="align: right"]12[/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI[/TD]
[TD]BANJI-BCGP-13[/TD]
[TD]13[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-1[/TD]
[TD]1[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-4[/TD]
[TD]4[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-5[/TD]
[TD]5[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-13[/TD]
[TD]13[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-1[/TD]
[TD]1[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-4[/TD]
[TD]4[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-5[/TD]
[TD]5[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-13[/TD]
[TD]13[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-1[/TD]
[TD]1[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-4[/TD]
[TD]4[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-5[/TD]
[TD]5[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-13[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-1[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-4[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-BCGP-5[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-13[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-1[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-4[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-RCGM-5[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-13[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-1[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-4[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-SCGM-5[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]7[/TD]
[TD]BANJI-T-BCGP-7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]8[/TD]
[TD]BANJI-T-BCGP-8[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]9[/TD]
[TD]BANJI-T-BCGP-9[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]10[/TD]
[TD]BANJI-T-BCGP-10[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]11[/TD]
[TD]BANJI-T-BCGP-11[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]12[/TD]
[TD]BANJI-T-BCGP-12[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]7[/TD]
[TD]BANJI-T-RCGM-7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]8[/TD]
[TD]BANJI-T-RCGM-8[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]9[/TD]
[TD]BANJI-T-RCGM-9[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]10[/TD]
[TD]BANJI-T-RCGM-10[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]11[/TD]
[TD]BANJI-T-RCGM-11[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]12[/TD]
[TD]BANJI-T-RCGM-12[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]7[/TD]
[TD]BANJI-T-SCGM-7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]8[/TD]
[TD]BANJI-T-SCGM-8[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]9[/TD]
[TD]BANJI-T-SCGM-9[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]10[/TD]
[TD]BANJI-T-SCGM-10[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]11[/TD]
[TD]BANJI-T-SCGM-11[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T [/TD]
[TD]Nina Banji T[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]12[/TD]
[TD]BANJI-T-SCGM-12[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]BANJI T Count[/TD]
[TD="align: right"]18[/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T[/TD]
[TD]BANJI-T-BCGP-7[/TD]
[TD]7[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-8[/TD]
[TD]8[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-9[/TD]
[TD]9[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-10[/TD]
[TD]10[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-11[/TD]
[TD]11[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-12[/TD]
[TD]12[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-7[/TD]
[TD]7[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-8[/TD]
[TD]8[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-9[/TD]
[TD]9[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-10[/TD]
[TD]10[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-11[/TD]
[TD]11[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-12[/TD]
[TD]12[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-7[/TD]
[TD]7[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-8[/TD]
[TD]8[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-9[/TD]
[TD]9[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-10[/TD]
[TD]10[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-11[/TD]
[TD]11[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-12[/TD]
[TD]12[/TD]
[TD]Size[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-7[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-8[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-9[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-10[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-11[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-BCGP-12[/TD]
[TD]Black Chunky Glitter Patent[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-7[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-8[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-9[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-10[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-11[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-RCGM-12[/TD]
[TD]Red Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-7[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-8[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-9[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-10[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-11[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]BANJI-T-SCGM-12[/TD]
[TD]Silver Chunky Glitter Metallic[/TD]
[TD]Color[/TD]
[/TR]
</tbody>[/TABLE]

Please let me know that are you getting my issue?
Regards,
 
Upvote 0
I looks to me you could try to analyze your data. If so, pivottable can be very usefull in that case.
 
Upvote 0
Hi OEldere,

Greeting! Thanks for your help. But i am not pviot table expert and i have tried to do but still not created creating look as "after file". Can you please help me how to arrange the field in pviot table? So i will try again. Please this is my serious issue.

Regards,
 
Upvote 0
Hi James. I'm sorry for the delay. I was out of town for the weekend. Try this code:
Code:
Sub InsertRows()
    Application.ScreenUpdating = False
    Dim bottomA As Integer
    bottomA = Range("A" & Rows.Count).End(xlUp).Row
    Dim counter As Long
    Dim rRows As Long
    Dim x As Long
    For x = bottomA To 2 Step -1
        If Cells(x, "A") Like "*Count*" Then
            For counter = 1 To Cells(x, "B").Value
                Rows(x + 1).Insert shift:=xlDown
                Rows(x + 1).Insert shift:=xlDown
            Next counter
            Rows(x + 1).EntireRow.Delete
        End If
    Next x
    bottomA = Range("A" & Rows.Count).End(xlUp).Row
    For x = bottomA To 2 Step -1
        If Cells(x, "A") Like "*Count*" Then
            rRows = Cells(x, "B").Value
            Range(Cells(x - rRows, "E"), Cells(x - 1, "E")).Copy Cells(x, "F")
            Range(Cells(x - rRows, "D"), Cells(x - 1, "E")).Copy Cells(x, "G")
            Range(Cells(x, "H"), Cells(x + rRows - 1, "H")) = Cells(1, 4)
            Range(Cells(x - rRows, "E"), Cells(x - 1, "E")).Copy Cells(x + rRows, "F")
            Range(Cells(x - rRows, "C"), Cells(x - 1, "C")).Copy Cells(x + rRows, "G")
            Range(Cells(x + rRows, "H"), Cells(x + (rRows * 2) - 1, "H")) = Cells(1, 3)
        End If
    Next x
    Application.ScreenUpdating = True
End Sub
 
Upvote 0

Forum statistics

Threads
1,223,910
Messages
6,175,316
Members
452,634
Latest member
cpostell

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top