How to save an excel sheet as Unicode text file with the name same as its workbook's name?

Question

I have a VBA Script for converting a sheet in excel as unicode text file with the workbook\'s name. Suppose I have an excel file named "zahid-21-12-2020.xlsm". The