Notifications
Clear all

Mesclar linha abaixo do último valor

1 Posts
1 Usuários
0 Reactions
727 Visualizações
(@mineiro)
Posts: 0
Estimable Member
Topic starter
 

Boa noite!

Gostaria da ajuda de vocês para resolver a seguinte questão. Preciso que a linha inserida abaixo da linha com NC seja mesclada, da coluna D até J, com alinhamento à esquerda. Agradeço a ajuda.

Sub Inserir_linha()

For Each cell In Range("c2:c120")
If cell.Value = "NC" Then
cell.Offset(1).EntireRow.Insert
cell.Offset(1, 0).ClearFormats
cell.Offset(1, 1).Select
End If
Next cell

End Sub

 

 

 
Postado : 11/07/2022 6:25 pm