Bonjour,
Je suis entrain de réaliser le fichier suivant
Dans la zone (target) E6:NA23 je double clique puis j'ai un semblant d'éditeur de texte qui apparait.
Je souhaite donc
- Récupérer le contenu de la cellule
- Récupérer les différentes mise en forme
Je bloque sur
- l'aspect de mémoriser l'adresse de la cellule;
Je passe par la variable "CurrentPosition" mais impossible de la transférer dans l'usf pou pouvoir réimplanté le texte
Je rajouterais un Cancel = True pour éviter le mode [Édition] lié au double-clic...
VB:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim textcellule
If Not Intersect([E6:gh23], Target) Is Nothing Then
Cancel = True
'...