Problème de selection

Question

Bonjour, 

version excel 2013

Ceci est mon premier post pour essayer de résoudre mon problème.
(je précise que mes capacités sur excel sont assez restrainte en terme de macro)

J'ai créé un planning de roulement ou deux affichages sont disponibles :
 -l'affichage simplifié
-l'affichage détaillé 
(photo plus bas) 

vous pouvez remarquer que l'affichage détailler comprent des colonnes supplémentaires qui sont masquées sur le planning simplifié.
j'aimerai que sur le planning simplifié lorsque l'utilisateur viendra modifier celui-ci, il ne supprime pas accidentellement les cellules masquées sans qu'il ait pour autant à sélectionner Case par Case les cellules à modifier. 

j'espère avoir réussi à me faire comprendre et j’espère surtout qu'il existe une solution a mon problème.
Merci d'avance pour votre aide qui me sera précieuse !
cordialement
M.G

Configuration: Windows / Firefox 60.0

T3chN0g3n · Answer

Bonjour,

Onglet "Révision", les outils "Protéger la feuille" et"Autoriser la modification de plages" devrait faire l'affaire ;)

→ Autoriser une plage (sans mettre de mot de passe) puis protéger la feuille

Cdlt,

T3ch'

via55 · Answer

Bonjour

Si les colonnes masquées sont destinées à le rester pour l'utilisateur

1 masquer les colonnes
2 onglet Révision - Protéger le classeur
mettre un mot de passe pour que l’utilisateur ne puisse pas déprotéger le classeur

Cdlmnt
Via

Blinkis · Answer

quelqu’un serait calé en Macro ? Je pense que mon Problème pourrait être résolu grace à un macro.

eriiic · Answer

Bonjour,

une proposition qui élimine de la sélection les cellules avec formule.

Si la plage résultante est vide ou si la sélection ne fait qu'une seule cellule contenant une formule je décale d'une colonne à droite la sélection. Si tu n'as pas cette régularité 1 colonne constantes, 1 colonne formules, il faudra réfléchir sur quoi sélectionner exactement...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim pl As Range
    Application.EnableEvents = False
    If Target.Count = 1 Then
        If Target.HasFormula Then Target.Offset(, 1).Select
    Else
        On Error Resume Next
        Set pl = Target.SpecialCells(xlCellTypeConstants)
        On Error GoTo 0
        If pl Is Nothing Then
            Target.Offset(, 1).Select
        Else
            pl.Select
        End If
    End If
    Application.EnableEvents = True
End Sub
eric

Problème de selection

4 réponses

Discussions similaires

Newsletters