A ver,
Cita: las columnas que quecesito seleccionar y bloquear son de la e-f y la J
Hice un Macro llamado EFJBLOK (que significa blockear E,F, y J)
Código:
Sub efjblok()
Range("E:F,J:J").Select
Range("J1").Activate
Selection.Locked = True
Selection.FormulaHidden = False
Range("A1").Select
End Sub
Recorda q para q el blockeo quede realmente "activo", tenes que proteger la hoja.
Cualquier duda, a tu dispocision.