Type Mismatch error - extracting number macro

Dear all,

I am writing to seek help, in help with "Type Mismatch error" in the macro below. I am trying to implement logic, where if value in column F, equals "1ma+89", then extract 89 only in column G. I also have other values in column F, where I have set specific rules for them, to extract numbers.

I have attached a worksheet with example data and highlighted red cells, represent incorrect output from the macro.
test2_14July.xlsm

Please Login or Register  to view this content.

Please advice, if I may be missing something in the code.

Many thanks

Thank you for your reply and help. From your suggestion, I manage to solve the mismatch error. However, the macro is still producing incorrect value for value in column F "1ma+89", as 1+89, instead of extracting 89 only in column G.

Please Login or Register  to view this content.

Please advice further, if possible.
Many thanks