VBA Protected sheet, except a Range

[Damkilde1986]

Good day,

Please bear with me.. I am fairly new with regards to VBA, and therefore need some assitance.
Currently, I am working on a sheet to be used by operators when planning a workweek. Each cell in the Range("B28:EO28") represent a time period. I have created several buttons, which insert a timeblock from selected cell, within the range mentioned.

Here comes my question. I need to lock all other cells, and still be able to insert timeblocks within the range. How can I do this?

I know above info is not alot, but hope some of you might be able to assist, or send me in the right direction.

Thanks in advance!

Best,
Daniel

 

[Yongle]

This is similar to question posted here https://www.mrexcel.com/forum/excel-questions/1088464-fixed-operation-range.html
- I have modified the reply from @footoo in answer your question
- user is prevented from selecting any sheets other than those specified

Put this code in the SHEET module
right-click on sheet tab \ View Code \ paste into that window \ {ALT}{F11} to go back to Excel
The first 2 lines must go at the TOP of the module above all procedures

Option Explicit
Private PrevCell As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If PrevCell Is Nothing Then Set PrevCell = Range("B28")
   Application.EnableEvents = False
   If Intersect(Target, [B28:EO28]) Is Nothing Then
      PrevCell.Select
   ElseIf Target.Count <> Intersect(Target, [B28:EO28]).Count Then
      PrevCell.Select
   Else
      Set PrevCell = Target
   End If
   Application.EnableEvents = True
End Sub

'B28:EO28"

 

[Damkilde1986]

Dear Yongle,

Works like a charm! Thanks a million

Best regards