could anyone guide me on this byref arguement type mismatch error?

The code had been deleted due to the question was being solved. Really appreacite all the help

question is being solved so really appreciate all the help from the community.Love u all