Discussion :

[PabloC]

Bonjour,

J'aimerais faire une macro qui quand on clic dans une cellule, décale la valeur sur la première cellule sur la droite.

Par exemple j'ai la cellule A1, je clic dessus et la valeur va en B1.

En clair j'ai actuellement un tableau avec deux colonne de valeur le devis en attente, et les devis perdu, je souhaite, quand je clic sur la valeur d'un devis en attente, qu'il passe dans la catégorie des devis perdus.

Merci d'avance.

Pablo

[mfoxy]

Bonjour,


Code a ajouter dans la feuille correspondante
A modifier le range "A2:A26" ou la fonction doit être exécutée.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 
If Not Intersect(Target, Range("A2:A26")) Is Nothing Then ' Modifier par le range approprié
 
    If Target.Value <> "" And Target.Offset(0, 1).Value = "" Then
       Target.Offset(0, 1).value = ActiveCell.Value
       Target.Value = ""
    Else
       MsgBox "Attention Soit valeur de transfert nothing ou col B déjà remplie"
    End If
 
End If
 
End Sub

[PabloC]

Super merci! c'est exactement ça!

Problème résolu!