resolve type mismatch error when filling all empty cells within range with hyphen

Question

I am currently working on a Macro that loops through all cells in a certain range and fills all empty cells with a hyphen. The cells that are empty can vary, which is why I deci