Cor conteúdo de texto contido entre parênteses

Question

Tenho uma planilha do Excel sendo usada para algum conteúdo de texto (eu sei, eu sei), mas estou imaginando se alguém saberia como destacar texto específico dentro de uma célula contida entre colchetes.

A célula conteria "O texto vai aqui [texto vermelho entre colchetes] e assim por diante", com o "[texto vermelho entre colchetes]", uma cor vermelha. Qualquer ajuda seria apreciada!

    

Answer 1

Você precisa criar uma macro. No Excel 2010 , pressione Visualizar , Macros , Exibir macros . Digite o nome "Dummy" e pressione Create . Na nova janela exibida, olhe para o painel Projeto à esquerda. Clique duas vezes na folha à qual você deseja aplicar a formatação. Copie e cole o código a seguir.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Text As String
    Dim Index1 As Long
    Dim Index2 As Long
    Text = Target.Text
    Index2 = 1
    Do
        Index1 = InStr(Index2, Text, "[")
        If Index1 = 0 Then Exit Do
        Index2 = InStr(Index1, Text, "]")
        If Index2 = 0 Then Exit Do
        Target.Characters(Index1, Index2 - Index1 + 1).Font.Color = &HFF
    Loop
End Sub

Se você deseja que a formatação se aplique somente a determinadas células, você pode inserir uma das seguintes linhas antes da linha Dim Text As String .

    If Target.Row <> 12 Then Exit Sub    ' Only format row "$12"
    If Target.Column <> 12 Then Exit Sub ' Only format column "$L"

Agora, sempre que você terminar de editar uma célula na planilha, ela mudará os colchetes e o texto para vermelho. Também funciona [se] houver [vários] conjuntos de colchetes [quadrados], mas [aninhados [colchetes]] falharão.