impedire trascinamento celle

[Laura_ Laura_]

Buongiorno, ho necessità di proteggere la formattazione condizionale applicata ad alcune celle di un foglio Excel che dovrà essere compilato da utenti.

Al momento, leggendo sul vostro forum,  non sono riuscita a trovare una soluzione pertanto mi sono limitata a bloccare le funzioni copia, taglia, incolla del foglio di lavoro.

Potete cortesemente indicarmi come aggiungere un blocco per il trascinamento delle celle sul foglio già bloccato per il copia e incolla?

(il comando da me già utilizzato è il seguente: Private Sub Worksheet_SelectionChange(ByVal Target As Range; Application.CutCopyMode = False; End Sub) 

grazie

Laura

 

 

 

[vecchio fracSenior Moderator vecchio frac Karma: 246 pts]

Probabilmente la strada più semplice è annullare l'operazione se la selezione si estende oltre la singola cella.

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With Application
        .EnableEvents = False
        .CutCopyMode = False
        If Target.Cells.Count > 1 Then .Undo
        .EnableEvents = True
    End With
End Sub

[Autore]

Articoli