XL 2019 MFC - valeur en double - mais avec condition

[tuti]

bonjour,
je connais la MFC - valeur en double -
mais peux on lui indiqué que l'on souhaite respecter une ou plusieurs condition ( fourni par la colonne B et C )

si je prends le choix B et C en compte, je n'aurais plus que que les 2 premières ligne en double

merci

 

[Nain porte quoi]

Merci job75, effectivement plus besoin de protéger la feuille... mais 🙂


ça n'interdit pas les autres modifications de la feuille (...je suis dehors) 🚪🚑 🙂🙂🙂🙂

 

[job75]

Merci job75, effectivement plus besoin de protéger la feuille... mais 🙂

mais il faut que les macros soient activées, pour y obliger on placera dans ThisWorkbook :

Private Sub Workbook_Open()
Dim s As Object
For Each s In Me.Sheets: s.Unprotect "toto": Next
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim s As Object
On Error Resume Next
For Each s In Me.Sheets
    s.Unprotect 'au cas où...
    If s.ProtectContents Then Cancel = True
    s.Protect "toto"
Next
Me.Save
End Sub

Edit : ajouté On Error Resume Next

 

[tuti]

RE,
Même si vide la formule du post #5 fonctionne.

désolé, je n'avais pas réussi à transposer ta formule dans mon tableau


et pour répondre à ta question de taille,
potentiellement mon tableau ( de budget) pourras sûrement atteindre les 200 lignes


pour le reste @Nain porte quoi a parfaitement compris mon problème
je me casse le cul à faire des tableaux complet ( avec les TCD tu peux ressortir beaucoup d'info )
cela n'est pas pour que la première erreur de manip d'un débutant ( que je fait aussi d'ailleurs) flingue mon boulot par un SUPP mal placer
je préfère protéger mon tableau ( même sans mdp )


concernant les macros
il me semble que l'éxécution n'est pas possible dans la version webapps
( j'ai synchro en local sur mon pc pour pas utiliser sharepoint à chaque fois )
en plus de ne pas les connaitres/savoir les lire

 

[job75]

Bonjour tuti, le forum,

Je comprends que votre fichier ne permet pas les macros.

Alors voyez le fichier joint :

- toutes les cellules de la feuille sont déverrouillées

- la feuille est protégée mdp toto l'insertion ou la suppression de lignes sont autorisées.

On peut insérer ou supprimer des lignes entières de la feuille.

A+

 

[Nain porte quoi]

Il sert à quoi ce code ?
La protection ne sert plus à grand chose quand le classeur est fermé, surtout si on la désactive à l'ouverture.

Private Sub Workbook_Open()
Dim s As Object
For Each s In Me.Sheets: s.Unprotect "toto": Next
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim s As Object
On Error Resume Next
For Each s In Me.Sheets
    s.Unprotect 'au cas où...
    If s.ProtectContents Then Cancel = True
    s.Protect "toto"
Next
Me.Save
End Sub

 

[job75]

Il sert à quoi ce code ?
La protection ne sert plus à grand chose quand le classeur est fermé, surtout si on la désactive à l'ouverture.

Si les macros ne sont pas activées la feuille reste protégée donc on ne peut pas l'utiliser.

 

[TooFatBoy]

- toutes les cellules de la feuille sont déverrouillées
- la feuille est protégée mdp toto l'insertion ou la suppression de lignes sont autorisées.

Si toutes les cellules de la feuille sont déverrouillées, est-ce que du coup les formules des TS sont tout de même protégées ?

Et de toutes façons, si la feuille est protégée, on ne pourra pas ajouter de lignes aux TS, me semble-t-il. Me trompé-je ?

 

[job75]

Bonjour TooFatBoy,

Si toutes les cellules de la feuille sont déverrouillées, est-ce que du coup les formules des TS sont tout de même protégées ?

Non, dans l'exemple la colonne des formules est masquée mais ça ne change pas grand-chose.

Et de toutes façons, si la feuille est protégée, on ne pourra pas ajouter de lignes aux TS, me semble-t-il. Me trompé-je ?

Je l'ai dit, il faut ajouter des lignes entières.

A+