Bom dia,
Fiz um artigo demonstrando como remover a mesclagem das células selecionadas.
É um procedimento muito parecido com o já apresentado no anterior, a diferença é que ele se aplica a qualquer intervalo de células, pode fazer o download do exemplo e do código comentado no artigo abaixo:
http://guiadoexcel.com.br/desmesclar-celulas-excel-vba-como-retirar-mesclagem-de-celulas-com-vba
O código VBA:
'Função para remover mesclagens em células
'1. Selecione a área
'2. Aplique o procedimento
'3. As células foram desmescladas
Public Sub lsRemoverMesclagem()
Dim lCel As Range
Dim lRng As Range
Set lRng = Selection
For Each lCel In lRng
lCel.MergeArea.UnMerge
Next
End Sub
At.
Marcos Rieper
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 10/11/2015 5:55 am