Solved: Parse email body for email addresses and write them to Excel...Help with Troubleshoot

[beginner5]

do you give the full path to the excel file?

This is my code regarding the excel name and path:

...
Next Item
' write everything to Excel
Set xlApp = GetExcelApp
If xlApp Is Nothing Then GoTo ExitProc
If Not IsFileOpen("liste_bounced_emails.xls") Then
Set xlwkbk = xlApp.workbooks.Open("liste_bounced_emails.xls")
End If

....