Microsoft 365 Excel VBA Curseur

[pedro4953]

Bonjour,

Comment faire apparaitre le curseur dans une cellule sélectionnée, à la fin du texte de celle ci?

équivalent à un F2

Merci d'avance,

Pierre

 

[TooFatBoy]

Bonjour,

Peut-être avec un SendKeys F2 dans la macro SelectionChange ?

 

[pedro4953]

Hello @Marcel32 , le problème c'est que SendKeys F2 ne permet pas d'afficher le curseur

 

[pedro4953]

Private Sub CommandButton1_Click()

Dim x As String
Dim y As String

x = Range("B5")
y = "<B>"
Range("B5") = x & Chr(10) & y & Chr(10)
SendKeys "{F2}"



End Sub

 

[pedro4953]

j'ai réussi :

Private Sub CommandButton1_Click()

Dim x As String
Dim y As String

x = Range("B5")
y = "<B>"
Range("B5") = x & Chr(10) & y & Chr(10)

Cells(5, 2).Select
SendKeys "{F2}"



End Sub

 

[TooFatBoy]

Hello @Marcel32 , le problème c'est que SendKeys F2 ne permet pas d'afficher le curseur

De rien.

La question était :

Comment faire apparaitre le curseur dans une cellule sélectionnée, à la fin du texte de celle ci?

Et je proposais d'utiliser la macro SelectionChange...
Donc, c'est sûr que si tu ne sélectionnes pas la cellule avant d'envoyer F2, il y a peu de chances que ça fonctionne.


Le principal est que tu aies trouvé la réponse à ta question.