- 10 Out 2022 às 16:19
#72390
Olá colegas!
Estou tentando fazer uma substituição de ponto por vírgula em colunas específicas e linhas específicas:
Passo 1 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna A
Passo 2 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna F
Passo 3 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna J
Como podem ver não há uma lógica, por isso pensei que poderia fazer uma lista das colunas e uma lista das linhas, mas não estou conseguindo fazer rodar o código:
Estou tentando fazer uma substituição de ponto por vírgula em colunas específicas e linhas específicas:
Passo 1 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna A
Passo 2 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna F
Passo 3 - substituir ponto por vírgula os conteúdos das linhas 2, 7 e 10 da coluna J
Como podem ver não há uma lógica, por isso pensei que poderia fazer uma lista das colunas e uma lista das linhas, mas não estou conseguindo fazer rodar o código:
Código: Selecionar todos
sub substituiPontoPorVirgula ()
colunas = ("A", "F", "J")
Linhas = (2, 7, 10)
for col in range (colunas)
for lin in range(Linhas)
replace(range(col & lin), ".", ",")
next
next
end sub