Hi Mr Satya,
Try below code this code useful to you.
as per your above explanation your qty column qty reflect 4 and a,b,c are copy and pasted 4 time. that means you need to how much qty in qty column you need to paste this job code that time
Sorry my bad english
Sub Multiple_Qty()
Dim lRow As Long
Dim RepeatFactor As Variant
lRow = 1
Do While (Cells(lRow, "A") <> "")
RepeatFactor = Cells(lRow, "D")
If ((RepeatFactor > 1) And IsNumeric(RepeatFactor)) Then
Range(Cells(lRow, "A"), Cells(lRow, "D")).Copy
Range(Cells(lRow + 1, "A"), Cells(lRow + RepeatFactor - 1, "D")).Select
Selection.Insert Shift:=xlDown
lRow = lRow + RepeatFactor - 1
End If
lRow = lRow + 1
Loop
End Sub