XL 2019 Mise en place d'un interverrouillage entre les cellules de 2 colonnes

chris4785478547 · 16 Janvier 2021

Bonjour à tous,

J'ai une colonne "dépenses" et une colonne "recettes" et je souhaite empêcher le remplissage, sur une ligne donnée, d'une dépense si une recette a été saisie et inversement, empêcher de saisir une recette si une dépense a été saisie sur la même ligne.
J'ai pensé écrire une macro qui irait protéger la cellule dépenses quand je remplis la cellule recette et inversement mais aussi qui libèrerait la protection si l'on vide la cellule.
Mais cela me parait être un peu lourdaud. Y aurait il plus simple ?
Merci à vous.

eriiic · 16 Janvier 2021

Bonjour à tous,

avec une validation.
Sélectionner D:E, menu 'Données / Outils de données / Validation de données'
Personnalisé, Formule : =NBVAL($D1:$E1)<=1
eric

Phil69970 · 16 Janvier 2021

Bonjour Chris , le forum

Tu trouveras la réponse ici en l'adaptant un peu car c'est une demande inverse à la tienne

interdire la saisie si cellule precedente = ""

bonjour a tout le monde je voudrais savoir coomment faire pour interdire la saisie en colonne C si sur la meme ligne la colonne A est vide ou remplie par NON; Merci de votre aide. ; ) steve

www.excel-downloads.com

@Phil69970

sylvanu · 16 Janvier 2021

Bonsoir Chris, Phil,
Je pense que c'est faisable et léger avec :

VB:

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("D:E")) Is Nothing Then
        Application.EnableEvents = False
        If Target.Column = 5 And Cells(Target.Row, "D") <> "" Then
            Cells(Target.Row, "E") = ""
        ElseIf Target.Column = 4 And Cells(Target.Row, "E") <> "" Then
            Cells(Target.Row, "D") = ""
        End If
    End If
Fin:
Application.EnableEvents = True
End Sub

Voir PJ.

eriiic · 16 Janvier 2021

Bonjour à tous,

avec une validation.
Sélectionner D:E, menu 'Données / Outils de données / Validation de données'
Personnalisé, Formule : =NBVAL($D1:$E1)<=1
eric

chris4785478547 · 19 Janvier 2021

Bonsoir à tous, Phil, Sylvanu, Eric,

Merci pour vos propositions, j'ai de la matière, c'est super sympa.
Je reviendrai ici vous dire ce que cela a donné.
A très vite...
De retour après essais
=>Phil
Je suis trop nul pour l'instant pour avoir pu adapter, mais j'y reviendrai

=>Sylvanu
Ca fonctionne, merci !

=>Eric
Je ne comprends pas bien , je n'arrive pas à adapter car chez moi cela fonctionne plutôt bien si on remplit la recette en premier mais dans le cas contraire, j'arrive à remplir les 2 cellules.
J'ai surement fait une connerie, je continue de chercher...
D'autant que ce qui est pas mal dans ta solution c'est que l'on peut mettre un message personnalisé du type "Vous ne pouvez pas saisir une dépense et une recette sur la même ligne"
Je joins mon fichier:

En tout cas, MERCI à tous !

eriiic · 19 Janvier 2021

Bonjour,

je ne vois pas trop où tu aurais pu commettre une erreur, sauf si tu n'as pas appliqué sur les 2 colonnes.
Voici un exemple.
eric

Edit : je n'avais pas vu que tu avais mis un fichier.
Ta validation en C est erronée.
Si tu veux copier vers la droite B, il faut conserver les $ comme je t'avais mis (faire google sur référence absolue/relative).

chris4785478547 · 20 Janvier 2021

Bonjour Eric,
Je déconne car je connais la différence entre références absolue et relatives !
Je suis persuadé d'avoir tout d'abord saisi exactement ce que tu me conseillais (avec références absolues sur les colonnes) mais je ne sais pas ce que j'ai bien pu magouiller ensuite.
Mille merci à toi,
Je vais pouvoir garder ta solution et afficher le message adéquat...
Bien cordialement

XL 2019 Mise en place d'un interverrouillage entre les cellules de 2 colonnes

chris4785478547

XLDnaute Junior

eriiic

Phil69970

XLDnaute Barbatruc

interdire la saisie si cellule precedente = ""

sylvanu

XLDnaute Barbatruc

Pièces jointes

eriiic

XLDnaute Barbatruc

chris4785478547

XLDnaute Junior

Pièces jointes

eriiic

XLDnaute Barbatruc

Pièces jointes

chris4785478547

XLDnaute Junior

Discussions similaires