Buongiorno a tutti. Io avrei un piccolo problemino da risolvere. Ho un foglio di excel, sul quale c'è una tabella. Io ho la necessità di impedire cancellazioni di formule o testo e di inibite la scrittura su alcune celle. Non posso mettere la protezione alla pagina perchè devo poter riordinare il foglio.
Ho provato a inserire la seguente macro, trovata sul web
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rng As Range
If Selection.Rows.Count > 1 Then
Set rng = Selection
Set rng = Intersect(rng, Range("b4"))
If Not rng Is Nothing Then
MsgBox "cella (B4) non modificabile"
Cells(1, 1).Select
Exit Sub
End If
Il problema è che oltre a non sapere come aggiungere ulteriori Range, una volta che seleziono tutto per ordinare, non mi fa procedere, praticamente non mi consente la selezione delle celle bloccate.
Qualcuno sa dirmi come si può fare?
Grazie a tutti