runtime error 92

[RAM72]

Hi All

Copying from report sheet to a csv sheet format.

Got message run time error 92
For loop not initiliazed .

Can anyone help please

Next n

Sub copy_specific_CSV()

For n = 2 To Sheets("Summary Report ").Range("A" & Rows.Count).End(xlUp).Row

l = Sheets("CSV ").Range("A" & Rows.Count).End(xlUp).Row + 1
Sheets("CSV ").Range("B" & l).Value = Sheets("Summary Report ").Range("A" & n).Value 'copy column A (Sheet1) to Column A (Sheet2)
Sheets("CSV ").Range("C" & l).Value = Sheets("Summary Report ").Range("B" & n).Value 'copy column B (Sheet1) to Column B (Sheet2)
Sheets("CSV ").Range("E" & l).NumberFormat = "@"
Sheets("CSV ").Range("E" & l).Value = Sheets("Summary Report ").Range("C" & n).Value 'copy column C (Sheet1) to Column C (Sheet2)
Sheets("CSV ").Range("I" & l).Value = Sheets("Summary Report ").Range("D" & n).Value 'copy column F (Sheet1) to Column D (Sheet2)
Sheets("CSV ").Range("L" & l).Value = Sheets("Summary Report ").Range("E" & n).Value 'copy column F (Sheet1) to Column D (Sheet2)
Sheets("CSV ").Range("M" & l).NumberFormat = "@"
Sheets("CSV ").Range("M" & l).Value = Sheets("Summary Report ").Range("H" & n).Value 'copy column F (Sheet1) to Column D (Sheet2)

Next n

End Sub
'Summary Report

 

[shrivallabha]

Nothing suspicious in your code. Maybe it is tripping with your data. If you could step through code using F8 and see when the error is getting raised.

 

[RAM72]

Nothing suspicious in your code. Maybe it is tripping with your data. If you could step through code using F8 and see when the error is getting raised.

Thanks for reply thread close i have found what was going wrong on the sheet