Lancer l'éditeur de texte dans une cellule

Bonjour Chères et Chers.

Une fois de plus, je me retourne vers vous qui réalisez l'impossible...(selon moi!)

J'ai bien fouillé sur les forum avant de faire appel mais rien ne correspond à ce qui irait.

En cliquant sur "Ajouter aversion", une ligne s'ajoute avec un symbole Ø.

Est-il possible de faire en sorte que le curseur clignotant se place après Ø pour inscrire directement l'aversion?

Ce qui éviterait l'effacement accidentel du Ø si un double-clic n'est pas fait.

Je le reconnais c'est un peu tiré par les cheveux et peut-être pas indispensable mais serait l'idéal dans mon projet.

Un grand merci d'avance à celles et ceux qui se pencheraient sur mon cas...

11tableau-2.xlsm (75.07 Ko)

Bonjour

F2 sur la cellule...

Oups pas vu le xlsm : à quoi sert le Ø : on pourrait l'afficher sans le saisir... avec un format personnalisé "Ø "@

Bonjour Sylvain, bonjour le forum,

Peut-être comme ça :

Sub Macro23()
Range("F10:F500").Cut Destination:=Range("F11:F501")
ActiveSheet.Range("F11").Value = "Ø "
ActiveSheet.Range("F11").Locked = False
Range("F11").Select
SendKeys "{F2}"
End Sub

[Édition]

Bonjour Chris, nos posts se sont crosés...

Bonjour 78chris, bonjour ThauThème,

Trop bien ThauThème, exactement ça!

Rapide et efficace!

Merci bcp.

Re

Par curiosité j'aimerais une réponse à ma question...

Bonjour,

Effectivement, un format personnalisé sur la colonne \Ø @ serait bien.

ric

Rechercher des sujets similaires à "lancer editeur texte"