XL 2013 Verrouillage colonne sur tableau actif

call911 · 28 Décembre 2016

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.

call911 · 28 Décembre 2016

Le fichier était ouvert, donc il n'a pas été téléchargé.
Voici le fichier

PMO2 · 30 Décembre 2016

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

call911 · 2 Janvier 2017

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?

XL 2013 Verrouillage colonne sur tableau actif

call911

XLDnaute Occasionnel

call911

XLDnaute Occasionnel

Pièces jointes

PMO2

XLDnaute Accro

Pièces jointes

call911

XLDnaute Occasionnel

Discussions similaires

XL 2013 Verrouillage colonne sur tableau actif

call911

XLDnaute Occasionnel

call911

XLDnaute Occasionnel

Pièces jointes

PMO2

XLDnaute Accro

Pièces jointes

call911

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency