Este fórum está sendo desativado

[Henrique92]

Como no exemplo da planilha edital?

Quero dar um duplo-clique e completar com a seta ou qualquer outro texto.

Ah e também gostaria de saber como inserir essas janelas de datas e vinculá-las a outras células. Muito Obrigado, desde já.

[Henrique92]

Obs: Tranquei o outro tópico pq já descobri o código macro e então, por isso, vou trancar este também.

Muito obrigado ao Gfranco

Private Sub WorkSHEET_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim MONITORAR As Range, TEXTO As String

Set MONITORAR = ThisWorkbook.ActiveSheet.Range("j1:j10")
TEXTO = "ü"

If Not Intersect(Target, MONITORAR) Is Nothing Then
Target = TEXTO
End If
End Sub