code to insert dash sign

Hello JBeaucaire,
Now I observe that each time I didn't enter the words organization, company, school in my directory. But in this code the macro runs each time I open the file which I don't want because it takes time to complete the task.

Can you please do the little modification in this code? Require modification is:
When I enter the words organization, company, school in column 'f' then immediately the dash sign should be enter in column 'q to y'. So that the macro will run little faster. To do this we have to remove it from sort macro modul 1 and create a separate macro for it. I want to remove it from auto run at the time of sorting.

Please do it positively.

Thanking you in anticipation.

Mukesh