Macro à bascule

[Michou9]

Bonjour
Je voudrais réaliser une macro à bascule

Je mets ou pas dans la colonne « AA » un astérisque « * »
Je voudrais que en validant une macro, cela me permette d’aller directement dans la case de la colonne AA de la ligne qui est active,
Pour soit mettre l’astérisque « * » si la cellule est vide
Soit vider la cellule, si l’astérisque est en place

Est-ce possible ?

Bonne journée
Merci

 

[Pierrot93]

Re : Macro à bascule

Bonjour,

peut être ainsi, si j'ai bien compris :

Option Explicit
Sub test()
With Range("AA" & ActiveCell.Row)
    .Value = IIf(.Value = "*", "", "*")
End With
End Sub

bonne journée
@+

 

[Michou9]

Re : Macro à bascule

Bonjour

Tu as bien compris

C'est exactement ce que je voulais

merci beaucoup

Bonne journée