Cannot Insert Column VBA

Perhaps a sample workbook could be of more help. We can then see what actually happens.

Start clearing your code:

- do not use select
- do not use activate
- refer to the sheets unequivocally by using it's name e.g.: sheets("hotel') sheets("manager")
- dive into the VBEditor's help about loops : For...Next
- avoid errorhandlers