Protect spesific columns from deleting

[cagataybaser]

Hello,
I want to protect columns B to AA from deleting and i can edit of them but there are more columns after AA.
How can i do that?
Best Regards

[Kenneth Hobs]

Lock at least one cell in each of the columns. Protect the sheet but allow column deletion.

[MINCUS1308]

This code will lock the cells in the range. You wont be able to select, delete or edit them.


Sub Macro1()
' SET ERROR HANDLING
On Error Resume Next
' SETTING ALL CELLS TO UNLOCKED BECAUSE THE DEFAULT IS LOCKED
Cells.Select
Selection.Locked = False
' FORMATTING THE DESIRED RANGED TO LOCKED
Range("B:B,C:C,D:D,E:E,F:F,G:G,H:H,I:I,J:J,K:K,L:L,M:M,N:N,O:O,P:P,Q:Q,R:R, _
S:S,T:T,U:U,V:V,W:W,X:X,Y:Y,Z:Z,AA:AA").Locked = True
' SETTING THE WORKSHEETS PROTECTION
ActiveSheet.Protect
End Sub