macro para organizar dados em uma coluna

Question

Eu tenho lista de arquivos com dados de preço do produto nele, eu converti arquivos pdf para o formato xlsx enquanto a conversão de dados é deslocada, os dados de preço são dispersos em J, K, L colunas, existe uma macro no Excel que pode olhar no símbolo $ e organiza todos os dados de preço na coluna K

    

Answer 1

Começando com dados como:

Comoexecutarestamacro:

Subqwerty()DimJAsRange,LAsRange,rAsRangeSetJ=Intersect(ActiveSheet.UsedRange,Range("J:J"))
    Set L = Intersect(ActiveSheet.UsedRange, Range("L:L"))

    For Each r In J
        If Left(r.Text, 1) = "$" Then
            r.Copy r.Offset(0, 1)
            r.Clear
        End If
    Next r

    For Each r In L
        If Left(r.Text, 1) = "$" Then
            r.Copy r.Offset(0, -1)
            r.Clear
        End If
    Next r
End Sub

produzirá: