Bom dia!!

Eu não entendi sua dúvida, o código proposto, ao selecionar uma célula da coluna 1, mostra na msgbox o conteúdo da célula, por ventura não seria isso que você quer?

Att

Olá,

Da forma que está funciona perfeitamente. Defini-se o número da coluna e é exibido o texto da célula ativa da coluna definida. O que preciso é definir a célula e não a coluna. Caso o número da coluna seja 3, então qauqlquer célula ativa da coluna C terá o texto exibido, o que preciso é informar qual célula quero exibir se esta estiver ativa ou for ativada.

luiz, você já antigo usuário do forum, e deve conhecer as regras e evitar de titulos com a descrição que colocou "Ajuda com código", peço a gentileza de não utilizar mais este termo :
viewtopic.php?f=7&t=203
• TÍTULOS
Seja criativo na criação do título para um novo tópico, se imagine criando um título para uma notícia de um
jornal onde se lê o título já tendo uma ideia do que se trata o tópico, evite palavras vagas e não use termos como:
Urgente, Help, Ajuda, Por Favor, etc...

Quanto a sua questão, veja se é isto :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    'Só executa se for selecionada a celula A2
    If Target.Address = "$A$2" Then
        MsgBox ActiveCell.Value, vbInformation, "Texto expandido"
    End If
    
End Sub

Grato pela compreensão.

[]s

Orientações compreendidas. Solução esperada. Obrigado.