Improve performance of VBA macro

Hi, What can I do to improve the performance of the attached macro? The different sections of the code ('LOOP THROUGH SUBJECTS FOR SCREENING TEST CASE', 'LOOP THROUGH SUBJECTS FOR C1D1 TEST CASE', ...