Hi Ranjith
Try the below macro which will list all the .csv (comma seperated values)
file names in the folder to Col A...Adjust the folder name to suit.
Sub FileswithinFolder()
Dim strFile As String, strFolder As String, intCount As Integer
strFolder = "c:\temp"
strFile = Dir(strFolder & "\*.csv", vbNormal)
Do While strFile <> ""
intCount = intCount + 1
Range("A" & intCount) = strFile
strFile = Dir
Loop
End Sub