Macro qui ajoute une valeur dans une cellule contenant du texte
Fermé
meaurysse
Messages postés
66
Date d'inscription
mercredi 7 mars 2012
Statut
Membre
Dernière intervention
2 octobre 2020
-
8 avril 2015 à 11:12
ozone_ Messages postés 1518 Date d'inscription lundi 13 juillet 2009 Statut Membre Dernière intervention 2 juin 2023 - 8 avril 2015 à 11:27
ozone_ Messages postés 1518 Date d'inscription lundi 13 juillet 2009 Statut Membre Dernière intervention 2 juin 2023 - 8 avril 2015 à 11:27
A voir également:
- Macro qui ajoute une valeur dans une cellule contenant du texte
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Excel renvoyer la valeur d'une cellule en fonction d'une autre - Forum Logiciels
- Excel si cellule contient partie texte ✓ - Forum Excel
- Nouveau tag ajouté - Forum Huawei
1 réponse
ozone_
Messages postés
1518
Date d'inscription
lundi 13 juillet 2009
Statut
Membre
Dernière intervention
2 juin 2023
478
Modifié par ozone_ le 8/04/2015 à 11:28
Modifié par ozone_ le 8/04/2015 à 11:28
Salut,
Je te propose ce code :
A mettre dans ThisWorkBook. (En faisant ALT + F11, voir le panneau à gauche)
Ainsi quand tu double-clique dans une des cellules de la colonne "A" alors cela ajoutera "§" à la fin de ce qu'il y a déjà dans ta cellule.
1f u c4n r34d th1s u r34lly n33d t0 g37 l41d !
Je te propose ce code :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
' Ici j'ai fais en sorte que toute la colonne A réagisse à la macro soit A:A
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
Target.Value = Target.Value & "§"
End If
End Sub
A mettre dans ThisWorkBook. (En faisant ALT + F11, voir le panneau à gauche)
Ainsi quand tu double-clique dans une des cellules de la colonne "A" alors cela ajoutera "§" à la fin de ce qu'il y a déjà dans ta cellule.
1f u c4n r34d th1s u r34lly n33d t0 g37 l41d !
