sending email with the url, required all files path from a particular folder

Hi,

we are using the attached excel file for sending the some mails with attachment.

1. Our problem is we want to get the all file details in column E from a specific folder
For Example in a folder we have three files so all three files path in column H
C:\Users\new\Desktop\New folder\Report-2.xlsx
C:\Users\new\Desktop\New folder\Report-2.pdf
C:\Users\new\Desktop\New folder\Report-2.zip

got the solution

Sub FileDetails()
Dim objFSO As Object
Dim objFolder As Object
Dim objFile As Object
Dim i As Integer

'Create an instance of the FileSystemObject
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Get the folder object
Set objFolder = objFSO.GetFolder("C:\Users\Me\Desktop\Temp(5)")
i = 1
'loops through each file in the directory and prints their names and path
For Each objFile In objFolder.Files
'print file name
Cells(i + 1, 5) = objFile.Name
'print file path
Cells(i + 1, 5) = objFile.Path
i = i + 1
Next objFile
End Sub