Macro to copy numbers as texts by adding an apostrophe in front of the numbers

In Column D, I have a series of numbers.

Column B is the same series of numbers but converted to texts by adding an apostrophe in front of the numbers.

I need a macro to copy the numbers in Column D to Column B and add an apostrophe in front of the numbers in column B.

Macro to start from row 2 and to stop when it encounters 2 consecutive empty rows.

Thanks in advance.

Joseph

Convert numbers to texts.png