XL pour MAC Macro a completer afin de ne pas faire une annerie

tvhabdo · 15 Novembre 2018

Bonjour a tous, le Forum

Je joint un fichier afin de mieux comprendre

La macro dit : De A1 a C3, si je clic dans une cellule, s'affiche OUI (Tout va bien)

mais comme nous travaillons a plusieurs sur ce fichier, je souhaiterais "Protéger" ce OUI afin de ne pas faire un CLIC malencontreux et donc de le faire disparaitre - Je ne sais pas quelle protection mettre ni comment faire

et (pour faciliter le problème, lol); je dois pouvoir supprimer le OUI et mettre une case blanche mais volontairement

Merci Pat

ChTi160 · 15 Novembre 2018

Bonsoir
Bonsoir le Fil,le Forum
voila ce que j'ai modifié(afin de pouvoir poser ma question Lol)

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
          If Intersect(Range("A1:C3"), Target) Is Nothing Then Exit Sub
   Target.Value = IIf(IsEmpty(Target), "OUI", "")
         Cancel = True
End Sub

tu pourrais aussi utiliser le "BeforeDoubleClick"
Question :
qu'entends tu par:

je souhaiterais "Protéger" ce OUI afin de ne pas faire un CLIC malencontreux et donc de le faire disparaitre - Je ne sais pas quelle protection mettre ni comment faire

Tout les utilisateurs peuvent ils mettre et enlever des "OUI" ?
Bonne fin de Soirée
jean marie

tvhabdo · 15 Novembre 2018

Hello Chti160

Protéger, n'est pas une protection genre "Cadenas" mais plus un truc pour éviter de faire un clic et hop le Oui disparait
Tous les utilisateurs peuvent ils mettre et enlever des "OUI" ? Réponse OUI
Ta macro OK, elle fonctionne mais ou mais t'on : "BeforeDoubleClick"
Marci Pat

ChTi160 · 15 Novembre 2018

Non
c'est une autre possibilité de faire le Boulot !
il y a aussi le problème de l'effacement des "Oui" par efface supprime etc
dans le fichier joint on utilise le DoubleClick pour insérer les "OUI" ou ""
jean marie

tvhabdo · 16 Novembre 2018

Bonjour Chti160

Bravo pour cette macro
En Fait il me fallait le Double Clic pour faire "ma protection", tout fonctionne bien, je l'adapte a mon fichier de travail

Belle Journée et encore Merci

XL pour MAC Macro a completer afin de ne pas faire une annerie

tvhabdo

XLDnaute Occasionnel

Pièces jointes

ChTi160

XLDnaute Barbatruc

tvhabdo

XLDnaute Occasionnel

ChTi160

XLDnaute Barbatruc

Pièces jointes

tvhabdo

XLDnaute Occasionnel

Discussions similaires

XL pour MAC Macro a completer afin de ne pas faire une annerie

tvhabdo

XLDnaute Occasionnel

Pièces jointes

ChTi160

XLDnaute Barbatruc

tvhabdo

XLDnaute Occasionnel

ChTi160

XLDnaute Barbatruc

Pièces jointes

tvhabdo

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency