Excel How do I make this macro work on all workbooks?

Question

I want this macro to work in all workbooks but it only works in the workbook that I\'ve created "book1.xlsm", and when I transfer the macro to Personel.xlsb it doe