Página 1 de 1

Mesclar células através de formula

Enviado: 16 Mai 2017 às 10:27
por AMTNeto
Bom dia, alguém saberia me dizer se tem alguma fórmula que eu possa mesclar células através dela?

Por exemplo: Se eu marcar X na A3, as célular A1 e A2 vão ficar mescladas e aparecer um dizer. Se eu apagar o X as 2 células (A1 e A2) não vão estar mescladas.

????????

Até consegui fazer com uma macro, mas ai precisei colocar um loop de 1s para fazer a leitura a cada segundo e achei que isso deixou a planilha meio lenta...

Segue abaixo a macro que fiz:

Sub Ocorrencias()

If Range("Q5").Value <> "X" Then

If Range("R5").Value <> "X" Then

If Range("S5").Value = "X" Then

Range("C5:O5").MergeCells = True
Range("C5").Value = "REMANEJADO"

Else

Range("C5:O5").MergeCells = False
Range("C5").Value = ""

End If

Else

Range("C5:O5").MergeCells = True
Range("C5").Value = "NC"

End If

Else

Range("C5:O5").MergeCells = True
Range("C5").Value = "TRANSFERIDO"

End If

Call Timer

End Sub

Sub Timer()

Application.OnTime Now + TimeValue("00:00:01"), "Ocorrencias"

End Sub

Alguém tem alguma sugestão?

Mesclar células através de formula

Enviado: 16 Mai 2017 às 13:29
por FelipeMGarcia
Amigo, mesclar células é uma das piores coisas do Excel, atrapalha na hora de fazer fórmulas, formatar, etc. Se fosse você veria uma maneira melhor de trabalhar os dados para não ter que usar este recurso.

Abs

Mesclar células através de formula

Enviado: 17 Mai 2017 às 10:15
por PietroFarias
Para realizar esse procedimento você entra no módulo da planilha que você quer realizar o procedimento e usa o procedimento abaixo:
Código: Selecionar todos
Private Sub Worksheet_Change(ByVal Target As Range)

    If Target = Range("A3") Then
        If UCase(Target) = "X" Then
            Range("A1:A2").Merge
        Else
            Range("A1:A2").UnMerge
        End If
    End If

End Sub
Imagem

Mas dependendo do que você quer fazer, usar formulas por exemplo, sugiro seguir como o FelipeGarcia aconselhou. Trabalhar com células mescladas é uma dor de cabeça quando envolve formulas e formatar.