Du vba encore du vba
Résolu/Fermé
saolaneducado
Messages postés
21
Date d'inscription
jeudi 2 janvier 2014
Statut
Membre
Dernière intervention
23 février 2016
-
20 janv. 2014 à 15:52
saolaneducado - 20 janv. 2014 à 18:45
saolaneducado - 20 janv. 2014 à 18:45
A voir également:
- Du vba encore du vba
- Mkdir vba ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Autofill vba ✓ - Forum Excel
- L'indice n'appartient pas à la sélection vba ✓ - Forum Programmation
3 réponses
f894009
Messages postés
17221
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
4 janvier 2025
1 712
Modifié par f894009 le 20/01/2014 à 16:05
Modifié par f894009 le 20/01/2014 à 16:05
Bonjour,
VBA feuille Clients
VBA feuille Clients
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Intersect(Target, Range("Afficher")) Is Nothing Then
'mise en memoire pour modif meme cellule
memtarget = Target
Range("Afficher").Cells.ClearContents
If memtarget = "" Then Target = "x" Else Target = ""
End If
End Sub
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
524
20 janv. 2014 à 16:14
20 janv. 2014 à 16:14
Bonjour,
Modification de la procédure dans le module de la feuille "Clients"
A+
Modification de la procédure dans le module de la feuille "Clients"
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Intersect(Target, Range("Afficher")) Is Nothing Then
Application.EnableEvents = False
If Target = "" Then
Range("Afficher").ClearContents
Target = "x"
Else
Target = ""
End If
Application.EnableEvents = True
End If
End Sub
A+
