Guru do Excel e Power BI

Enviado: **21 Jan 2019 às 15:57**

Boa tarde
Precisava reorganizar esses números de uma forma diferente, sempre obedecendo a ordem de posição original dos números mas em formato diferente

Enviado: **22 Jan 2019 às 07:46**

Experimente:

Código: Selecionar todos

Sub ReplicaDadosMudaDisposição()
 [T:V].Clear
 Range("L2:L" & Cells(Rows.Count, 12).End(3).Row).Copy [U2]
 Range("U2:U" & Cells(Rows.Count, 21).End(3).Row).SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp
 Range("K3:K" & Cells(Rows.Count, 11).End(3).Row).Copy Cells(Rows.Count, 21).End(3)(2, 0)
 Range("M3:M" & Cells(Rows.Count, 13).End(3).Row).Copy Cells(Rows.Count, 21).End(3)(2, 2)
 Range(Cells(Rows.Count, 21).End(3)(2, 0), Cells(Rows.Count, 22).End(3)).SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp
End Sub

Enviado: **22 Jan 2019 às 08:29**

Bom dia
oswaldomp, brigadu

Guru do Excel e Power BI

Organizar valores da tabela sob novo formato

Organizar valores da tabela sob novo formato

Re: Organizar valores da tabela sob novo formato

Organizar valores da tabela sob novo formato