Delete blank cells

@HaHoBe :
I have few questions
1) If i want to add more column B and F to k . what i need to do. in the above code , just change the "F" to G ,h ..... ?

2)Why in the code don't have the sheet name like (Example : Sheet 1 )

3) If i want to put into user form code, not working but its is working in module and sheet.