ExcelBanter - Populating Rows

ExcelBanter (https://www.excelbanter.com/)

- Excel Programming (https://www.excelbanter.com/excel-programming/)

- - Populating Rows (https://www.excelbanter.com/excel-programming/330437-populating-rows.html)

Teresa

Populating Rows

I have 3 Vodafone's,
so below in the Vodafone Worksheets I should have
Rows 14,15,16 with entries.
However not quite getting there,thanks for any help

For i = 3 To lastrow
j = 14

If Cells(i, 4) = "Vodafone" Then
Cells(i, 5).Copy Destination:=fin.Worksheets("VODAFONE").Cells(j, 2)
Cells(i, 6).Copy Destination:=fin.Worksheets("VODAFONE").Cells(j, 9)
End If
Next

j = j + 1

Teresa

Populating Rows

Figured this out - thanks

"teresa" wrote:

I have 3 Vodafone's,
so below in the Vodafone Worksheets I should have
Rows 14,15,16 with entries.
However not quite getting there,thanks for any help

For i = 3 To lastrow
j = 14

If Cells(i, 4) = "Vodafone" Then
Cells(i, 5).Copy Destination:=fin.Worksheets("VODAFONE").Cells(j, 2)
Cells(i, 6).Copy Destination:=fin.Worksheets("VODAFONE").Cells(j, 9)
End If
Next

j = j + 1

All times are GMT +1. The time now is 12:23 AM.