XL 2013 Verrouillage colonne sur tableau actif

call911

XLDnaute Occasionnel
Bonjour,

Je cherche à verrouiller les cellules qui ont des formules dans la feuille "sorties" de l'exemple joint.
Cependant, je n'arrive pas à faire en sorte de verrouiller les cellules, en gardant la possibilité de rajouter des lignes sur le tableau. En effet, je souhaite que lorsque je rajoute une ligne, les formules soient reprisent dans le tableau actif.

Si quelqu'un a la solution, je suis preneur.
Merci.
 

PMO2

XLDnaute Accro
Bonjour,
Une piste avec le code suivant à copier dans la fenêtre de code de Feuil2(Sorties)
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim LO As ListObject
On Error Resume Next
Set LO = ActiveSheet.ListObjects(1)
If Err <> 0 Then Exit Sub
If Target.Cells.Count = 1 And Target.HasFormula Then
  If Not Application.Intersect(LO.Range, Target) Is Nothing Then
    Target.Offset(0, -1).Select
  End If
End If
On Error GoTo 0

'--- suite éventuelle de SelectionChange ---
'...
End Sub
 

Pièces jointes

  • Stock_pmo.xlsm
    943.4 KB · Affichages: 28
Dernière édition:

call911

XLDnaute Occasionnel
Bonjour,

Merci beaucoup pour ta réponse.
J'en profite pour te souhaiter une bonne année :)
J'ai testé, ça marche bien.
Est ce qu'il y a possibilité de faire en sorte que l'on puisse passe dessus avec le curseur au lieu de se faire renvoyer à début de la ligne?
 

Discussions similaires

Statistiques des forums

Discussions
312 266
Messages
2 086 652
Membres
103 353
dernier inscrit
jerem'