Re: $$Excel-Macros$$ errors in my code

2011-02-25 Thread Paul Schreiner
1 To 1  wks.Cells(i, y).Value = Left(sFilename, 5).Value    Next     End If Loop Paul From: wkeanebaker To: MS EXCEL AND VBA MACROS Sent: Fri, February 25, 2011 1:06:17 PM Subject: $$Excel-Macros$$ errors in my code Do Until wks.Cells(i, 1).Va

$$Excel-Macros$$ errors in my code

2011-02-25 Thread wkeanebaker
Do Until wks.Cells(i, 1).Value = "" If wks.Cells(i, 1).Value <> "" Then For y = 1 To 1 wks.Cells(i, y).Value = Left(sFilename, 5).Value End If Next Loop Im catching a end if without block if and then a loop without do error but im lost, help -- --